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
>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