Update yourtable set field1=field1 where Recno()=1 && replace field1 with the actual name

>Is there a way more efficient than this (assuming no records are marked for deletion in normal use, and that if zero records, then there is not need for the TOUCH)?

>USE XXXX
>If RECC()>0
>  GOTO 1
>  DELETE
>  RECALL
>ENDIF
>USE

>
>Thanks!