Suneetha Pampana
New User
Joined: 29 Jun 2007 Posts: 1 Location: Hyderabad
|
|
|
|
Hello All,
I have a requiremet to compare 2 files of same lrecl. I have to do one to one comparison(like how we will do in Super C) and need to output the different entries in both files along with the file name.
I have gone through different options given in DFSORT&ICETOOL Topic. I have used the JCL code given in the post "http://www.ibmmainframes.com/about33947.html"
But this is accepting and doing compare on only first 80 bytes. But I have to comparison on file with LRECL 491. When I have changed the respective parameters corresponding to 491 as shown below:
//TOOLIN DD *
Code: |
SORT FROM(PREV) USING(CTL1)
SORT FROM(CURR) USING(CTL1)
SELECT FROM(T1) TO(OUT) ON(1,499,CH) NODUPS USING(CTL2)
//CTL1CNTL DD *
SORT FIELDS=(1,491,CH,A)
OUTFIL FNAMES=T1,OVERLAY=(492:SEQNUM,8,ZD,RESTART=(1,491))
//CTL2CNTL DD *
OUTFIL FNAMES=OUT,BUILD=(1,491)
/*
|
It is throwing an error in Sysout as shown below.
SORT FIELDS=(1,491,CH,A)
OUTFIL FNAMES=T1,OVERLAY=(492:SEQNUM,8,ZD,RESTART=(1,491))
*
WER428I CALLER-PROVIDED IDENTIFIER IS "0001"
WER271A OUTFIL STATEMENT : NUMERIC FIELD ERROR
WER211B SYNCSMF CALLED BY SYNCSORT; RC=0000
WER449I SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE
Could you please have a look and resolve my issue.
Along with that I want to output the file name also along with different records in both files. And I have 3 different sets of input files each having different LRECL (491,206,479). I have to do the same kind of comparison for all these files. Can you please help me to accomplish this. |
|
Arun Raj
Moderator
Joined: 17 Oct 2006 Posts: 2481 Location: @my desk
|
|
|
|
Hello,
I am not sure, but from the error description given above, it seems like the problem is caused since a length parameter exceeded its maximum limit. All the control statements used by the OP are supported by even older versions of SyncSort. |
|