Portal | IBM Manuals | Downloads | Products | Refer | Info | Programs | JCLs | Forum Rules*| Site Map | Mainframe CD 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index
 
Register
 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index FAQ Search Memberlist Usergroups Profile Log in to check your private messages Log in
 
Supress leading zeroes using NATURAL

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> NATURAL & MQSERIES
Author Message
larochka

New User


Joined: 10 Jul 2006
Posts: 3

PostPosted: Mon Jul 10, 2006 10:19 pm    Post subject: Supress leading zeroes using NATURAL
Reply with quote

I need to write out a record counter, but to suppress all leading zeroes.
Any ideas?
Back to top
View user's profile Send private message
References
PostPosted: Mon Jul 10, 2006 10:19 pm    Post subject: Re: Supress leading zeroes using NATURAL Reply with quote

ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 1754
Location: Israel

PostPosted: Tue Jul 11, 2006 1:02 am    Post subject:
Reply with quote

How about ZS parameter?

You may set this value at session level, program level, statement level and output-element level.

O.
Back to top
View user's profile Send private message
larochka

New User


Joined: 10 Jul 2006
Posts: 3

PostPosted: Tue Jul 11, 2006 2:04 am    Post subject:
Reply with quote

Would you mind to give me an example?
Thank you!
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 1754
Location: Israel

PostPosted: Tue Jul 11, 2006 1:24 pm    Post subject:
Reply with quote

First - my mistake. The parameter is ZP.

Now, NATURAL has default zero suppression for numeric fields. Unless you epecify (EM=9999), the result is zero suppressed.

If you still have problem, you may try (EM=ZZZZZ).

O.
Back to top
View user's profile Send private message
larochka

New User


Joined: 10 Jul 2006
Posts: 3

PostPosted: Tue Jul 11, 2006 6:55 pm    Post subject:
Reply with quote

Thank you, that is what I did. I thought you were talking about field defenition, like COBOL.
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> NATURAL & MQSERIES All times are GMT + 6 Hours
Page 1 of 1