'N' = Type(myField)fail?
>>CLEAR >>CREATE CURSOR crsTest (myField Char(15)) >>INSERT INTO crsTest VALUES([3.50]) >>INSERT INTO crsTest VALUES([-4]) >>INSERT INTO crsTest VALUES([a3.50]) >>INSERT INTO crsTest VALUES([3a.50]) >>INSERT INTO crsTest VALUES([5433.123]) >>INSERT INTO crsTest VALUES([12345.6789]) >>INSERT INTO crsTest VALUES([12.50a]) >> >>SCAN >> ? myField , IIF(ALLTRIM(STR(VAL(myField),15,5)) = ALLTRIM(myField),[ is Number],[ not number]) >>ENDSCAN >>>