Re: Built-in function %char

Try using %CHAR(your_field:'X').

hth,

Frank W. Kany IV
Senior Programmer/Analyst 
Unipres USA, Inc.
(615) 325-8428 - Office
(615) 517-1742 - Cell
http://www.unipres.com



BSchwar@xxxxxxxx 
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
01/11/2006 01:13 PM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
rpg400-l@xxxxxxxxxxxx
cc

Subject
Built-in function %char






Is there a way to keep %char from removing leading zeros?
 I'm using %char to get the character representation of a 6.0 yymmdd date
field, and the 2.0 century field.
Example: Date of employment century emdoec = 20, yymmdd emdoe= 020921

eval          wrk08a = %char(emdobc) + %char(emdob)
after the eval statement wrk08a = 2020921

If I use move opcodes it's fine.

Thank You,
Bob Schwartz
Systems Analyst
Information Systems
Southeast Georgia Health System, Brunswick Campus
Voice   912.466.3303
Fax      912.466.3313
email    bschwar@xxxxxxxx