Hi,
I have two variable length files of LRECL 1296. There are no key fields.I want to match on whole records.If a record is present in both should go to BOTH.If a record is present only in file 1 it should go to F1ONLY.If a record is present only in file 2 it should go to F2ONLY.All 3 output files should be of fixed length with LRECL 1296. Fill the extra bytes with spaces.
Could you please help with DFSORT jcl needed?!
Variable length files matching records
Previous topic • Next topic • 6 posts
• Page 1 of 1
Variable length files matching records
by whowillwait4u » Thu Jun 28, 2012 3:55 pm
- whowillwait4u
- Posts: 15
- Joined: Fri Feb 17, 2012 2:07 pm
- Has thanked: 0 time
- Been thanked: 0 time
Re: Variable length files matching records
by NicC » Thu Jun 28, 2012 6:10 pm
The sort JCL is in the DFSORT manual - you will need to tailor it for your installation.
As for your joinkeys control cards - have you looked in the forum - done a search on joinkeys? It would apper that your requirements is a minimal joinkeys operation and plenty of examples exist.
As for your joinkeys control cards - have you looked in the forum - done a search on joinkeys? It would apper that your requirements is a minimal joinkeys operation and plenty of examples exist.
The problem I have is that people can explain things quickly but I can only comprehend slowly.
Regards
Nic
Regards
Nic
- NicC
- Global moderator
- Posts: 3025
- Joined: Sun Jul 04, 2010 12:13 am
- Location: Pushing up the daisies (almost)
- Has thanked: 4 times
- Been thanked: 136 times
Re: Variable length files matching records
by BillyBoyo » Thu Jun 28, 2012 7:02 pm
One step with VTOF for each file.
Then a step for the joinkeys with UNPAIRED,F1,F2, specifying the full record as the key, using the ? in the REFORMAT and testing that/using SAVE for the split of the data into three files.
That plus the forum examples and the manual should get you started.
Then a step for the joinkeys with UNPAIRED,F1,F2, specifying the full record as the key, using the ? in the REFORMAT and testing that/using SAVE for the split of the data into three files.
That plus the forum examples and the manual should get you started.
- BillyBoyo
- Global moderator
- Posts: 3804
- Joined: Tue Jan 25, 2011 12:02 am
- Has thanked: 22 times
- Been thanked: 265 times
Re: Variable length files matching records
by skolusu » Thu Jun 28, 2012 10:20 pm
Use the following DFSORT JCL which will give you the desired results
//STEP0100 EXEC PGM=SORT,REGION=0M
//SYSOUT DD SYSOUT=*
//INA DD DSN=Your Input VB file1,DISP=SHR
//INB DD DSN=Your Input VB file2,DISP=SHR
//BOTH DD SYSOUT=*
//F1ONLY DD SYSOUT=*
//F2ONLY DD SYSOUT=*
//SYSIN DD *
OPTION COPY
JOINKEYS F1=INA,FIELDS=(1,1296,A)
JOINKEYS F2=INB,FIELDS=(1,1296,A)
JOIN UNPAIRED
REFORMAT FIELDS=(F1:1,1296,?,F2:1,1296)
OUTFIL FNAMES=BOTH,INCLUDE=(1297,1,CH,EQ,C'B'),BUILD=(1,1296)
OUTFIL FNAMES=F1ONLY,INCLUDE=(1297,1,CH,EQ,C'1'),BUILD=(1,1296)
OUTFIL FNAMES=F2ONLY,INCLUDE=(1297,1,CH,EQ,C'2'),BUILD=(1298,1296)
//*
//JNF1CNTL DD *
INREC OVERLAY=(1296:X)
//*
//JNF2CNTL DD *
INREC OVERLAY=(1296:X)
//*
//SYSOUT DD SYSOUT=*
//INA DD DSN=Your Input VB file1,DISP=SHR
//INB DD DSN=Your Input VB file2,DISP=SHR
//BOTH DD SYSOUT=*
//F1ONLY DD SYSOUT=*
//F2ONLY DD SYSOUT=*
//SYSIN DD *
OPTION COPY
JOINKEYS F1=INA,FIELDS=(1,1296,A)
JOINKEYS F2=INB,FIELDS=(1,1296,A)
JOIN UNPAIRED
REFORMAT FIELDS=(F1:1,1296,?,F2:1,1296)
OUTFIL FNAMES=BOTH,INCLUDE=(1297,1,CH,EQ,C'B'),BUILD=(1,1296)
OUTFIL FNAMES=F1ONLY,INCLUDE=(1297,1,CH,EQ,C'1'),BUILD=(1,1296)
OUTFIL FNAMES=F2ONLY,INCLUDE=(1297,1,CH,EQ,C'2'),BUILD=(1298,1296)
//*
//JNF1CNTL DD *
INREC OVERLAY=(1296:X)
//*
//JNF2CNTL DD *
INREC OVERLAY=(1296:X)
//*
Re: Variable length files matching records
by whowillwait4u » Tue Jul 03, 2012 6:47 pm
Thank you All!
I got what i am looking for. I did the same told by Billyboyo before posting this in forum. VTOF and JOINKEYs. But i wanted to reduce the number of steps in my JOB. skolusu gave me that. Thank buddies!. I appreciate your time!
I got what i am looking for. I did the same told by Billyboyo before posting this in forum. VTOF and JOINKEYs. But i wanted to reduce the number of steps in my JOB. skolusu gave me that. Thank buddies!. I appreciate your time!
- whowillwait4u
- Posts: 15
- Joined: Fri Feb 17, 2012 2:07 pm
- Has thanked: 0 time
- Been thanked: 0 time
Re: Variable length files matching records
by skolusu » Tue Jul 03, 2012 11:29 pm
whowillwait4u wrote:Thank you All!
I got what i am looking for. I did the same told by Billyboyo before posting this in forum. VTOF and JOINKEYs. But i wanted to reduce the number of steps in my JOB. skolusu gave me that. Thank buddies!. I appreciate your time!
You don't need VTOF as you can directly create the FB files. Use the following Control cards
//SYSIN DD *
OPTION COPY
JOINKEYS F1=INA,FIELDS=(5,1292,A)
JOINKEYS F2=INB,FIELDS=(5,1292,A)
JOIN UNPAIRED
REFORMAT FIELDS=(F1:5,1292,?,F2:5,1292)
OUTFIL FNAMES=BOTH,INCLUDE=(1293,1,CH,EQ,C'B'),BUILD=(1,1292)
OUTFIL FNAMES=F1ONLY,INCLUDE=(1293,1,CH,EQ,C'1'),BUILD=(1,1292)
OUTFIL FNAMES=F2ONLY,INCLUDE=(1293,1,CH,EQ,C'2'),BUILD=(1294,1292)
//*
//JNF1CNTL DD *
INREC OVERLAY=(1296:X)
//*
//JNF2CNTL DD *
INREC OVERLAY=(1296:X)
//*
OPTION COPY
JOINKEYS F1=INA,FIELDS=(5,1292,A)
JOINKEYS F2=INB,FIELDS=(5,1292,A)
JOIN UNPAIRED
REFORMAT FIELDS=(F1:5,1292,?,F2:5,1292)
OUTFIL FNAMES=BOTH,INCLUDE=(1293,1,CH,EQ,C'B'),BUILD=(1,1292)
OUTFIL FNAMES=F1ONLY,INCLUDE=(1293,1,CH,EQ,C'1'),BUILD=(1,1292)
OUTFIL FNAMES=F2ONLY,INCLUDE=(1293,1,CH,EQ,C'2'),BUILD=(1294,1292)
//*
//JNF1CNTL DD *
INREC OVERLAY=(1296:X)
//*
//JNF2CNTL DD *
INREC OVERLAY=(1296:X)
//*
Previous topic • Next topic • 6 posts
• Page 1 of 1
Return to DFSORT/ICETOOL/ICEGENER
-
- Related topics
- Replies
- Views
- Last post
-
- Matching files with different length
1, 2by pulcinella » Mon Feb 02, 2009 6:29 pm - 13 Replies
- 6753 Views
- Last post by pulcinella
Wed Feb 11, 2009 12:12 am
- Matching files with different length
-
- Convert fixed-length input records to variable-length output
by xcspg3 » Wed Oct 23, 2024 1:45 pm - 5 Replies
- 347 Views
- Last post by sergeyken
Wed Oct 30, 2024 1:09 pm
- Convert fixed-length input records to variable-length output
-
- Sorting on variable length file having variable records
by Felcy » Sat Nov 12, 2016 2:17 pm - 6 Replies
- 2979 Views
- Last post by BillyBoyo
Sat Nov 12, 2016 6:48 pm
- Sorting on variable length file having variable records
-
- ICETOOL: Matching Records for VB Files
by anil4321 » Thu Nov 20, 2008 3:39 am - 1 Replies
- 3218 Views
- Last post by Frank Yaeger
Thu Nov 20, 2008 4:12 am
- ICETOOL: Matching Records for VB Files