Posted: Wed Jul 14, 2004 8:44 am Post subject: U1189 abend using SYNCTOOL
Hi,
I am using the
SYNCTOOL RELEASE 1.4D - COPYRIGHT 2003 SYNCSORT INC.
I get the following abend when I try to use the SYNCTOOL. Has anyone faced a similar problem?Any idea what the problem is.
Thanks,
Marline
ABEND=S000 U1189 REASON=00000767 933.
This is what I get in the TOOLMSG:-
*********************************************************
SYT000I SYNCTOOL RELEASE 1.4D - COPYRIGHT 2003 SYNCSORT INC.
SYT001I INITIAL PROCESSING MODE IS "STOP"
SYT002I "TOOLIN" INTERFACE BEING USED
* ADD "11" IDENTIFIER FOR FILE1 RECORDS.
COPY FROM(FILE1) TO(T1) USING(CTL1)
SYT020I SYNCSORT CALLED WITH IDENTIFIER "0001"
**********************************************************
Kolusu,
No SYSOUT is generated.Only TOOLMSG is generated and the details of which I have already poted.
Thanks,
Marline
Code:
Here is the JCL
//F0090AQT JOB ('BQA'),TIME=(3),USER=F0090AQ,NOTIFY=F0090AQ,
// MSGCLASS=O
//S1 EXEC PGM=SYNCTOOL
//STEPLIB DD DSN=SYSU.SYNCSORT.SORTT11D.SYNCLINK.SYNCTOOL,DISP=SHR
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//FILE1 DD *
VICKY
FRANK
CARRIE
HOLLY
PAUL
/*
//FILE2 DD *
KAREN
HOLLY
CARRIE
VICKY
MARY
/*
//BOTH DD SYSOUT=* OUTPUT FOR RECORDS IN FILE1 AND FILE2
//F1ONLY DD SYSOUT=* OUTPUT FOR RECORDS IN FILE1 ONLY
//F2ONLY DD SYSOUT=* OUTPUT FOR RECORDS IN FILE2 ONLY
//T1 DD DSN=&&T1,DISP=(,PASS),UNIT=SYSDA,SPACE=(TRK,(5,5))
//T2 DD DSN=&&T2,DISP=(,PASS),UNIT=SYSDA,SPACE=(TRK,(5,5))
//CONCT DD DSN=*.T1,VOL=REF=*.T1,DISP=(OLD,DELETE)
// DD DSN=*.T2,VOL=REF=*.T2,DISP=(OLD,DELETE)
//TOOLIN DD *
* ADD "11" IDENTIFIER FOR FILE1 RECORDS.
COPY FROM(FILE1) TO(T1) USING(CTL1)
* ADD "22" IDENTIFIER FOR FILE2 RECORDS.
COPY FROM(FILE2) TO(T2) USING(CTL2)
* SPLICE TO MATCH UP RECORDS AND WRITE THEM TO THEIR
* APPROPRIATE OUTPUT FILES.
* BOTH RECORDS WILL HAVE AN IDENTIFIER OF '12'
* F1ONLY RECORDS WILL HAVE AN IDENTIFIER OF '11'
* F2ONLY RECORDS WILL HAVE AN IDENTIFIER OF '22'
SPLICE FROM(CONCT) TO(BOTH) ON(1,10,CH) WITH(13,1) -
USING(CTL3) KEEPNODUPS
/*
//CTL1CNTL DD *
* MARK FILE1 RECORDS WITH "11"
OUTREC FIELDS=(1,10,12:C"11")
/*
//CTL2CNTL DD *
* MARK FILE2 RECORDS WITH "22"
OUTREC FIELDS=(1,10,12:C"22")
/*
//CTL3CNTL DD *
* WRITE MATCHING RECORDS TO BOTH FILE. REMOVE ID.
OUTFIL FNAMES=BOTH,INCLUDE=(12,2,CH,EQ,C"12"),OUTREC=(1,10)
* WRITE FILE1 ONLY RECORDS TO F1ONLY FILE. REMOVE ID.
OUTFIL FNAMES=F1ONLY,INCLUDE=(12,2,CH,EQ,C"11"),OUTREC=(1,10)
* WRITE FILE2 ONLY RECORDS TO F2ONLY FILE. REMOVE ID.
OUTFIL FNAMES=F2ONLY,INCLUDE=(12,2,CH,EQ,C"22"),OUTREC=(1,10)
/*
Joined: 26 Nov 2002 Posts: 12378 Topics: 75 Location: San Jose
Posted: Wed Jul 14, 2004 9:37 am Post subject:
Marline,
Well you have the following Errors in your JCL
1. Your CTL1CNTL control card has an error. The constant '11' is enclosed in Double quotes instead of single quotes. The same error is on CTL2CNTL & CTL3CNTL also.
2. As far as I know SPLICE operator is not supported by Syncsort. However I see that your synctool version is the latest version than the version we have.
I ran your job with the corrections and this is what I got.
Code:
SYT000I SYNCTOOL RELEASE 1.4C - COPYRIGHT 2002 SYNCSORT INC.
SYT001I INITIAL PROCESSING MODE IS "STOP"
SYT002I "TOOLIN" INTERFACE BEING USED
* ADD "11" IDENTIFIER FOR FILE1 RECORDS.
COPY FROM(FILE1) TO(T1) USING(CTL1)
SYT020I SYNCSORT CALLED WITH IDENTIFIER "0001"
SYT030I OPERATION COMPLETED WITH RETURN CODE 0
* ADD "22" IDENTIFIER FOR FILE2 RECORDS.
COPY FROM(FILE2) TO(T2) USING(CTL2)
SYT020I SYNCSORT CALLED WITH IDENTIFIER "0002"
SYT030I OPERATION COMPLETED WITH RETURN CODE 0
* SPLICE TO MATCH UP RECORDS AND WRITE THEM TO THEIR
* APPROPRIATE OUTPUT FILES.
* BOTH RECORDS WILL HAVE AN IDENTIFIER OF '12'
* F1ONLY RECORDS WILL HAVE AN IDENTIFIER OF '11'
* F2ONLY RECORDS WILL HAVE AN IDENTIFIER OF '22'
SPLICE FROM(CONCT) TO(BOTH) ON(1,10,CH) WITH(13,1) -
USING(CTL3) KEEPNODUPS
SYT048E STATEMENT DOES NOT BEGIN WITH A VALID OPERATOR
SYT030I OPERATION COMPLETED WITH RETURN CODE 12
SYT015I PROCESSING MODE CHANGED FROM "STOP" TO "SCAN" DUE TO OPERATION FAILURE
SYT004I SYNCTOOL PROCESSING COMPLETED WITH RETURN CODE 12
So try to run the following job and post the toolmsg.
Code:
//F0090AQT JOB ('BQA'),TIME=(3),USER=F0090AQ,NOTIFY=F0090AQ,
// MSGCLASS=O
//S1 EXEC PGM=SYNCTOOL
//STEPLIB DD DSN=SYSU.SYNCSORT.SORTT11D.SYNCLINK.SYNCTOOL,DISP=SHR
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//FILE1 DD *
VICKY
FRANK
CARRIE
HOLLY
PAUL
/*
//FILE2 DD *
KAREN
HOLLY
CARRIE
VICKY
MARY
/*
//BOTH DD SYSOUT=* OUTPUT FOR RECORDS IN FILE1 AND FILE2
//F1ONLY DD SYSOUT=* OUTPUT FOR RECORDS IN FILE1 ONLY
//F2ONLY DD SYSOUT=* OUTPUT FOR RECORDS IN FILE2 ONLY
//T1 DD DSN=&&T1,DISP=(,PASS),UNIT=SYSDA,SPACE=(TRK,(5,5))
//T2 DD DSN=&&T2,DISP=(,PASS),UNIT=SYSDA,SPACE=(TRK,(5,5))
//CONCT DD DSN=*.T1,VOL=REF=*.T1,DISP=(OLD,DELETE)
// DD DSN=*.T2,VOL=REF=*.T2,DISP=(OLD,DELETE)
//TOOLIN DD *
* ADD "11" IDENTIFIER FOR FILE1 RECORDS.
COPY FROM(FILE1) TO(T1) USING(CTL1)
* ADD "22" IDENTIFIER FOR FILE2 RECORDS.
COPY FROM(FILE2) TO(T2) USING(CTL2)
* SPLICE TO MATCH UP RECORDS AND WRITE THEM TO THEIR
* APPROPRIATE OUTPUT FILES.
* BOTH RECORDS WILL HAVE AN IDENTIFIER OF '12'
* F1ONLY RECORDS WILL HAVE AN IDENTIFIER OF '11'
* F2ONLY RECORDS WILL HAVE AN IDENTIFIER OF '22'
SPLICE FROM(CONCT) TO(BOTH) ON(1,10,CH) WITH(13,1) -
USING(CTL3) KEEPNODUPS
/*
//CTL1CNTL DD *
* MARK FILE1 RECORDS WITH "11"
OUTREC FIELDS=(1,10,12:C'11')
/*
//CTL2CNTL DD *
* MARK FILE2 RECORDS WITH "22"
OUTREC FIELDS=(1,10,12:C'22')
/*
//CTL3CNTL DD *
* WRITE MATCHING RECORDS TO BOTH FILE. REMOVE ID.
OUTFIL FNAMES=BOTH,INCLUDE=(12,2,CH,EQ,C'12'),OUTREC=(1,10)
* WRITE FILE1 ONLY RECORDS TO F1ONLY FILE. REMOVE ID.
OUTFIL FNAMES=F1ONLY,INCLUDE=(12,2,CH,EQ,C'11'),OUTREC=(1,10)
* WRITE FILE2 ONLY RECORDS TO F2ONLY FILE. REMOVE ID.
OUTFIL FNAMES=F2ONLY,INCLUDE=(12,2,CH,EQ,C'22'),OUTREC=(1,10)
/*
Kolusu,
I ran the JCL with the correct control cards (as mentioned by you).I still get the same error in the TOOLMSG
*************************************************************
SYT000I SYNCTOOL RELEASE 1.4D - COPYRIGHT 2003 SYNCSORT INC.
SYT001I INITIAL PROCESSING MODE IS "STOP"
SYT002I "TOOLIN" INTERFACE BEING USED
* ADD '11' IDENTIFIER FOR FILE1 RECORDS.
COPY FROM(FILE1) TO(T1) USING(CTL1)
SYT020I SYNCSORT CALLED WITH IDENTIFIER "0001"
*************************************************************
Our mainframe shop does not have DFSORT.Can I incorporate the functionality of SPLICE in SYNCSORT itself?
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum
FAQ
Search
Quick Manuals
Register
Profile
Log in to check your private messages
Log in
