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

System abend S413 return code 1C
IBM Mainframe Forums -> ABENDS & Debugging
Post new topic   Reply to topic Quick References
View previous topic :: View next topic  
Author Message
Saradha Ramalingam

New User


Joined: 04 Jan 2007
Posts: 23
Location: Chennai
PostPosted: Tue Oct 14, 2008 4:28 pm
 Reply with quote
Hi,
I encountered a system abend S413-1C while running a job. A dataset is created in the first step and the same dataset is accessed as input in the second step. the job abends in teh second step with abend code S413 and reason code 1C. I am not able to locate the reason for the abend. I have not specified any vol serial in the JCL. Has anybody encountered a similar abend and found a solution? A quick response wil be much appreciated.


Thanks in advance
Saradha.
Back to top
View user's profile Send private message
gcicchet

Senior Member


Joined: 28 Jul 2006
Posts: 1702
Location: Australia
PostPosted: Tue Oct 14, 2008 4:33 pm
 Reply with quote
Hi,

the response will be quicker if you can post the JCL used and the job log output.


Gerry
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales
PostPosted: Tue Oct 14, 2008 4:45 pm
 Reply with quote
Quote:
I am not able to locate the reason for the abend.


Why, do you NOT have any manuals at your shop ?

Quote:

413

Explanation: The error occurred during processing of an OPEN macro instruction for a data set on magnetic tape or on a direct access device. This system completion code is accompanied by message IEC145I. Refer to the explanation of message IEC145I for complete information about the task that was ended and for an explanation of the return code (rc in the message text) in register 15.
Application Programmer Response: Respond as indicated for message IEC145I.

System Programmer Response: If the error recurs and the program is not in error, look at the messages in the job log for more information. Search problem reporting data bases for a fix for the problem. If no fix exists, contact the IBM Support Center. Provide the JCL and the program listing for the job.

Source: DFSMSdfp
Back to top
View user's profile Send private message
Saradha Ramalingam

New User


Joined: 04 Jan 2007
Posts: 23
Location: Chennai
PostPosted: Tue Oct 14, 2008 5:05 pm
 Reply with quote
Code:

//STEP010  EXEC  PGM=NWOMC,
//         REGION=4096K   
//DD01 DD DSN=TWUST.CBS.TWUSL06A.T.OPTCLS.CYC0T2.DIM.JUL08,
//             DISP=(NEW,CATLG,DELETE),                     
//             RECFM=FB,                                     
//             LRECL=660,                                   
//             DATACLAS=HUGE                               


Above is the step which creates the dataset.This dataset is used in an IMs program.

Code:

//STEP020  EXEC  PGM=DFSRRC00,
//        PARM=(DLI,TWAOPTD1,TWAOPTD1,,,,,,,,,IMSN,,Y,N,,,,DB2D)
//STEP020.TWOPDM2O  DD DSN=TWUST.CBS.TWUSL06A.T.OPTCLS.CYC0T2.DIM.JUL08,
//        DISP=(MOD,CATLG,CATLG)                                   


I hope the above data is sufficient

Thanks,
Saradha
Back to top
View user's profile Send private message
gcicchet

Senior Member


Joined: 28 Jul 2006
Posts: 1702
Location: Australia
PostPosted: Tue Oct 14, 2008 5:15 pm
 Reply with quote
Hi,

you need to show the listing from the run


Gerry
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: Tue Oct 14, 2008 10:21 pm
 Reply with quote
Hello,

Code:
//STEP020.TWOPDM2O  DD DSN=TWUST.CBS.TWUSL06A.T.OPTCLS.CYC0T2.DIM.JUL08,
//        DISP=(MOD,CATLG,CATLG)   
While not the cause of the 413 abend, this DD should not use CATLG, CATLG as the dataset has already been cataloged. KEEP, KEEP would be a better choice.
Back to top
View user's profile Send private message
gcicchet

Senior Member


Joined: 28 Jul 2006
Posts: 1702
Location: Australia
PostPosted: Wed Oct 15, 2008 3:16 am
 Reply with quote
Hi Dick,

if I remember correctly, DISP=(MOD,CATLG) had to be used if the dataset extended beyond the first CATALOGED volume, in other words, it had to RECATALOG the dataset to add the additional volume(s), this was probably pre SMS.


Gerry
Back to top
View user's profile Send private message
Anuj Dhawan

Superior Member


Joined: 22 Apr 2006
Posts: 6250
Location: Mumbai, India
PostPosted: Wed Oct 15, 2008 4:12 am
 Reply with quote
Saradha ,

I would assume that STEP010, EXECuting PGM NWOMC, pre-allocates the file which is being used in IMS program , so that IMS program doesn't abend because of the absence of the the DSN.

So, I would suggest -

- Try using SHR in DISP for that DSN in step20 And
- execute the STEP10 with UNIT=DASD or TAPE along with other DCB info.
Back to top
View user's profile Send private message
Saradha Ramalingam

New User


Joined: 04 Jan 2007
Posts: 23
Location: Chennai
PostPosted: Wed Oct 15, 2008 12:11 pm
 Reply with quote
Thanks for your responses.

The joblog is as below.

Code:

+BMC150139I AR/CTL RESTART FOR TWUSL06A, STEP2   , STEP020 , TWAOPTD1, AND TWAOPTD1 AT NC000002 2008/288
         03:14:31.78                                                           
IEC145I 413-1C,IFG0193A,TWUSL06A,STEP020,TWOPDM2O,BB1F,MIZAB5,TWUST.CBS.TWUSL06A.T.OPTCLS.CYC0T2.DIM.JUL08
+DFS629I IMS BATCH REGION ABEND- SYS 0413  IMSN                                 
+DFS629I PSW AT ERROR = 075C1000 80E1AD96  IMSN                                 
IEC205I IEFRDER,TWUSL06A,STEP020,FILESEQ=1, COMPLETE VOLUME LIST,  033         
DSN=TWUST.CBS.IM.TWUSL06A.LOG.TWAOPTD1.G0001V00,VOLS=AN7033,                   
TOTALBLOCKS=2                                                                   
+DFS092I IMS LOG TERMINATED    IMSN                                             
+ BMC44009I DI+ TERMINATION COMPLETE 


In the IMS step, the file is used as output. So I think we cannot use DISP=SHR here.
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 -> ABENDS & Debugging

 

Similar Topics
Topic Forum Replies
No new posts Sysplex System won't IPL at DR site I... All Other Mainframe Topics 2
No new posts run rexx code with jcl CLIST & REXX 15
No new posts Compile rexx code with jcl CLIST & REXX 6
No new posts ISAM and abend S03B JCL & VSAM 10
No new posts Return codes-Normal & Abnormal te... JCL & VSAM 7
Search our Forums:

Back to Top
IBMMainframes.com is not an official and/or affiliated with IBM® in anyway
Board Rules | FAQ | Downloads | Wiki | SiteMap | Contact Us