LOCAL lcAlias, lcOrder, lcDeleted
lcAlias = ALIAS()
SELECT DesiredTable

lcDeleted = SET("DELETED")
lcOrder = ORDER()

SET ORDER TO Dels && my idex on deleted

GO BOTTOM
IF DELETED()
   * Reuse it
ELSE
   * Make a new one
ENDIF

SET DELETED &lcDeleted
IF NOT EMPTY( lcOrder )
   SET ORDER TO &lcOrder
ELSE
   SET ORDER TO 0
ENDIF
IF NOT EMPTY( lcAlias )
   SELECT (lcAlias)
ELSE
   SELECT 0
ENDIF