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
This topic is locked: you cannot edit posts or make replies. Fetching data from BAI File arunsoods JCL & VSAM 1 Wed Jul 19, 2017 4:28 pm
No new posts Write out NODUPS but just from one file Jay Villaverde DFSORT/ICETOOL 8 Fri Jul 14, 2017 12:44 am
No new posts How to add header with Date(YYMMDD) i... Rajan Moorthy DFSORT/ICETOOL 2 Thu Jul 06, 2017 11:44 pm
No new posts How to generate a new unique Input fi... for1ranjith CLIST & REXX 11 Sat Jul 01, 2017 12:09 pm
No new posts Writing a file using online program grvtomar PL/I & Assembler 3 Fri Jun 30, 2017 1:06 pm


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