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