David and Dragan,

I've used the SCATTER NAME when building a list of record to be moved to some where else;

LOCAL laRecs(1), loObj
lnCnt = 1
SCAN FOR Some Condition
  DIMENSION laRecs(lnCnt)
  SCATTER MEMO NAME loObj
  laRecs(lnCnt ) = loObj
  lnCnt = lnCnt + 1
ENDSCAN
* Now laRecs has one row for each record that is a scatter name object that can * be used in a gather name operation