>USE am2 >*GETFILE() > >gcDelimName = ALIAS( ) + '.xls' > >gcDelimFile = PUTFILE('excel_file:', gcDelimName, 'xls') > >IF EMPTY(gcDelimFile) && Esc pressed > CANCEL >ENDIF > >COPY TO (gcDelimFile) XLS && Create delimited file > >