Re: Copy multiple files to PC csv format

[FrankKany@xxxxxxxxxxx]

The following works for me:

I first copy the file to an IFS folder:
CPYTOIMPF  FROMFILE(QTEMP/MYFILE) + 
             TOSTMF('/QDLS/MYFOLDER/MYFILE.CSV') + 
             MBROPT(*REPLACE) STMFCODPAG(*PCASCII) + 
             RCDDLM(*CRLF) 
 
Then copy email the file to myself:
SNDDST     TYPE(*DOC) + 
             TOINTNET((myemailaddress@xxxxxxxxx))       + 
             DSTD('My File in CSV format to open in Excel')          + 
             MSG('This goes into the body of the email') + 
             DOC(MYFILE.CSV)                        + 
             FLR('MYFOLDER') 

hth,

Frank W. Kany IV
Senior Programmer/Analyst 
Unipres USA, Inc.



"Anne d'Hooge" <a.dhooge@xxxxxxxxxx> 
Sent by: midrange-l-bounces@xxxxxxxxxxxx
02/01/2006 09:14 AM
Please respond to
Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx>


To
midrange-l@xxxxxxxxxxxx
cc

Subject
Copy multiple files to PC csv format






Hi,

I need to copy a large amount of AS400 externally described files to PC in 

.csv format.
Manually transferring is impossible due to the large amount, so I wanted 
to 
do this through CL, but how to get them to a PC environment ?
I've noticed a command CPYTOSTMF, but that doesn't work with externally 
described files.

Can anyone help me ?

Regards

Anne d'Hooge