First of all…I hope you had a nice summertime and you are doing well!!!
You gave me some month ago your super supportive help related to the below JCL/DFSORT.
Is it possible to get btw..lets say as a byproduct within the same step… “all keys of F2 which are not in F1” if some use
“JOIN UNPAIRED,F1“?
INREC IFTHEN=(WHEN=(5,1,CH,EQ,C'B'), $ MATCH RECORDS
BUILD=(0001,04, $ RDW
2802,95, $ DATA BEFORE ADDRESS1
0201,25, $ REPLACED DATA1 FROM FILE2
2922,25, $ DATA BEFORE ADDRESS2
0251,25, $ REPLACED DATA2 FROM FILE2
2972)), $ REST OF THE FILE VB DATA
IFTHEN=(WHEN=NONE, $ NON-MATCH RECORDS
BUILD=(1,4,2802)) $ BUILD AS-IS
//*
Joined: 09 Mar 2011 Posts: 7309 Location: Inside the Matrix
Yes, the way it is coded you'd need UNPAIRED,F1,F2 and you'd need your code to identify the "on 2 only" (5,1,CH,EQ,C'2') as an IFTHEN=(WHEN= before the IFTHEN=(WHEN=NONE).
You then include, in your BUILD associated with the IFTHEN=(WHEN=, the appropriate fields from the REFORMAT record which have been originally sourced from F2.