bhaskar_kanteti
Active User
Joined: 01 Feb 2007 Posts: 123 Location: Hyderabad
|
|
|
|
Hi,
I had written the job as below for comparing as mentioned.
Code: |
//STEP010 EXEC PGM=SORT
//SORTJNF1 DD *
0001 VICKY
0015 FRANK
0005 CARRIE
0008 HOLLY
0101 DAVID
/*
//SORTJNF2 DD *
A KAREN
D HOLLY
X CARRIE
R VICKY
L MARY
/*
//SORTOUT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=C
//SYSIN DD *
JOINKEYS FILE=F1,FIELDS=(6,6,A)
JOINKEYS FILE=F2,FIELDS=(3,6,A)
JOIN UNPAIRED,F1,ONLY
SORT FIELDS=(6,6,CH,A)
SUM FIELDS=NONE
/*
//
|
The key for first file is from 6th postion 6 charecters.
The key for second file is from 3rd postion 6 charecters.
But i am getting the below error.
Code: |
- CONTROL STATEMENTS FOR 5694-A01, Z/OS DFSORT V1R5
JOINKEYS FILE=F1,FIELDS=(6,6,A)
£
STATEMENT DEFINER ERROR
JOINKEYS FILE=F2,FIELDS=(3,6,A)
£
STATEMENT DEFINER ERROR
JOIN UNPAIRED,F1,ONLY
£
STATEMENT DEFINER ERROR
SORT FIELDS=(6,6,CH,A)
SUM FIELDS=NONE
END OF DFSORT
|
Is this JOIN is not compatable to my SORT. If so how can i acheive this.
Also one more thing. If i want to write match records to one file, records in file 1 not in file 2 to another output file and records in file 2 but not in file 1 to another output file how to change the above job. |
|