* Create the cursor to receive the data SELECT MyTable1 = AFIELDS(a_fields) * Note: If the table is not a free table * modification of the array has to occur * before the cursor can be created * This could be used to create a table CREATE CURSOR MyTable3 FROM ARRAY a_fields SELECT MyTable2 lcalias = ALIAS() lnfields = FCOUNT() SCAN m.field1 = EVALUATE(FIELD(1)) SELECT MyTable3 FOR lni = 2 TO lnfields m.field2 = FIELD(lni, lcalias) m.field3 = EVALUATE(FIELD(lni, lclias)) APPEND BLANK * Or individual REPLACE statements GATHER MEMVAR NEXT ENDSCANhth,