RE: BIF to trim leading 0's

[boldt@xxxxxxxxxx]

Dave wrote:
>I don't see how %CHA would do it.
>
>From the manual:
>%CHAR
>The converted value remains unchanged,
>but is returned in a format that is compatible with character data.
>
>Seems like I'd still have the leading 0's, only in char format.

Dave:  You've never tried %CHAR, have you?  %CHAR performs roughly
the same function as %TRIML(%EDITC(number:'P')).  The edit code
gives you leading blanks instead of zeros and the trim will strip
them off.  For example if P(15,6) field X has value 123.45, the
character expression "'/'+%CHAR(X)+'/'" gives the value "/123.45/".

(BTW, in the oft-rumored V5R1 release, it is suspected that %CHAR
will also perform more robust conversions from date, time, and
timestamp types to character.  You'll be able to specify a format
as the second parameter.)

Cheers!  Hans

Hans Boldt, ILE RPG Development, IBM Toronto Lab, boldt@ca.ibm.com

+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---