Keep Leading Zeroes in Character Field

[joann.l.olsen@us.abb.com]

Thanks to everyone for the help.  I needed the leading zeroes for linking to
another file where the key in that file is numeric and contains the leading
zeroes.  I tend to agree with Bob Edis.  It can't be done.  Back to the drawing
board!

This did not produce an error, but did not give me leading zeroes:

def d-num num*8 significance 8 pic "^^^^^^^^"  = nconvert(gbsbl)

On the following define, I got an error pointing to the comma.      def d-num
num*8 = nconvert(gbsbl,8)


Original message:

I need to convert a character field to a numeric field, but keep the leading
zeroes.  If the nconvert is used, it drops the leading zeroes.  How can that be
accomplished?  We are on an AS/400.

Example:  subledger  char*8 = 00100241
                     def D-NUM num*8 = nconvert(subledger)

The results in D-NUM is 100241

Thanks