Why not?

no # id_no

Agnes
>Your code won't work!

>scan 
>  if LEN(ALLTRIM(id_no))==10 AND CHRTRAN(ALLTRIM(id_no),"1234567890","")==""
>    replace no WITH 111
>  else &&error
>    replace no WITH 1
>  endif
>endscan

>
>
>>thank you it works
>>
>>i need to use it as below
>>

>>scan FOR LEN(ALLTRIM(id_no))==10 AND CHRTRAN(ALLTRIM(id_no),"1234567890","")==""
>>    replace no WITH 111
>> else &&error
>>    replace no WITH 1
>>endscan
>>
>>

>>thanks
>>>Hi,
>>>
>>>>if the data (exactly 10 numbers) as 1562907543
>>>
>>>IF LEN(ALLTRIM(data))==10 AND CHRTRAN(ALLTRIM(data),"1234567890","")==""