Hi Jim,
How if you use :
lcID = this.value
Release myCount
Select COUNT(*) From drawing Where Upper(Allt(id_no))==Upper(Allt(lcID)) Into Array myCount
if myCount>0
=MessageBox(Allt(lcID))+' already exists!')
return .f.
endif
Release myCount


HTH,