Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

counting number of records in file

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
kalpeshgala

New User


Joined: 08 Jul 2005
Posts: 4

PostPosted: Thu Sep 08, 2005 9:52 am    Post subject: counting number of records in file
Reply with quote

Hi,

Is there anyway in JCL by which :-
in step 1) I can count number of records in the file (not just whether file is empty or not but actual count of records)
and in step 2) pass that count to program through parm in next step.

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

Rupesh.Kothari

Member of the Month


Joined: 27 Apr 2005
Posts: 464

PostPosted: Thu Sep 08, 2005 10:02 am    Post subject: Re: counting number of records in file
Reply with quote

Hi Kalpesh,

Quote:
1) I can count number of records in the file (not just whether file is empty or not but actual count of records)
and in step


Yes you can count the number of records in File.Try this JCL

Code:
//SORTTST JOB (ACCT#),'SORT  ',NOTIFY=&SYSUID,CLASS=T,MSGCLASS=X       
//STEP01  EXEC PGM=SORT                                                 
//SYSOUT   DD   SYSOUT=*                                               
//SORTIN  DD DSN=Input file name,DISP=SHR                       
//SORTOUT DD DSN=outputfile.name,DISP=SHR                       
//SYSIN   DD *                                                         
  OPTION COPY                                                           
  OUTFIL REMOVECC,NODETAIL,                                             
   TRAILER1=(COUNT=(M10,LENGTH=02))                                     
/*                                                                     
//SYSUDUMP   DD SYSOUT=* 


Regards
Rupesh
Back to top
View user's profile Send private message
radhakrishnan82

Active User


Joined: 31 Mar 2005
Posts: 436
Location: chennai, India

PostPosted: Thu Sep 08, 2005 10:37 am    Post subject:
Reply with quote

Try this:

Code:

//*                                                 
//COUNT EXEC PGM=ICETOOL                         
//*
//TOOLMSG    DD   SYSOUT=*                           
//DFSMSG     DD   SYSOUT=*                           
//*
//COUNT      DD   DSN=dataset name,
//               DISP=SHR
//*
//TOOLIN     DD   DATA                               
  COUNT FROM(COUNT)                                   
/*                                                 
//*


hope this helps.
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 -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts SORTJOIN - Copy Matched and Unmatched... Steve Ironmonger DFSORT/ICETOOL 5 Tue Jan 17, 2017 4:26 pm
No new posts Copy RECFM =VB TO FB file with RECL =... sahil41352 DFSORT/ICETOOL 3 Wed Dec 28, 2016 11:29 pm
No new posts Removing Duplicates based on certain ... chandracdac DFSORT/ICETOOL 8 Fri Dec 09, 2016 4:40 am
No new posts Add PD field from 2nd file to PD in 1st Sushant Garje DFSORT/ICETOOL 6 Thu Dec 01, 2016 4:32 pm
No new posts File Aid to File Manager conversion murali3955 IBM Tools 4 Thu Nov 24, 2016 3:41 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us