Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

SYNCTOOL S000 U0016 Abend

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
BhavanaS

New User


Joined: 20 Feb 2008
Posts: 17
Location: India

PostPosted: Tue Apr 29, 2008 3:34 pm    Post subject: SYNCTOOL S000 U0016 Abend
Reply with quote

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
View user's profile Send private message

Gnanas N

Active Member


Joined: 06 Sep 2007
Posts: 785
Location: Chennai, India

PostPosted: Tue Apr 29, 2008 3:37 pm    Post subject:
Reply with quote

Which STEP?

Please add some more details from JOB LOG!
Back to top
View user's profile Send private message
BhavanaS

New User


Joined: 20 Feb 2008
Posts: 17
Location: India

PostPosted: Tue Apr 29, 2008 3:48 pm    Post subject: Reply to: I am getting an S000 U0016 Abend with the followin
Reply with quote

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
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Tue Apr 29, 2008 3:50 pm    Post subject:
Reply with quote

and for heavens sakes learn to use BB Code
Back to top
View user's profile Send private message
Gnanas N

Active Member


Joined: 06 Sep 2007
Posts: 785
Location: Chennai, India

PostPosted: Tue Apr 29, 2008 3:57 pm    Post subject:
Reply with quote

Can you find out what error code & message Syncsort issued?
Back to top
View user's profile Send private message
BhavanaS

New User


Joined: 20 Feb 2008
Posts: 17
Location: India

PostPosted: Tue Apr 29, 2008 4:08 pm    Post subject: Reply to: I am getting an S000 U0016 Abend with the followin
Reply with quote

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
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10210
Location: italy

PostPosted: Tue Apr 29, 2008 4:10 pm    Post subject: Reply to: I am getting an S000 U0016 Abend with the followin
Reply with quote

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
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Wed Apr 30, 2008 12:44 am    Post subject:
Reply with quote

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
View user's profile Send private message
Craq Giegerich

Senior Member


Joined: 19 May 2007
Posts: 1512
Location: Virginia, USA

PostPosted: Wed Apr 30, 2008 1:03 am    Post subject:
Reply with quote

Changing the load cards is exactly what he is trying to do.
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Wed Apr 30, 2008 1:49 am    Post subject:
Reply with quote

Then certainly I misunderstood, in that case she should show some sample input & expected output, to fetch better suggestions.
Back to top
View user's profile Send private message
UmeySan

Active Member


Joined: 22 Aug 2006
Posts: 743
Location: Germany

PostPosted: Wed Apr 30, 2008 2:21 pm    Post subject:
Reply with quote

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
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts IMS BMP program causes 878 system abend Artemk IMS DB/DC 7 Tue Nov 22, 2016 8:26 pm
No new posts abend sort based on count records in ... anatol DFSORT/ICETOOL 5 Mon Oct 17, 2016 10:10 pm
No new posts hot to get details when "EXEC CI... Andi1982 CICS 11 Tue Sep 20, 2016 5:01 pm
No new posts S213-14 ABEND explantion Apurva Mehta JCL & VSAM 5 Thu Jul 07, 2016 10:56 pm
No new posts How to determine where is error in ab... jackzhang75 PL/I & Assembler 13 Fri Apr 15, 2016 2:01 am


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us