IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

SYNCTOOL: 2ND AND 3RD copy statements being ignored


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
dcshnier

New User


Joined: 28 Dec 2006
Posts: 27
Location: Baltimore, MD 21215

PostPosted: Wed Mar 07, 2007 3:13 am
Reply with quote

I am running a SPLICE operation that is being preceded by 3 'COPY FROM/OUTREC' operations. However, only the first OUTREC set of statements are being acted on. The 2nd and 3rd set of statements are being ignored and consequently the 2nd and 3rd copy statements are not being formatted. The job is finishing successfully with no errors. However, when I glance at the //DFSMSG SYSOUT, the 2nd and 3rd set of OUTREC statements do not appear. Can anyone help?
Here is the JCL:
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3156
Location: Tucson AZ

PostPosted: Wed Mar 07, 2007 4:39 am
Reply with quote

Jeez, that is UGLY.
Have you checked the manual to see if it might hold a clue?
I'll check mine in the morning.....

Next time, just cut&paste and wrap in "code".....
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix

PostPosted: Wed Mar 07, 2007 5:37 am
Reply with quote

Hello,

Please post all of the sysout from this step as well. Also, check the JES outputs for any additional info and post any messages from the first or third JES otput.
Back to top
View user's profile Send private message
dcshnier

New User


Joined: 28 Dec 2006
Posts: 27
Location: Baltimore, MD 21215

PostPosted: Wed Mar 07, 2007 5:57 am
Reply with quote

Thanks for everyone's input.
In response to Dick's request, attached are the respective //TOOLMSG and //DFSMSG sysouts:

//TOOLMSG
=========
SYT000I SYNCTOOL RELEASE 1.5.2 - COPYRIGHT 2004 SYNCSORT INC.
SYT001I INITIAL PROCESSING MODE IS "STOP"
SYT002I "TOOLIN" INTERFACE BEING USED

COPY FROM(TLIN) TO(THOLD) USING(CPY1)
SYT020I SYNCSORT CALLED WITH IDENTIFIER "0001"
SYT030I OPERATION COMPLETED WITH RETURN CODE 0

COPY FROM(TAIN) TO(THOLD) USING(CPY2)
SYT020I SYNCSORT CALLED WITH IDENTIFIER "0002"
SYT030I OPERATION COMPLETED WITH RETURN CODE 0

COPY FROM(TGIN) TO(THOLD) USING(CPY3)
SYT020I SYNCSORT CALLED WITH IDENTIFIER "0003"
SYT030I OPERATION COMPLETED WITH RETURN CODE 0

SPLICE FROM(THOLD) TO(CLOUT) ON(1,11,CH) WITHEACH -
WITH(30,9) WITH(39,4) KEEPNODUPS
SYT020I SYNCSORT CALLED WITH IDENTIFIER "0004"
SYT031I NUMBER OF RECORDS PROCESSED: 000000000000016
SYT026I NUMBER OF SELECTED RECORDS: 000000000000014
SYT030I OPERATION COMPLETED WITH RETURN CODE 0

SYT004I SYNCTOOL PROCESSING COMPLETED WITH RETURN CODE 0


