|
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 |
|
|
|
|
