View previous topic :: View next topic
|
Author |
Message |
tvkchowdary
New User
Joined: 04 Jul 2006 Posts: 1
|
|
|
|
I wrote new program then I create the bind package then when I submit the job to run this prog it is abending with S013. Can you help me out from this abend.
The JCL:
//OTGADISB JOB (3092105290,CD05,,,RBENSON),RBENSON,CLASS=X
/*ROUTE PRINT STATVIEW
//***********************************************************
//DSNTEP2 EXEC DB2TEST
//SYSTSIN DD *
DSN
RUN PROGRAM(DSNTEP2) PLAN(DSNTEP2)
END
/*
//SYSIN DD *
SET CURRENT SQLID = 'D2TCGAU';
DELETE FROM PLAN_TABLE WHERE PROGNAME = 'WC000300';
/*
//***********************************************************
//BIND EXEC DB2TEST
//SYSTSIN DD DSN=CDCT.OPDB2LIB.PACKLIB(WC000300),DISP=SHR
//*
spool information:
1 DSNTEP2 DB2 00
2 BIND DB2 *S013 |
|
Back to top |
|
|
cpuhawg
Active User
Joined: 14 Jun 2006 Posts: 331 Location: Jacksonville, FL
|
|
|
|
An S013 usually involve a jobs inability to locate a member of a PDS.
Make sure this dataset and member are correctly spelled:
CDCT.OPDB2LIB.PACKLIB(WC000300) |
|
Back to top |
|
|
nhgol
New User
Joined: 10 Oct 2006 Posts: 4
|
|
|
|
An S013 is accompanied by a message IEC141-I that gives you a return code. If you look up that message, it will list the various return codes and will tell you why you couldn't open the file. Maybe BLKSZ wasn't a multiple of LRECL and they were fixed-length records, etc. |
|
Back to top |
|
|
|