|
|
| Author |
Message |
BhavanaS
New User
Joined: 20 Feb 2008
Posts: 17
Location: India
|
|
|
|
| Code: |
//USN0001 EXEC PGM=IKJEFT1A,DYNAMNBR=20
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSTSIN DD *
DSN SYSTEM(TG01)
RUN PROGRAM(DSNTIAUL) PLAN(DSNTIAUL) PARM('SQL')
/*
//SYSPUNCH DD DSN=A916789.DTS.SUL0001,
// DISP=(,CATLG,DELETE),
// UNIT=SYSGRP,
// SPACE=(CYL,(1000,10),RLSE),
// RECFM=FB,LRECL=1400
//SYSIN DD *
SELECT * FROM PSSA.PS_AAP_ETHNIC_PMPT
WITH UR;
/*
//SYSREC00 DD DSN=A916789.DTS.USN0001,
// DISP=(,CATLG,DELETE),
// UNIT=SYSGRP,
// SPACE=(CYL,(1000,10),RLSE),
// RECFM=FB,LRECL=1400
//SORT1 EXEC PGM=SYNCTOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//IN1 DD DSN=A916789.DTS.SUL0001,DISP=SHR
//T1 DD DSN=&&T1,UNIT=SYSDA,
// SPACE=(CYL,(1000,10)),DISP=(MOD,PASS)
//OUT DD DSN=A916789.DTS.SUL0001,DISP=SHR
//TOOLIN DD *
COPY FROM(IN1) TO(T1) USING(CTL1)
COPY FROM(T1) TO(OUT) USING(CTL2)
/*
//CTL1CNTL DD *
INREC IFTHEN=(WHEN=(7,4,CH,EQ,C'PSSA'),OVERLAY=(81:SEQNUM,4,ZD)),
IFTHEN=(WHEN=(3,4,CH,EQ,C'LOAD'),
OVERLAY=(13:C'RESUME YES LOG NO INDD SYSREC00 INTO TABLE'))
OUTREC IFTHEN=(WHEN=(7,4,CH,EQ,C'PSSA',AND,81,4,ZD,EQ,1),
OVERLAY=(7:C'PSDB'))
/*
//CTL2CNTL DD *
OUTREC FIELDS=(1,80)
/*
|
Can someone tell me how this can be resolved?I |
|
| Back to top |
|
 |
References
|
 Posted: Tue Apr 29, 2008 3:34 pm Post subject: Re: SYNCTOOL S000 U0016 Abend |
|
|
|
|
Gnanas SNG
Senior Member
Joined: 06 Sep 2007
Posts: 416
Location: India
|
|
|
|
Which STEP?
Please add some more details from JOB LOG! |
|
| Back to top |
|
|
BhavanaS
New User
Joined: 20 Feb 2008
Posts: 17
Location: India
|
|
|
|
IEF237I JES2 ALLOCATED TO CTL1CNTL
IEF237I JES2 ALLOCATED TO CTL2CNTL
IEF472I A916789A SORT1 - COMPLETION CODE - SYSTEM=000 USER=0016 REASON=00000000
IEF285I A916789.A916789A.JOB02100.D0000109.? SYSOUT
IEF285I A916789.A916789A.JOB02100.D0000110.? SYSOUT
IGD104I A916789.DTS.SUL0001 RETAINED, DDNAME=IN1
IGD104I A916789.DTS.SUL0001 RETAINED, DDNAME=OUT
Please find the step in which it is abending |
|
| Back to top |
|
|
dbzTHEdinosauer
Senior Member
Joined: 20 Oct 2006
Posts: 1325
Location: germany
|
|
|
|
| and for heavens sakes learn to use BB Code |
|
| Back to top |
|
|
Gnanas SNG
Senior Member
Joined: 06 Sep 2007
Posts: 416
Location: India
|
|
|
|
| Can you find out what error code & message Syncsort issued? |
|
| Back to top |
|
|
BhavanaS
New User
Joined: 20 Feb 2008
Posts: 17
Location: India
|
|
|
|
| Code: |
WER428I CALLER-PROVIDED IDENTIFIER IS "0001"
WER276B SYSDIAG= 430718, 1404541, 1404541, 1667180
WER164B 18,796K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,
WER164B 0 BYTES RESERVE REQUESTED, 3,130,680 BYTES USED
WER146B 12K BYTES OF EMERGENCY SPACE ALLOCATED
WER108I IN1 : RECFM=FB ; LRECL= 80; BLKSIZE= 14000
WER257I INREC RECORD LENGTH = 84
WER238I POTENTIALLY INEFFICIENT USE OF INREC
WER237I OUTREC RECORD LENGTH = 84
WER110I T1 : RECFM=FB ; LRECL= 80; BLKSIZE= 27920
WER462I OUTPUT LRECL DIFFERS FROM SORTOUT LRECL
WER449I SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE |
I hope this is what you had asked for? |
|
| Back to top |
|
|
enrico-sorichetti
Global Moderator
Joined: 14 Mar 2007
Posts: 2527
Location: italy
|
|
|
|
| Code: |
WER237I OUTREC RECORD LENGTH = 84
WER110I T1 : RECFM=FB ; LRECL= 80; BLKSIZE= 27920
WER462I OUTPUT LRECL DIFFERS FROM SORTOUT LRECL |
meditate an fix the mismatch |
|
| Back to top |
|
|
Anuj D.
Senior Member
Joined: 22 Apr 2006
Posts: 1586
Location: Mumbai, India
|
|
|
|
Hi,
Unless I misunderstood, JOB shown unloads a table in a DSN, which is then input to a SORT step to create some type of report. if so, I think this
| Code: |
| //IN1 DD DSN=A916789.DTS.SUL0001 |
should be changed to
| Code: |
| //IN1 DD DSN=A916789.DTS.USN0001 |
Because, the DSN
| Code: |
| A916789.DTS.SUL0001 |
belongs to SYSPUNCH DD name,
| Code: |
| //SYSPUNCH DD DSN=A916789.DTS.SUL0001 |
which after execution of JOB would contain the 'load card' for the table. And a load card for a table will never fit to the criteria used in SORT control cards for the given JOB.
Again unless I misunderstood, please clarify. |
|
| Back to top |
|
|
Craq Giegerich
Senior Member
Joined: 19 May 2007
Posts: 948
Location: Virginia, USA
|
|
|
|
| Changing the load cards is exactly what he is trying to do. |
|
| Back to top |
|
|
Anuj D.
Senior Member
Joined: 22 Apr 2006
Posts: 1586
Location: Mumbai, India
|
|
|
|
| Then certainly I misunderstood, in that case she should show some sample input & expected output, to fetch better suggestions. |
|
| Back to top |
|
|
UmeySan
Senior Member
Joined: 22 Aug 2006
Posts: 624
Location: Germany
|
|
|
|
Hi !
I think, enrico had pinted it out already. Enshuring correct DCB would help. But i'm not certain about using the same DSN for IN1 and OUT.
perhaps better use a sparate DSN for OUT.
Regards, UmeySan |
|
| Back to top |
|
|
|
|
|
