Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
How to get count values with leading zeroes??

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
View previous topic :: :: View next topic  
Author Message
kalyan.v

New User


Joined: 04 Feb 2008
Posts: 65
Location: Hyd

PostPosted: Thu Apr 30, 2009 2:43 pm    Post subject: How to get count values with leading zeroes??
Reply with quote

HI All,

I have input file like below::

Code:


1(2) 5(30)                         35(6)
AB  PIGGOTT COMMUNITY HOSP         001122       
AB  BANK OF LAKE VILLAGE           004951       
AB  COMMUNITY MEDICAL CENTER       005143 
AB  TAYLOR & STUCKEY INC           005410       
AB  RANDOLPH CO CLERK OFFICE       005547       


Now i am getting output like this::
Code:

PIGGOTT COMMUNITY HOSP         AB 001122        1
BANK OF LAKE VILLAGE           AB 004951        1
COMMUNITY MEDICAL CENTER       AB 005143        1
TAYLOR & STUCKEY INC           AB 005410        1
RANDOLPH CO CLERK OFFICE       AB 005547        1



But i want leading zeros in count value.
Expected output::
Code:

PIGGOTT COMMUNITY HOSP         AB 001122 00000001
BANK OF LAKE VILLAGE           AB 004951 00000001
COMMUNITY MEDICAL CENTER       AB 005143 00000001
TAYLOR & STUCKEY INC           AB 005410 00000001
RANDOLPH CO CLERK OFFICE       AB 005547 00000001


Used Sort Card::
Code:

SORT FIELDS=(1,02,CH,A,35,06,CH,A)         
OUTFIL REMOVECC,NODETAIL,                   
SECTIONS=(1,02,35,06,                     
TRAILER3=(5,30,X,1,02,X,35,06,X,COUNT)), 
VTOF,BUILD=(5,100)                           



Is there any way to get count value with leading zeroes.

Thanks in advance..
Kalyan
Back to top
View user's profile Send private message

CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2150
Location: At my coffee table

PostPosted: Thu Apr 30, 2009 3:46 pm    Post subject:
Reply with quote

Have you considered using COUNT=(edit) or COUNT=(to)
same as COUNT except that the 15-digit count appears edited or converted as specified. See p,m,f,edit under OUTREC for further details on the edit fields you can use. See p,m,f,to under OUTREC for further details on the to fields you can use.
?
Back to top
View user's profile Send private message
kalyan.v

New User


Joined: 04 Feb 2008
Posts: 65
Location: Hyd

PostPosted: Thu Apr 30, 2009 4:23 pm    Post subject:
Reply with quote

Hi,

It is working fine.
Thanks a lot.

Thanks,
Kalyan v
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts attchmvs from rexx subroutine that re... harisukumaran CLIST & REXX 1 Fri Jan 19, 2018 5:29 am
No new posts Skip records depends on count lakshmiibmmainframes DFSORT/ICETOOL 5 Sun Dec 24, 2017 9:51 pm
No new posts ISMF Difference between volume count ... upendrasri IBM Tools 2 Tue Dec 05, 2017 12:40 pm
No new posts Squeeze record left so that zeroes ar... Vignesh Sid SYNCSORT 5 Fri Nov 10, 2017 1:40 pm
No new posts How to write Rexx program to size and... sreejeshcs CLIST & REXX 14 Thu Oct 12, 2017 7:26 am

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us