Re: Left justify numeric field

Thanks to everyone.
After I posted, I looked at it again and the %char() solution occurred to
me.
This is needed to print fields on an invoice form, and for asthetic
reasons, they want it this information to all line up to the left most
position of the box on the form.

Thanks again,


On Tue, Aug 13, 2013 at 4:49 PM, <paultherrien@xxxxxxxxxxxxxxxxxx> wrote:

I think...
/Free
Charfield = %char(numericfield);
/end-free

Paul Therrien
Andeco Software, LLC
225-229-2491
paultherrien@xxxxxxxxxxxxxxxxxx
www.andecosoftware.com


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Jeff Young
Sent: Tuesday, August 13, 2013 4:43 PM
To: RPG programming on the IBM i / System i
Subject: Left justify numeric field

All,
I have a numeric field 0070000123 that I need to remove the leading zeros
and left justify for printing.

Does anyone have a simple routine to do this?

Thanks,

--
Jeff Young
Sr. Programmer Analyst
--
This is the RPG programming on the IBM i (AS/400 and 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.

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