Re: Right adjust zero fill character field

Yeah, Alan added that, I think, in his second post. I had some kind of
problem with that in one instance - not sure why at the moment. So yeah,
that must be a good answer, too. My EDITW string probably would not
handle signs properly - but for what I needed, it was cool.

On 9/25/2012 10:52 AM, Booth Martin wrote:

Just a quick reminder:

People often forget that edit code "X" preserves leading zeros.

On 9/25/2012 10:43 AM, Vernon Hamberg wrote:

I think fieldb needs to be alpha, not packed. I forget whether %char
preserves the leading zeroes - I think not. I believe I used %editw for
this - the format string was 7 characters long, started with a zero -
'0 ' - so that zero-suppression was not applied to the number.

fieldb = %editw(%dec(fielda : 6 : 0) : '0 ');

--
This is the RPG programming on the IBM i / System i (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.