So much better! Thanks to both of you. I wonder sometimes what am I NOT getting "it" yet.
Chuck
>
>SETDELETEDOFF
>IFINDEXSEEK(m.id)
> Messagebox('Sorry, can not use that ID'+CHR(13)+'This ID has not been purged from the database.',64)
> SETDELETEDON
> RETURN .F.
>ENDIF
>SETDELETEDON