>*-- I will assume that we are using the current open table > >LPARAMETERS tcOutFile > >SET TEXTMERGE TO (tcOutFile) >SET TEXTMERGE ON NOSHOW > >LOCAL lnCounter > >FOR lnCounter = 1 TO FCOUNT() > \\<<ALLTRIM(FIELD(lnCounter))>> > > IF lnCounter < FCOUNT() > \\, > ENDIF >ENDFOR > >SCAN > FOR lnCounter = 1 TO FCOUNT() > \\<<TRANSFORM(EVALUATE(FIELD(lnCounter)))>> > > IF lnCounter < FCOUNT() > \\, > ENDIF > ENDFOR >ENDSCAN > >SET TEXTMERGE OFF >SET TEXTMERGE TO >MODI COMM (tcOutFile) NOWAIT >>