Hi!
I'm trying match 2 files, both VB.
File 1 - key pos 17, packed, 7 bytes, 133 bytes total length
File 2 - key pos 30, unpacked, 13 bytes, 4223 bytes total length
Both have header and trailer.
output 1 - matched records
output 2 - unmatched records of input file1
output 3 - unmatched records of input file2
I'm using the code below:
JOINKEYS FILE=F1,FIELDS=(21,7,A)
JOINKEYS FILE=F2,FIELDS=(34,13,A)
JOIN UNPAIRED
REFORMAT FIELDS=(F2:1,4223,F1:1,133)
SORT FIELDS=COPY
OUTFIL FILES=03,INCLUDE=(5,1,CH,EQ,C' '),BUILD=4224,133)
OUTFIL FILES=02,INCLUDE=(4228,1,CH,EQ,C' '),BUILD=(1,4223)
OUTFIL FILES=01,SAVE,BUILD=(1,4223)
The good result is not reached.
Could someone help me?
Thanks in advance.
joinkey with different formats of key
Moderators: Frank Yaeger, Moderator Group
-
- Member
- Posts: 11
- Joined: Fri Nov 11, 2011 7:21 pm
joinkey with different formats of key
juares castro
- Frank Yaeger
- Moderator
- Posts: 812
- Joined: Sat Feb 18, 2006 5:45 am
- Location: San Jose, CA
- Contact:
Which sort product are you using - DFSORT (ICE messages) or Syncsort (WER messages)?
Frank Yaeger - DFSORT Development Team (IBM) - yaeger@us.ibm.com
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
=> DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
=> DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort
-
- Member
- Posts: 11
- Joined: Fri Nov 11, 2011 7:21 pm
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