Hi all,
Could anyone please help me to find the cause of this problem:
DFS0613I DBC RGN U113 DUE TO S0C4 U0000 DURING DL/I CALL IN CCTL
CICSPSA2 IMSA
DUMPID=162 REQUESTED BY JOB (CICSPSA2)
DUMP TITLE=CICSPSA2 ABEND SYS 0C4 USER 0000-004, DATE.TIME: 064
.103949, CALLER=DP , TCB=DBT, MODULE=UNKNOWN ,P
DFS629I IMS CTL TCB ABEND - IMS 0113 IMSA
after the abend ,IMS terminates completely!
we use IMS V7R1.
IMS 0C4 DURING DL/I CALL IN CCTL
- dick scherrer
- Global moderator
- Posts: 6268
- Joined: Sat Jun 09, 2007 8:58 am
Re: IMS 0C4
Hello,
To get help you will probably need to provide much more info. . .
How often does this happen? Did this ever work correctly? If yes, what was changed?
Do other similar processes work correctly? If yes, see what is different between the ones that work and this one.
Do you know at what place in the code the problem happened? If not, you may want to add some diagnostic code to help identify where in the code the problem occurs.
To get help you will probably need to provide much more info. . .
How often does this happen? Did this ever work correctly? If yes, what was changed?
Do other similar processes work correctly? If yes, see what is different between the ones that work and this one.
Do you know at what place in the code the problem happened? If not, you may want to add some diagnostic code to help identify where in the code the problem occurs.
Hope this helps,
d.sch.
d.sch.
-
- Global moderator
- Posts: 3805
- Joined: Tue Jan 25, 2011 12:02 am
- Skillset: Easytrieve Plus, Cobol, Utilities, that sort of stuff
- Referer: Google
Re: IMS 0C4 DURING DL/I CALL IN CCTL
How did you get on with this? You have two "DFS" messages to look up, google can find them in a flash.
Something has abended (helpful, aren't I
). Module "unknown" and an S0C4. Look at the dump(s) produced. My wild guess would be something has overwritten some program code. With the dump, you can do better than my wild guess. From the PSW see what was supposed to be being executed. Find the module it was within (if it is all Cobol (and not crashed in an IMS routine), just look backwards from the failing address until you find a Cobol program). If at the failing address it is all space (or low-values, or high-values, or a repeating pattern, or something that is obviously data not program code, which is what there should be where you are looking) then my wild guess came in. If not, you have the dump and the program listings. We'd need more information for more advice.
In this sort of error, the whole of IMS goes down and has to get restarted. Work on the dump, it is a bit of a pain bringing down an IMS region just to see some displays.
Something has abended (helpful, aren't I

In this sort of error, the whole of IMS goes down and has to get restarted. Work on the dump, it is a bit of a pain bringing down an IMS region just to see some displays.
- DFSHDC40
- Posts: 41
- Joined: Sat Oct 16, 2010 4:16 pm
- Skillset: MVS IMS DB2 JCL ISPF REXX ... and all the glue that keeps them together
- Referer: internet
- Location: IMS.SDFSRESL
Re: IMS 0C4 DURING DL/I CALL IN CCTL
IMS hasnt abended S0C4 - CICS has
The application had issued a DL/I call that hadnt completed
IMS recognises a dependednt region (CICS) has gone while in DL/I so abends U0113 to force BO on ERE
Why did CICS abend?
The application had issued a DL/I call that hadnt completed
IMS recognises a dependednt region (CICS) has gone while in DL/I so abends U0113 to force BO on ERE
Why did CICS abend?
If the code hasn't been changed, why is the LKED date today?
-
- Posts: 1
- Joined: Wed Feb 13, 2019 1:25 am
- Skillset: IMS Systems Programmer
- Referer: Internet
Re: IMS 0C4 DURING DL/I CALL IN CCTL
We have an IMS DBCTL connecting to 4 CICS regions. Every time recycling CICS regions would crash the IMS control region with U0113.
Then the automation would re-start the IMS back up. So we could live with that.
Please advise, as an IMS Systems Programmer, what should be done with this situation? or just leave it alone? Thanks!
DFS4445I CMD FROM MCS/E-MCS CONSOLE USERID=AUTAO1SB: DIS CCTL
DFS000I MESSAGE(S) FROM ID=IMSC 675
CCTL STATUS
CIGNDEVT ATTACHED
CIGNCLOM ATTACHED
LTCCLOT1 ATTACHED
CIGNCLOT ATTACHED
*2019042/145945*
DFS3896I ATTEMPTING TO PURGE OLDS BUFFERS IMSC
DFS616I OLDS BUFFERS SUCCESSFULLY PURGED IMSC
DFS629I IMS CTL TCB ABEND - IMS 0113 IMSC
IEA794I SVC DUMP HAS CAPTURED: 924
DUMPID=071 REQUESTED BY JOB (IMSTEST )
DFS3932I IMS DUMP REQUEST COMPLETED - RETURN CODE = 000 IMSC
DUMP TITLE=IMSTEST ABEND SYS 000 USER 0113 , DATE.TIME: 0
.151017, CALLER=CTL , TCB=CTL, MODULE=UNKNOWN ,P
DFS629I IMS CTX TCB ABEND - IMS 4095 IMSC
DFS629I IMS STC TCB ABEND - IMS 4095 IMSC
DFS629I IMS DLG TCB ABEND - IMS 4095 IMSC
DFS629I IMS RDS TCB ABEND - IMS 4095 IMSC
Then the automation would re-start the IMS back up. So we could live with that.

Please advise, as an IMS Systems Programmer, what should be done with this situation? or just leave it alone? Thanks!
DFS4445I CMD FROM MCS/E-MCS CONSOLE USERID=AUTAO1SB: DIS CCTL
DFS000I MESSAGE(S) FROM ID=IMSC 675
CCTL STATUS
CIGNDEVT ATTACHED
CIGNCLOM ATTACHED
LTCCLOT1 ATTACHED
CIGNCLOT ATTACHED
*2019042/145945*
DFS3896I ATTEMPTING TO PURGE OLDS BUFFERS IMSC
DFS616I OLDS BUFFERS SUCCESSFULLY PURGED IMSC
DFS629I IMS CTL TCB ABEND - IMS 0113 IMSC
IEA794I SVC DUMP HAS CAPTURED: 924
DUMPID=071 REQUESTED BY JOB (IMSTEST )
DFS3932I IMS DUMP REQUEST COMPLETED - RETURN CODE = 000 IMSC
DUMP TITLE=IMSTEST ABEND SYS 000 USER 0113 , DATE.TIME: 0
.151017, CALLER=CTL , TCB=CTL, MODULE=UNKNOWN ,P
DFS629I IMS CTX TCB ABEND - IMS 4095 IMSC
DFS629I IMS STC TCB ABEND - IMS 4095 IMSC
DFS629I IMS DLG TCB ABEND - IMS 4095 IMSC
DFS629I IMS RDS TCB ABEND - IMS 4095 IMSC
-
- Global moderator
- Posts: 3025
- Joined: Sun Jul 04, 2010 12:13 am
- Skillset: JCL, PL/1, Rexx, Utilities and to a lesser extent (i.e. I have programmed using them) COBOL,DB2,IMS
- Referer: Google
- Location: Pushing up the daisies (almost)
Re: IMS 0C4 DURING DL/I CALL IN CCTL
Do not tailgate othber ele's topics. Start your own. Topic locked.
The problem I have is that people can explain things quickly but I can only comprehend slowly.
Regards
Nic
Regards
Nic
-
- Similar Topics
- Replies
- Views
- Last post
-
- 1
- 8379
-
by sergeyken
View the latest post
Wed Nov 16, 2022 8:31 pm
-
-
REXX call RACF service IRRSPK00 to generate Pass Tickets
by VladGoodman » Mon Feb 27, 2023 1:11 am » in CLIST & REXX - 4
- 2433
-
by Pedro
View the latest post
Fri Mar 17, 2023 11:40 pm
-
-
-
Call REXX dsn "independently" from ispf panel
by RazVorox » Wed Jun 07, 2023 11:32 am » in CLIST & REXX - 2
- 1827
-
by willy jensen
View the latest post
Wed Jun 07, 2023 1:23 pm
-