//DFSMSG
=========
SYNCSORT FOR Z/OS 1.2.2.0NI U.S. PATENTS: 4210961, 5117495 (C) 2005 SYNCSORT INC. DATE=2007/065 TIME=19.15.32
FOR TECH. SUPP. CALL: ESEF 966-4357, MISF 965-7777, ALL OTHERS 410-965-2228 z/OS 1.7.0
PRODUCT LICENSED FOR CPU SERIAL NUMBER 3FB2C, MODEL 2084 319 LICENSE/PRODUCT EXPIRATION DATE: 02 OCT 2007
CPY1CNTL :
OUTREC FIELDS=(1:3,29,30:51X)
PARMLIST :
OPTION RESINV=0,ARESINV=0,MSGDDN=DFSMSG,SORTIN=TLIN,SORTOUT=THOLD,SORTDD=CPY1,CO
PY
WER428I CALLER-PROVIDED IDENTIFIER IS "0001"
WER276B SYSDIAG= 0, 5909883, 5909883, 6745530
WER164B 8,944K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,
WER164B 0 BYTES RESERVE REQUESTED, 3,103,704 BYTES USED
WER146B 20K BYTES OF EMERGENCY SPACE ALLOCATED
WER108I TLIN : RECFM=FB ; LRECL= 80; BLKSIZE= 27920
WER237I OUTREC RECORD LENGTH = 80
WER110I THOLD : RECFM=FB ; LRECL= 80; BLKSIZE= 27920
WER449I SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE
WER416B TLIN : EXCP'S=1,UNIT=3390,DEV=DAFC,CHP=60E070F0,VOL=STEC12
WER416B THOLD : EXCP'S=1,UNIT=3390,DEV=8015,CHP=222AA2AA,VOL=WRKT0I
WER416B TOTAL OF 2 EXCP'S ISSUED FOR COPYING
WER054I RCD IN 6, OUT 6
WER169I RELEASE 1.2 BATCH 0417 TPF LEVEL 2.0
WER052I END SYNCSORT - $XXXXFLD,STEP001,,DIAG=C800,530A,E088,006C,8076,6DA2,22C8,EC64
SYNCSORT FOR Z/OS 1.2.2.0NI U.S. PATENTS: 4210961, 5117495 (C) 2005 SYNCSORT INC. DATE=2007/065 TIME=19.15.32
FOR TECH. SUPP. CALL: ESEF 966-4357, MISF 965-7777, ALL OTHERS 410-965-2228 z/OS 1.7.0
PRODUCT LICENSED FOR CPU SERIAL NUMBER 3FB2C, MODEL 2084 319 LICENSE/PRODUCT EXPIRATION DATE: 02 OCT 2007
CPY2CNTL :
PARMLIST :
OPTION RESINV=0,ARESINV=0,MSGDDN=DFSMSG,SORTIN=TAIN,SORTOUT=THOLD,SORTDD=CPY2,CO
PY
WER428I CALLER-PROVIDED IDENTIFIER IS "0002"
WER276B SYSDIAG= 0, 5909883, 5909883, 6745517
WER164B 6,896K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,
WER164B 0 BYTES RESERVE REQUESTED, 5,176K BYTES USED
WER146B 20K BYTES OF EMERGENCY SPACE ALLOCATED
WER108I TAIN : RECFM=FB ; LRECL= 80; BLKSIZE= 27920
WER110I THOLD : RECFM=FB ; LRECL= 80; BLKSIZE= 27920
WER410B 5,868K BYTES OF VIRTUAL STORAGE AVAILABLE ABOVE THE 16MEG LINE,
WER410B 0 BYTES RESERVE REQUESTED, 5,020K BYTES USED
WER449I SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE
WER416B TAIN : EXCP'S=1,UNIT=3390,DEV=D921,CHP=60E070F0,VOL=STGN33
WER416B BSAM WAS USED FOR THOLD
WER054I RCD IN 3, OUT 3
WER169I RELEASE 1.2 BATCH 0417 TPF LEVEL 2.0
WER052I END SYNCSORT - $XXXXFLD,STEP001,,DIAG=C600,5106,EA88,0066,8E76,688B,2EC8,C464
SYNCSORT FOR Z/OS 1.2.2.0NI U.S. PATENTS: 4210961, 5117495 (C) 2005 SYNCSORT INC. DATE=2007/065 TIME=19.15.32
FOR TECH. SUPP. CALL: ESEF 966-4357, MISF 965-7777, ALL OTHERS 410-965-2228 z/OS 1.7.0
PRODUCT LICENSED FOR CPU SERIAL NUMBER 3FB2C, MODEL 2084 319 LICENSE/PRODUCT EXPIRATION DATE: 02 OCT 2007
CPY3CNTL :
PARMLIST :
OPTION RESINV=0,ARESINV=0,MSGDDN=DFSMSG,SORTIN=TGIN,SORTOUT=THOLD,SORTDD=CPY3,CO
PY
WER428I CALLER-PROVIDED IDENTIFIER IS "0003"
WER276B SYSDIAG= 0, 5909883, 5909883, 6745512
WER164B 6,896K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,
WER164B 0 BYTES RESERVE REQUESTED, 5,176K BYTES USED
WER146B 20K BYTES OF EMERGENCY SPACE ALLOCATED
WER108I TGIN : RECFM=FB ; LRECL= 80; BLKSIZE= 27920
WER110I THOLD : RECFM=FB ; LRECL= 80; BLKSIZE= 27920
WER410B 5,868K BYTES OF VIRTUAL STORAGE AVAILABLE ABOVE THE 16MEG LINE,
WER410B 0 BYTES RESERVE REQUESTED, 5,020K BYTES USED
WER449I SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE
WER416B TGIN : EXCP'S=1,UNIT=3390,DEV=D883,CHP=60E070F0,VOL=STGN2F
WER416B BSAM WAS USED FOR THOLD
WER054I RCD IN 7, OUT 7
WER169I RELEASE 1.2 BATCH 0417 TPF LEVEL 2.0
WER052I END SYNCSORT - $XXXXFLD,STEP001,,DIAG=8A00,51CC,A288,006E,C276,6CE3,22C8,2E64
SYNCSORT FOR Z/OS 1.2.2.0NI U.S. PATENTS: 4210961, 5117495 (C) 2005 SYNCSORT INC. DATE=2007/065 TIME=19.15.32
FOR TECH. SUPP. CALL: ESEF 966-4357, MISF 965-7777, ALL OTHERS 410-965-2228 z/OS 1.7.0
PRODUCT LICENSED FOR CPU SERIAL NUMBER 3FB2C, MODEL 2084 319 LICENSE/PRODUCT EXPIRATION DATE: 02 OCT 2007
PARMLIST :
OPTION RESINV=0,ARESINV=0,MSGDDN=DFSMSG,SORTIN=THOLD,SORTOUT=CLOUT,DYNALLOC,CMP=
CLC,NOVLSHRT,EQUALS
SORT FIELDS=(00001,0011,CH,A)
MODS E35=(SYNCT#35,4096,,N)
WER428I CALLER-PROVIDED IDENTIFIER IS "0004"
WER276B SYSDIAG= 0, 5909883, 5909883, 6745512
WER164B 6,904K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,
WER164B 0 BYTES RESERVE REQUESTED, 6,124K BYTES USED
WER146B 20K BYTES OF EMERGENCY SPACE ALLOCATED
WER108I THOLD : RECFM=FB ; LRECL= 80; BLKSIZE= 27920
WER110I CLOUT : RECFM=FB ; LRECL= 80; BLKSIZE= 27920
WER410B 5,868K BYTES OF VIRTUAL STORAGE AVAILABLE ABOVE THE 16MEG LINE,
WER410B 0 BYTES RESERVE REQUESTED, 5,868K BYTES USED
WER036B G=2094,B=708
WER162B 0 PREALLOCATED SORTWORK TRACKS, 75 DYNAMICALLY ALLOCATED,
WER162B 0 ACQUIRED IN SECONDARY EXTENTS, 0 RELEASED, TOTAL OF 1 TRACKS USED
WER045C END SORT PHASE
WER055I INSERT 14, DELETE 16
WER416B THOLD : EXCP'S=1,UNIT=3390,DEV=8015,CHP=222AA2AA,VOL=WRKT0I
WER416B CLOUT : EXCP'S=1,UNIT=3390,DEV=816F,CHP=222AA2AA,VOL=WRK011
WER416B SORTWK01 : EXCP'S=2,UNIT=3390,DEV=800E,CHP=222AA2AA,VOL=WRKT0P
WER416B TOTAL OF 2 EXCP'S ISSUED FOR SORTWORKS
WER416B TOTAL OF 4 EXCP'S ISSUED FOR SORTING
WER246I FILESIZE 1,280 BYTES
WER054I RCD IN 16, OUT 14
WER072I EQUALS IN EFFECT
WER169I RELEASE 1.2 BATCH 0417 TPF LEVEL 2.0
WER052I END SYNCSORT - $XXXXFLD,STEP001,,DIAG=A400,72DA,8899,24D5,FD66,48C3,8E48,0C64


Back to top
View user's profile Send private message
Devzee

Active Member


Joined: 20 Jan 2007
Posts: 684
Location: Hollywood

PostPosted: Wed Mar 07, 2007 9:05 am
Reply with quote

By looking at your DFSMSG and TOOLMSG all 3 COPY statements are executed.

Quote:
The 2nd and 3rd set of statements are being ignored and consequently the 2nd and 3rd copy statements are not being formatted.


If you are wondering why 2nd and 3rd is not executed then you are wrong. All the statements were executed without any errors or issues.
First copy - 6 lines
Second copy - 3 lines
Third copy - 7
The SPLICe read this 17 lines and processed and gave the output of 14 records.

We really dont know what is your input and what output you are expecting and what's your SPLICE logic.
Back to top
View user's profile Send private message
dcshnier

New User


Joined: 28 Dec 2006
Posts: 27
Location: Baltimore, MD 21215

PostPosted: Wed Mar 07, 2007 6:59 pm
Reply with quote

Thanks for your input. I agree that all 3 copies were executed however, the 2nd and 3rd sets of OUTREC statements associated with the 2nd and 3rd copy statements appeared to have not executed. In other words the 2nd and 3rd copies took place without any associated reformatting taking place. Consequently, the SPLICE operation acted on an inadequately prepared dataset, and the end results were not the intended results. Aside from the fact that the reformatted dataset created by the OUTREC statements does not look as expected, another piece of evidence to this failure, is the DFSMSG sysout. I cut-and-pasted the DFSMSG SYSOUT in my prior post, and if one looks there they will see that by the CPY1CNTL, it displays its associated OUTREC statements (i.e. => OUTREC FIELDS=(1:3,29,30:51X). However, by the CPY2CNTL and CPY3CNTL statements, nothing is displayed, even though my JCL did have separate OUTREC statements for CPY2CNTL and CPY3CNTL. My guess is that SYNCTOOL (or they way I ran it) cannot handle multiple CNTL inputs. Anyway, I have found a work-around using OVERLAY but it is not my preferred solution.
regards dcshnier
Back to top
View user's profile Send private message
Devzee

Active Member


Joined: 20 Jan 2007
Posts: 684
Location: Hollywood

PostPosted: Wed Mar 07, 2007 9:13 pm
Reply with quote

You should post sample records from your input files and expected output files, in that way someone can tell what's the issue with your control card.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts Calling DFSORT from Cobol, using OUTF... DFSORT/ICETOOL 5
No new posts VB to VB copy - Full length reached SYNCSORT 8
No new posts Need COBOL COPY Help in MVS Environment COBOL Programming 4
No new posts Issue after ISPF copy to Linklist Lib... TSO/ISPF 1
No new posts DB2 Table - Image copy unload IBM Tools 2
Search our Forums:

Back to Top