Jim

Closest I can come up with is this code buried in the InteractiveChange

lcNum='123123123436' ie this.value

this.value=TRANSFORM(lcNum,'@R 999/999-9999')+;
IIF(LEN(ALLTRIM(lcNum))>10,' X'+SUBSTR(lcNum,11),'')


See you all at Devcon
Steve