Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

S0C4 UNEXPECTED SYSTEM ERROR HANDLED

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> ABENDS & Debugging
View previous topic :: :: View next topic  
Author Message
Michael Angelo Pagala

New User


Joined: 02 Mar 2007
Posts: 34
Location: somewhere in the middle

PostPosted: Wed Aug 18, 2010 1:11 pm    Post subject: S0C4 UNEXPECTED SYSTEM ERROR HANDLED
Reply with quote

Hi guys,

I tried checking the listing and pinpoint where is the problem but I can't figure out why am I missing.

The abend occurs when calling the batch module called the utility module.

statement 28659 at compile unit offset +00021A58 at entry offset +00021A58 at address 3CB44E80

Code:
028659  ADD                                                                     
   021A54  5820 9BAC               L     2,2988(0,9)             BLL=5         
   021A58  D201 DDB8 20BD          MVC   3512(2,13),189(2)       TS2=16         
   021A5E  960F DDB9               OI    3513(13),X'0F'          TS2=17         
   021A62  5830 C03C               L     3,60(0,12)              CBL=3         
   021A66  FA10 DDB8 3767          AP    3512(2,13),1895(1,3)    TS2=16         
   021A6C  D201 20BD DDB8          MVC   189(2,2),3512(13)       CDA-LEVEL-INDEX
   021A72  960F 20BE               OI    190(2),X'0F'            CDA-LEVEL-INDEX


CDA-LEVEL-INDEX is defined as
CDA-LEVEL-INDEX PIC 9(03) COMP-3

Code:
028659                    ADD 1          TO  CDA-LEVEL-INDEX.


value of CDA-LEVEL-INDEX before the call
CDA-LEVEL-IDX: 001

any inputs is appreciated..If the date I have given is insufficient please tell me and I will try to provide it.
Back to top
View user's profile Send private message

Michael Angelo Pagala

New User


Joined: 02 Mar 2007
Posts: 34
Location: somewhere in the middle

PostPosted: Wed Aug 18, 2010 1:51 pm    Post subject:
Reply with quote

I cannot edit my message. I just want to correct the message of my typo errors.

Hi guys,

I tried checking the listing and pinpoint where is the problem but I can't figure out what am I missing.

The abend occurs when the batch module called the utility module.

this is from the called module

statement 28659 at compile unit offset +00021A58 at entry offset +00021A58 at address 3CB44E80
Code:

028659  ADD                                                                     
   021A54  5820 9BAC               L     2,2988(0,9)             BLL=5         
   021A58  D201 DDB8 20BD          MVC   3512(2,13),189(2)       TS2=16         
   021A5E  960F DDB9               OI    3513(13),X'0F'          TS2=17         
   021A62  5830 C03C               L     3,60(0,12)              CBL=3         
   021A66  FA10 DDB8 3767          AP    3512(2,13),1895(1,3)    TS2=16         
   021A6C  D201 20BD DDB8          MVC   189(2,2),3512(13)       CDA-LEVEL-INDEX
   021A72  960F 20BE               OI    190(2),X'0F'            CDA-LEVEL-INDEX



CDA-LEVEL-INDEX is defined as
CDA-LEVEL-INDEX PIC 9(03) COMP-3

this is the statement where the error occured

Code:
028659                    ADD 1          TO  CDA-LEVEL-INDEX.


value of CDA-LEVEL-INDEX before the call
CDA-LEVEL-IDX: 001

I will try to put some displays on the called module to check whether I am passing invalid values on the linkage.
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Wed Aug 18, 2010 2:08 pm    Post subject:
Reply with quote

Basically a SOC4 is when you are attempting to modify storage outside of your authorized space.

so, where is CDA-LEVEL-IDX defined? (in both modules)
where is the ADD statement defined?

what does the CALL look like?
what does the PROCEDURE DIVISION USING statement look like?

does the structure containing CDA-LEVEL-IDX in the CALLed module
receive addressability via the PROC-DIV USING statement?

a display of CDA-LEVEL-IDX will just give you a SOC4.
Back to top
View user's profile Send private message
Michael Angelo Pagala

New User


Joined: 02 Mar 2007
Posts: 34
Location: somewhere in the middle

PostPosted: Wed Aug 18, 2010 2:49 pm    Post subject:
Reply with quote

The CDA-LEVEL-IDX is defined for both

the add statement is on the beginning of the called module

the call uses three copybooks (in order) which are the same in the linkage and procedure divison of the called module

I check the dump again..looks something is misaligned in the linkage.

I will try to find out what.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> ABENDS & Debugging All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Need help with below DB2 error ashek15 DB2 3 Sat Mar 18, 2017 5:56 am
No new posts FINDREP Syntax Error seahawk789 DFSORT/ICETOOL 4 Thu Mar 09, 2017 10:11 pm
No new posts INVOKE WEBSERVICE error danik56 CICS 11 Thu Mar 09, 2017 11:52 am
No new posts Row not found Sql error GaganGarg DB2 7 Tue Mar 07, 2017 6:29 am
No new posts Overlay the system date Danielle.Filteau SYNCSORT 4 Fri Mar 03, 2017 1:16 am


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us