Re: exporting to .csv file

[Alan Novick <anovick@xxxxxxxxxxxxxxxx>]

Thanks to all who wrote on this topic.  The client access suggestions
were not a fit because I'm trying to do this in an automated, unattended
fashion.  Besides, we don't want the solution to be go to a PC do we? 
The 400 should be able to do everything!

Roger, at first I didn' understand the benefit of your solution as it
had two steps, much like mine.  But now I see the point about saving the
time of a large file copy.  Pretty neat trick.  It is quite annoying
that CPYTOIMPF does not have a code page over even just *ASCII/*EBCDIC
parameter.  Who the heck is exporting to a delimited format not in ASCII
anyway?

Alan Novick
Pressman Toy Corporation
New Brunswick, NJ


Roger Pence wrote:
> 
> Alan--
> 
> > I'm trying to export an AS/400 physical file to a comma separated
> > variable file in a folder so I can email the data to someone who can
> > open the file in Excel.  Right now I am doing it in two steps.
> >
> > Step 1. Export the file:
> >
> >  CPYTOIMPF FROMFILE(EDI002P) +
> >            TOSTMF('qdls/folder/edi002') +
> >            RCDDLM(*CRLF)
> >
> > Step 2. Convert to ASCII using the COPY command:
> >
> >  COPY OBJ('qdls/folder/edi002') +
> >       TOOBJ('qdls/folder/edi002.csv') +
> >       TOCODEPAGE(*PCASCII) +
> >       DTAFMT(*TEXT)
> 
> It's still a little grungy and requires the existence of a target template,
> but that isn't that big of a deal. And, this method eliminates a
> time-consuming copy of a large file after it's been CPYTOIMFed.  Why in the
> %@#$@%@!# doesn't CPYTIMPF provide a codepage parameter!?
> 
> 1. Create a single, empty correctly code-paged template target file in a
> folder (with with CPY or from the PC).
> 
> 2. Before you do the CPYTOIMPF, use CPY to copy the template target file to
> the approrpiate folder with the appropriate name.
> 
> 3. Use CPYTOIMPF to copy to that new target file. CPYTOIMPF will preserve
> its codepage.
> 
> rp
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---