SELECT queue SET ORDER TO FIFOORDER SCAN <save> fieldExp <into> duplexExp STORE RECNO() TO iRec LOCATE FOR fieldExp< equal to >duplexExp IF RECNO()#m.iRec DELETE RECORD m.iRec ELSE GO m.iRec ENDIF ENDSCAN