hi there,
i'd like to compare 2 files and write an output file containing only one column with all the unpaired keys in both files.
i'd would like a file like this:
Code:
AAA
CCC
EEE
the code below produces a file with 2 columns, like this:
Joined: 15 Feb 2005 Posts: 7129 Location: San Jose, CA
Here's a DFSORT JOINKEYS job that will do what you asked for (you didn't show what's in the EVTSRT01 member, so I ignored it. If you need something in there, show what you need.
Joined: 07 Dec 2007 Posts: 2205 Location: San Jose
jctgf,
? indicates a 1-byte indicator is to be included in each joined record. The indicator will be set to one of the following values in each paired or unpaired joined record, as appropriate:
'B' - the key was found in F1 and F2.
'1' - the key was found in F1, but not in F2.
'2' - the key was found in F2, but not in F1.
Display Filter View Print Options Help
-------------------------------------------------------------------------------
DESA OUTPUT DISPLAY J9487777 JOB08967 DSID 108 LINE 1 COLUMNS 02- 81
COMMAND INPUT ===> SCROLL ===> CSR
SYNCSORT FOR Z/OS 1.3.2.1N U.S. PATENTS: 4210961, 5117495 (C) 2007 SYNCSO
z/OS 1.11.0
$ORTPARM : VSCORET=40M
OPTION MAINSIZE=40M
SYSIN :
JOINKEYS FILE=F1,FIELDS=(1,3,A),SORTED
JOINKEYS FILE=F2,FIELDS=(1,3,A),SORTED
JOIN UNPAIRED,ONLY
REFORMAT FIELDS=(F1:1,3,F2:1,3,?)
*
OPTION COPY
OUTFIL IFTHEN=(WHEN=(7,1,CH,EQ,C'1'),BUILD=(1,3)),
IFTHEN=(WHEN=(7,1,CH,EQ,C'2'),BUILD=(4,3))
WER903I SYNCSORT 1.3.2.1 IS NOT LICENSED FOR SERIAL 104AF, TYPE 2094 741, LPAR
WER903I PRODUCT WILL STOP WORKING IN 36 DAYS UNLESS A VALID KEY IS INSTALLED.
WER161B ALTERNATE PARM USED
WER268A REFORMAT STATEMENT: SYNTAX ERROR
WER211B SYNCSMF CALLED BY SYNCSORT; RC=0000
WER449I SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE
******************************** BOTTOM OF DATA ********************************
Joined: 15 Feb 2005 Posts: 7129 Location: San Jose, CA
Since you originally posted in the DFSORT Forum, we assumed you were using DFSORT and gave you a solution that works fine with DFSORT. However, the WER messages indicate you're using Syncsort, not DFSORT.
Please post Syncsort questions in the JCL Forum in the future.
Joined: 01 Dec 2006 Posts: 792 Location: Pennsylvania
Quote:
usually, the syntax is the same.
Should this be translated to? 'Thank you so much for spending your own free time on this. I am so sorry I wasted your time.'
Quote:
could someone tell me how to do this via syncsort, please?
Should this be translated to? 'Eventhough the syntax is the same, and I could probably take this from here... Could someone else please do my work for me?'
Should this be translated to? 'Eventhough the syntax is the same, and I could probably take this from here... Could someone else please do my work for me?'
no, your interpretation is mistaken.
i've posted a solution (didn't you see?) that works, but would like to know if some one else has a better suggestion.
that's all.
thanks.
Start NewTopic
Start a new topic to post your queries. Do not ask your doubts as a reply to another post. Posts are to be made in relevant category/Forum. If you can't find one, post in Other Mainframe topics(e.g. Do not post SQL queries in COBOL Forum).
and tagging questions to a 1 year old topic will not help either
