I would just do a scan

Use MyTable
Set Order to Status

scan for "NEW"
IF lock()
llocked=.T.
Replace Status with "OLD"
ENDIF
ENDscan