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

S0C4 Reason code 4


IBM Mainframe Forums -> ABENDS & Debugging
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
defields9

New User


Joined: 25 Mar 2006
Posts: 4

PostPosted: Wed May 24, 2006 9:59 pm
Reply with quote

I'm getting the following S0C4 with a reason code of 4. Need help with understanding the reason.

IEA995I SYMPTOM DUMP OUTPUT 497
SYSTEM COMPLETION CODE=0C4 REASON CODE=00000004
TIME=17.25.02 SEQ=36979 CPU=0000 ASID=0053
PSW AT TIME OF ERROR 078D2000 00007C1E ILC 6 INTC 04
ACTIVE LOAD MODULE ADDRESS=00007970 OFFSET=000002AE
NAME=CHIOP
DATA AT PSW 00007C18 - F0F0C610 00084100 00808900
GR 0: FD00002E 1: A0007BFC
2: 80006FD6 3: 0000000F
4: 00007EB8 5: 00006FEF
6: 00007F8E 7: FD000000
8: 008EAF88 9: 008EABE0
A: 00000000 B: 008FFD90
C: 00E21B0A D: 00007970
E: 80FCB260 F: 00000008
END OF SYMPTOM DUMP
IEF450I STCIODR STCIODR - ABEND=S0C4 U0000 REASON=00000004 499


At offset 2AE in my program I find...

0002A8 148+IHB0009A DS 0H
0002A8 0A23 149+ SVC 35
150 ABEND 8,DUMP
0002AA 151+ DS 0H
0002AA 4110 0008 00008 154+ LA 1,8
0002AE 4100 0080 00080 155+ LA 0,128(0,0)
0002B2 8900 0018 00018 156+ SLL 0,24(0)
0002B6 1610 157+ OR 1,0
0002B8 0A0D 158+ SVC 13
0002BA 159 ENDTAB DS 0H
0002BA 9240 D574 00574 160 CLNALL MVI LINE,C' '
0002BE D24E D575 D574 00575 00574 161 MVC LINE+1(79),LINE
162 OPEN (IN,(INPUT))

I don't think this is valid.
any thoughts?
Back to top
View user's profile Send private message
rajandhla

Active User


Joined: 18 Oct 2005
Posts: 182
Location: Luton UK

PostPosted: Thu May 25, 2006 9:15 pm
Reply with quote

popular post check out in the forum............
Back to top
View user's profile Send private message
Bharanidharan

New User


Joined: 20 Jun 2005
Posts: 86
Location: Chennai, India

PostPosted: Mon May 29, 2006 11:13 am
Reply with quote

Could you give the associated source instructions (I assume that source is assembler)?

I faked a dummy abend using the instructions that seems to be in your source (SVC 35 from your listing means it has to be a WTO/WTOR):
Code:

MVC   TXT(7),=C'SUCCESS'
WTO   TEXT=MSG         
ABEND 8,DUMP           
....
MSG    DC    AL2(80)
TXT    DS    CL80   

Now this abended with U0008 as I expected. So I am not quite sure why it would raise a S0C4 in your case.
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 run rexx code with jcl CLIST & REXX 15
No new posts Compile rexx code with jcl CLIST & REXX 6
No new posts Reorg abended with REASON=X'00E40347' DB2 2
No new posts REASON 00D70014 in load utility DB2 6
No new posts REXX code to expand copybook in a cob... CLIST & REXX 2
Search our Forums:

Back to Top