RE: CSV - how to keep leading zeros and alignment problems

[Vernon Hamberg <vhamberg@xxxxxxxxxxx>]

You might also consider writing to SYLK format - the venerable old 
format for spreadsheets - you can do all manner of formatting with it 
- not the most recent stuff but you can get cell numeric formats - so 
you CAN force text on a cell or column. You can even specify column 
widths, etc. Not exactly for the faint of heart, but not too bad, 
really. Save a spreadsheet as SYLK and view it in TextPad or other 
text editor. Try different cell formats and all and see how it is 
done. Then find the MS SYLK docs - they are on the net - we have such 
a converter in our Native Converters package.

HTH
Vern

At 02:31 PM 5/24/2007, you wrote:

> The cell comes up with '025
> If I press F2 to edit it and press Enter without changes, the apostrophe
> goes away and it looks great.
>
> Like Rick said, I'm probably SOL.
> I'm wondering how long it will take for me to do this with POI having
> never used it before.
>
> Tks,
>
> Glenn Gundermann
> ggundermann@xxxxxx
> (647) 272-3295
>
> > Add a single quote before the zero "'025" see if that works
> >
> >
> > Thanks,
> > Tommy Holden
> >
> >
> > -----Original Message-----
> > From: rpg400-l-bounces@xxxxxxxxxxxx
> > [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Glenn Gundermann
> > Sent: Thursday, May 24, 2007 1:22 PM
> > To: RPG programming on the AS400 / iSeries
> > Subject: Re: CSV - how to keep leading zeros and alignment problems
> >
> > Seeing that I'm creating a csv file, every field is already surrounded
> > by
> > double quotes.
> > Here's a sample of the first five columns:
> > "025","70010060622","70300457","5507","CO ABC"
> > "025","70010060620","70300412","MELANIE","CO DEF"
> >
> > When opening the csv file in Excel, I get:
> >
> > STATUS  PICK TICKET  ACCOUNT   PO         SHIP TO
> > 25      70010060622  70300457       5507  CO ABC
> > 25      70010060620  70300412  MELANIE    CO DEF
> >
> > So you can see I'm missing the leading 0 in the status column, and
> > the alignment is off for the PO column.
> >
> > Tks,
> >
> > Glenn Gundermann
> > ggundermann@xxxxxx
> > (647) 272-3295
> >
> > Booth Martin wrote:
> >> Surround the field with double quotes.
> >>
> >>  C        eval    wString = %trim(wString) + ',"' +  %editc(Number:
> >> 'X')  + '"'
> >>
> >>
> >> Glenn Gundermann wrote:
> >>> Hi Everyone,
> >>>
> >>> I haven't ventured into the POI world yet so I'm using RPG to create
> > a
> >>> .csv file in the IFS using the unix APIs like open(), write(), etc.
> >>>
> >>> I can't figure out how to keep leading zeros for a numeric field.
> >>>
> >>> An old article of Bob Cozzi in MC Press said to use the quote
> > function,
> >>> e.g. =("001") but I get =(001")" in my column.  Perhaps the quote
> >>> function
> >>> will only work for people using CPYTOIMPF.
> >>>
> >>> I've tried putting in an apostrophe in the front.  I get '001 in my
> > cell
> >>> instead of 001.
> >>>
> >>> Secondly, I have a column (P.O. #) that should be character but the
> > data
> >>> sometimes is numeric.  The character data is left-justified and the
> >>> numeric data is right-justified.
> >>>
> >>> Any help would be most appreciated.
> >>>
> >>> Tks,
> >>>
> >>> Glenn Gundermann
> >>> ggundermann@xxxxxx
> >>> (647) 272-3295
> --
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.