Hi ,
Here is my requirement....
Migrating applications from MAINFRAMES to MFED(new environment).
The issue with Migrating a step in JCL.
Condition: JOINT KEYS, ISRSUPC ( SUP-C) not working.
Step1 in the Current application: comparing two input files & reporting 1 if diff and 0 if same.
Solution1: Designed this step with IEBCOMPR, but this is reporting 8 if diff.
( as a result, MAXCC is changing to 8 instead of 1).
Solution2: Can write a COBOL program for the same but this type of 20 Other JCLs are there with different file length and different file format, hence not looking for the COBOL program.
Solution3: Designed this step with ICETOOL, but this is not reporting if any duplicates in any file.i.e
File1:
===========
Rec1: PAVAN
Rec2: PAVAN
Rec3: KUMAR
===========
File2:
===========
Rec1: PAVAN
Rec2: KUMAR
Rec3: KUMAR
===========
Expected Output: 1 ( since files miss match )
So, In spite of two records in file1 and only 1 record in file2, reporting as RC 0.
Could any body suggest solution for this requirement?
Matching Files or Not
Moderators: Frank Yaeger, DikDude, Moderator Group
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