Hi,
My requirement is -
In my JCL step I need to find the total count of records in input file, if its more than 50K then I won't be running further steps in the JCL, else I run them.
Could you please help me with this?
Count number of records in input file
Moderators: Frank Yaeger, DikDude, Moderator Group
Re: Count number of records in input file
Quite simple,prachi249 wrote:Hi,
My requirement is -
In my JCL step I need to find the total count of records in input file, if its more than 50K then I won't be running further steps in the JCL, else I run them.
Could you please help me with this?
Assuming your input LRECL 80 bytes
use the below sort code
Code: Select all
//SYSIN DD *
OPTION COPY,STOPAFT=50002
INREC IFTHEN=(WHEN=INIT,OVERLAY=(81:SEQNUM,8,ZD)),
IFTHEN=(WHEN=(81,8,ZD,GT,50000),OVERLAY=(89:C'A'))
OUTFIL INCLUDE=(89,1,CH,EQ,C'A'),NULLOFL=RC4
now you need to handle other steps condition to execute when RC is 04.
Thanks
Magesh
-
- Member
- Posts: 2
- Joined: Thu Feb 09, 2017 1:57 pm
I saw a post on the same.
สมัครเล่นไฮโล
สมัครเล่นไฮโล
FREE TUTORIALS
Tutorials
Free tutorials from mainframegurukul
- JCL Tutorial
Covers all important JCL concepts. - Cobol Tutorial
This tutorials covers all Cobol Topics from STRING to COMP-3. - DB2 Tutorial
DB2 Tutorial focuses on DB2 COBOL Programming. - SORT Tutorial
This Tutorial covers all important aspects of DFSORT with examples - CICS Tutorial
This CICS tutorial covers CICS concepts and CICS Basics, CICS COBOL Programming.
Interview
Mainframe Interview questions
- Cobol Interview Questions
50+ Interview Questions - JCL Interview Questions
50+ Interview Questions - DB2 Interview Questions
100+ Interview Questions - CICS Interview Questions
70+ Interview Questions - VSAM Interview Questions
27 Interview Questions
Other References
Mainframe Tools and others
- XPEDITER Reference
Explains how we can debug a program - FILEAID Reference
Explains how to browse , edit and delete datasets - Change Man Reference
Quick Start tutorial on Changeman - Abend Reference
Important Abend codes explained - FaceBook Page
MainframeGurukul FaceBook Page - LinkedIn Page
MainframeGurkul Linkedin Page