SELECT Table IF SEEK(lcRef) SCAN WHILE Ref = lcRef ... ENDSCAN ENDIFWill be a lot quicker then SCAN FOR, but of course assumes you have an index so you can SEEK()
SELECT Table >SCAN FOR Ref = lcRef > lnRecNo = RECNO() > SCATTER MEMVAR > m.Ref = lcNewRef > INSERT INTO Table FROM MEMVAR > GO lnRecNo >ENDSCAN >>
SELECT *; > FROM Table; > WHERE Ref = lcRef; > INTO CURSOR Updates > >SELECT Updates >SCAN > SCATTER MEMVAR > m.Ref = lcNewRef > INSERT INTO Table FROM MEMVAR >ENDSCAN >>