Jim,

The single chrtran() call is tons faster than looping through each character and making two function calls.

>How about :

>*--- make sure we have digits only for the Phone Number
>IF !EMPTY(nCharPhone)
>FOR i = 1 TO nCharPhone
>	IF !ISDIGIT(SUBSTR(cPhone,i,1))
>		MESSAGEBOX ("Phone number should contain the numbers 0-9 only!")
>		RETURN
>	ENDIF
>NEXT
>ENDIF