Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Getting SOC4 abend and not able to figure out the solution

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
baljinders

New User


Joined: 21 Aug 2006
Posts: 72

PostPosted: Sun May 09, 2010 7:39 am    Post subject: Getting SOC4 abend and not able to figure out the solution
Reply with quote

Hi Everyone,

I am getting SOC4 abend and not able to figure out the solution.

SYSTEM COMPLETION CODE=0C4 REASON CODE=00000010


when i go into abend -aid, i see this message for a production file i am using as input.

Code:
File errors ...(ACB)  return code = 000 (X'00')                       
                         All data sets were opened successfully.       
                      Reason code = 000 (X'00')                       
                         No error.                                     
            ...(RPL)  return code = 008 (X'08')                       
                         Logical error; specific error is indicated   
                         in feedback field in the RPL.                 
                      Reason code = 016 (X'10')                       
                         Record not found.             


Code:
Current key:                                                           
                                                                       
379C2940   CHAR  00146146990                                           
           ZONE  FFFFFFFFFFF                                           
          DIGIT  00146146990                                           
                 1...5...10.                                           
                                                                       
Current record:                                                         
                                                                       
  The current record is not available because the record was not found.
                                                                       
Previous record:                                                       
                                                                       
  No previous record for skip sequential or random processing.         
Data Component:   



I have verified that all the DD names are correct and matching with the assign clause.

Let me know what approach i need to follow to get this corrected ?
Back to top
View user's profile Send private message

dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Sun May 09, 2010 8:13 am    Post subject:
Reply with quote

Hello,

Suggest you determine which instruction is causing the 0c4. Once you know the instruction, you can correct the problem.

What kind of program is this? Not just COBOL, but what does it do?
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8165
Location: East Dubuque, Illinois, USA

PostPosted: Sun May 09, 2010 6:06 pm    Post subject:
Reply with quote

For a S0C4 abend, Abend Aid puts out a very nice listing that includes the most common causes of the abend. Based on the instruction that is abending, you can use the listing to rule out possible causes until you find out what the problem is.

You could also start by looking at the code for the input file. If a record is not found, and your program attempted to access the record (or any part of it) ANYWAY, you could easily get a S0C4 abend by doing so.
Back to top
View user's profile Send private message
baljinders

New User


Joined: 21 Aug 2006
Posts: 72

PostPosted: Mon May 10, 2010 11:13 pm    Post subject:
Reply with quote

The problem was because of one of the input file. Now the problem has been resolved.

Thanks Guys...
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Mon May 10, 2010 11:30 pm    Post subject:
Reply with quote

Hello,

Quote:
The problem was because of one of the input file. Now the problem has been resolved.
Good to hear it is working, but what problem was found with "one of the inpout file"?

If you post the cause/solution, it will help someone else. . .
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 -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts ASP3 ABEND IN CICS Vedant CICS 0 Fri Oct 20, 2017 3:18 pm
No new posts C03 ABEND sjiraga PL/I & Assembler 1 Thu Jun 01, 2017 4:51 pm
No new posts IMS region inactive - User abend code... gthmrj IMS DB/DC 5 Tue Mar 07, 2017 12:29 pm
No new posts IMS BMP program causes 878 system abend Artemk IMS DB/DC 7 Tue Nov 22, 2016 8:26 pm
No new posts abend sort based on count records in ... anatol DFSORT/ICETOOL 5 Mon Oct 17, 2016 10:10 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us