IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Supress leading zeroes using NATURAL


IBM Mainframe Forums -> Java & MQSeries
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
larochka

New User


Joined: 10 Jul 2006
Posts: 3

PostPosted: Mon Jul 10, 2006 10:19 pm
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
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2359
Location: Israel

PostPosted: Tue Jul 11, 2006 1:02 am
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
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: 2359
Location: Israel

PostPosted: Tue Jul 11, 2006 1:24 pm
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
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
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> Java & MQSeries

 


Similar Topics
Topic Forum Replies
No new posts IMS DB using Natural Language IMS DB/DC 0
No new posts How to fill with zeroes pd intended s... DFSORT/ICETOOL 6
No new posts Negative value - packed field - Natur... Java & MQSeries 0
This topic is locked: you cannot edit posts or make replies. Suppressing only leading zeros (not s... DFSORT/ICETOOL 9
No new posts Call Natural program with rexx CLIST & REXX 2
Search our Forums:

Back to Top