>Can anyone tell of an easier (faster) way to perform the following code?:
>
>SELECT TEMPALIAS
> SCAN
> SCATTER FIELD UNIQKEYSAS MEMVAR
> SELECT MF_158
&& I assume the order has already been set.
If seek(M.uniqkeysas)
> * SEEK M.uniqkeysas && not needed
> * IF FOUND() && not needed
> SELECT Prob_158
> * SEEK M.uniqkeysas && not needed
> * IF FOUND() && not needed

If seek(M.uniqkeysas)
scan while Uniqkeysas = m.uniqkeysas
REPLACE DEL_DTime WITH MF_158.DATE_IN
&& replace all goes through the entire table. The scan will
&& only go through matching records.
endscan
*REPLACE ALL DEL_DTime WITH MF_158.DATE_IN FOR Uniqkeysas = m.uniqkeysas
> ENDIF
> SELECT TEMPALIAS
> DELETE
> ENDIF
> SELE TEMPALIAS
> ENDSCAN
>
>RELEASE M.UNIQKEYSAS
>
>SELECT MF_158
>SET ORDER TO cdc_id
>
>SELECT TEMPALIAS
>PACK