Keep Leading Zeroes in Character Field

[Edis, Bob]

Joann

Have you tried using a ZONED NUMERIC data type?  Is this available on the
AS/400?

Blue

-----Original Message-----
From: joann.l.olsen@us.abb.com [mailto:joann.l.olsen@us.abb.com]
Sent: Thursday, April 05, 2001 2:26 PM
To: powerh-l@lists.swau.edu
Subject: Keep Leading Zeroes in Character Field




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



= = = = = = = = = = = = = = = = = = = = = = = = = = = =
Mailing list: powerh-l@lists.swau.edu
Subscribe: "subscribe" in message body to powerh-l-request@lists.swau.edu
Unsubscribe: "unsubscribe" in message body to
powerh-l-request@lists.swau.edu
http://lists.swau.edu/mailman/listinfo/powerh-l
This list is closed, thus to post to the list you must be a subscriber.