I have two file of record length 70.
I need to compare these two files and I need only those records which are present in both the files in a new Dataset.
I tried using ICETOOL but it failed with RC=20, I dont know exactly to debug the program to find the actual error.
When I used SORT with XSUM it failed with the error message as "Use ICETOOL instead".
Can some one help me with the JCL which will do my actual purpose?
Thanks in Advance.
Rupesh.
Using XSUM
- dick scherrer
- Global moderator
- Posts: 6268
- Joined: Sat Jun 09, 2007 8:58 am
Re: Using XSUM
Hello Rupesh and welcome to the forum,
Please post "the rules" you want to implement, a bit of sample input from the 2 files, the output you want from that sample input, and the recfm and lrecl of the files.
Also, please post your current jcl and control statements along with the diagnostic output from the run (be sure to include message ids as well as the message text for review).
The sample data does not need to be large, just sufficient to show all possibilities the process must handle.
Please post "the rules" you want to implement, a bit of sample input from the 2 files, the output you want from that sample input, and the recfm and lrecl of the files.
Also, please post your current jcl and control statements along with the diagnostic output from the run (be sure to include message ids as well as the message text for review).
The sample data does not need to be large, just sufficient to show all possibilities the process must handle.
Hope this helps,
d.sch.
d.sch.
-
- Posts: 20
- Joined: Tue Jun 02, 2009 9:59 am
- Skillset: JCL and COBOL Beginner
- Referer: My Self
- Location: Bangalore
- Contact:
Re: Using XSUM
//S1 EXEC PGM=ICETOOL
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=DS1.COMPLETE,DISP=SHR
//SORTOUT DD DSN=DS2.COMPLETE,DISP=OLD
//SORTXSUM DD DSN=DS3.DUPLI,DISP=OLD
//SYSIN DD *
SORT FIELDS=(1,70,CH,A)
SUM FIELDS=NONE,XSUM
/*
This is the JCL I used.
The Disk Parameters are as follows:
Organization . . . : PS
Record format . . . : FB
Record length . . . : 70
Block size . . . . : 27930
I think this is sufficient to answer my question..
Please do the needful
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=DS1.COMPLETE,DISP=SHR
//SORTOUT DD DSN=DS2.COMPLETE,DISP=OLD
//SORTXSUM DD DSN=DS3.DUPLI,DISP=OLD
//SYSIN DD *
SORT FIELDS=(1,70,CH,A)
SUM FIELDS=NONE,XSUM
/*
This is the JCL I used.
The Disk Parameters are as follows:
Organization . . . : PS
Record format . . . : FB
Record length . . . : 70
Block size . . . . : 27930
I think this is sufficient to answer my question..
Please do the needful
Thanks Always,
-Rupesh.
-Rupesh.
- dick scherrer
- Global moderator
- Posts: 6268
- Joined: Sat Jun 09, 2007 8:58 am
Re: Using XSUM
Hello,
In addition to not posting the "rules" you have not posted the diagnostic info from the run (remember the message ids are important - it doesn't matter if they are important to you - they are important).
Now post the remainder of the requested info.
Until you know how to solve your problems, you should not try to determine what is sufficient. . . .I think this is sufficient to answer my question..
In addition to not posting the "rules" you have not posted the diagnostic info from the run (remember the message ids are important - it doesn't matter if they are important to you - they are important).
Now post the remainder of the requested info.
Hope this helps,
d.sch.
d.sch.
- Frank Yaeger
- Global moderator
- Posts: 1079
- Joined: Sat Jun 09, 2007 8:44 pm
- Skillset: DFSORT, ICETOOL, ICEGENER
- Referer: Search
- Contact:
Re: Using XSUM
DFSORT does not support XSUM, but it can do the same function (and more) with the SELECT operator of ICETOOL. See the "Keep dropped duplicate records (XSUM)" Smart DFSORT Trick at:
http://www.ibm.com/systems/support/stor ... vs/tricks/
The reason you got a RC=20 is that you don't have the correct JCL for ICETOOL. You appear to have just changed your PGM=SORT job to use PGM=ICETOOL instead. That doesn't work. ICETOOL has different JCL as shown in the Smart DFSORT Trick. When you ran your job with PGM=SORT you would have gotten this message:
ICE172A XSUM IS NOT SUPPORTED - USE ICETOOL SELECT IF APPROPRIATE
If you looked up that message, it would have told you how to use ICETOOL correctly:
http://publibz.boulder.ibm.com/cgi-bin/ ... SPTMB00084
http://www.ibm.com/systems/support/stor ... vs/tricks/
The reason you got a RC=20 is that you don't have the correct JCL for ICETOOL. You appear to have just changed your PGM=SORT job to use PGM=ICETOOL instead. That doesn't work. ICETOOL has different JCL as shown in the Smart DFSORT Trick. When you ran your job with PGM=SORT you would have gotten this message:
ICE172A XSUM IS NOT SUPPORTED - USE ICETOOL SELECT IF APPROPRIATE
If you looked up that message, it would have told you how to use ICETOOL correctly:
http://publibz.boulder.ibm.com/cgi-bin/ ... SPTMB00084
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