RE: Edit out trailing 0's

[<Matt.Haas@xxxxxxxxxxx>]

You probably need to define an edit word to make it print the way you
want.

Matt

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Vernon Hamberg
Sent: Saturday, June 30, 2007 10:31 PM
To: RPG programming on the AS400 / iSeries
Subject: Re: Edit out trailing 0's

William

I did a quick search and did not find anything - there might be an 
edit code - maybe it's possible to define a user-defined one - not 
sure. But you could certainly define the printer file field as alpha, 
the use the %editc and %trimr builtin functions to get rid of the 
trailing zeroes.

Vern

At 07:58 PM 6/30/2007, you wrote:

> I would like to not print training zeros. Ex: .153000 to print like
.153
> I have looked in the DDS Book, but could not find what I wanted.
> Any help would be appreciated.
> Thanks,
> William Moore
>
> --
> 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.