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 with reason code 11

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

New User


Joined: 23 Apr 2005
Posts: 39
Location: delhi

PostPosted: Tue Jun 30, 2009 6:18 pm    Post subject: S0C4 with reason code 11
Reply with quote

Hi,

I am getting S0C4 abend while opening a FB file in I-O mode. Can anybody explain what could be the pronlem is?

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

Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Tue Jun 30, 2009 6:25 pm    Post subject:
Reply with quote

Please be more cryptic or post the sysout messages.
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7913
Location: Bellevue, IA

PostPosted: Tue Jun 30, 2009 6:28 pm    Post subject:
Reply with quote

S0C4 reason code 11 from the System Codes manual:
Quote:
11
Page-translation exception. This error is caused by one of the following:

* A program that was running disabled attempted to reference storage while that storage was paged out. To correct the error, page-fix the storage before a program running disabled attempts to reference it.

* A program attempted to reference storage that had not been obtained. To correct the error, allocate the storage before attempting to reference it.

* A program running in a subspace attempted to reference storage that was not accessible to the subspace at the time of error. To correct the error, ensure that the program running in a subspace references only the storage assigned to that subspace, or storage that can be referenced by all subspaces.

* SMS abend. The reason code is X'12C'.
Could you be attempting to use the buffer before opening the file?
Back to top
View user's profile Send private message
sreenivasreddyg

New User


Joined: 23 Apr 2005
Posts: 39
Location: delhi

PostPosted: Tue Jun 30, 2009 6:42 pm    Post subject:
Reply with quote

Yes, I am using REGION=0M but still I am getting the problem.
Back to top
View user's profile Send private message
sreenivasreddyg

New User


Joined: 23 Apr 2005
Posts: 39
Location: delhi

PostPosted: Tue Jun 30, 2009 6:46 pm    Post subject:
Reply with quote

Please find the dump below.

Code:
IEA995I SYMPTOM DUMP OUTPUT  715                                     
SYSTEM COMPLETION CODE=0C4  REASON CODE=00000011                     
 TIME=08.55.54  SEQ=29474  CPU=0000  ASID=0111                       
 PSW AT TIME OF ERROR  078C1000   873E66C2  ILC 4  INTC 11           
   NO ACTIVE MODULE FOUND                                             
   NAME=UNKNOWN                                                       
   DATA AT PSW  073E66BC - 1B22BF27  70019102  20304780               
   AR/GR 0: 90772EDE/00000000_00000000   1: 00000000/00000000_7F5BDD98
         2: 00000000/00000000_00F08A00   3: 00000000/00000000_873E65A2
         4: 00000000/00000000_0099E410   5: 00000000/00000000_00E6C000
         6: 00000000/00000000_0099E74C   7: 00000000/00000000_0099E7A4
         8: 00000000/00000000_0099E6B0   9: 00000000/00000000_0192F7A0
         A: 00000000/00000000_009CB8E8   B: 00000000/00000000_0099E77C
         C: 00000000/00000000_00000001   D: 00000000/00000000_0099E6D0
         E: 00000000/00000000_873E668E   F: 00000002/00000010_00000000
 END OF SYMPTOM DUMP                                                 
IEF450I HUSER37 INS037EX - ABEND=S0C4 U0000 REASON=00000011  716


Edited: Please use BBcode when You post some code/error, that's rather readable, Thanks... Anuj
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7913
Location: Bellevue, IA

PostPosted: Tue Jun 30, 2009 6:59 pm    Post subject:
Reply with quote

Quote:
Yes, I am using REGION=0M but still I am getting the problem.
This is completely non-responsive to my question. The amount of region your program is requesting has nothing to do with your abend. The meanings all refer to using storage that is not available for some reason.

Post the COBOL ASSIGN statement, the FD for the file, and the code 10 lines before to 10 lines after the OPEN for the file. If the FD is in a copy book, post the expanded copy book, not just the COPY statement. If the FD is lengthy, just post the first 10 lines or so of record layout.

And learn to use the Code tag on your posts -- it aligns data from the mainframe so we can better identify fields.
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


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

PostPosted: Tue Jun 30, 2009 7:09 pm    Post subject:
Reply with quote

Are you INITIALIZEing the FD Record area before opening the file?

how to use bbcode
Back to top
View user's profile Send private message
sreenivasreddyg

New User


Joined: 23 Apr 2005
Posts: 39
Location: delhi

PostPosted: Tue Jun 30, 2009 7:22 pm    Post subject:
Reply with quote

Hi,

Please find the code. This is exactly what I am trying to do.

Code:
FILE-CONTROL.                         
                                       
    SELECT DATEPARM ASSIGN TO DATEPARM.


Code:
FD DATEPARM                               
    RECORDING MODE IS F.                   
01  DATEPARM-RECORD.                       
    05 DATEPARM-37              PIC 9(08).
    05 FILLER                   PIC X(72).


Code:
OPEN I-O DATEPARM.                         
IF DATEPARM-STAT NOT = ZEROS               
   DISPLAY 'BAD OPEN DATECARD FILE '       
   DATEPARM-STAT.                           
   DISPLAY 'DATEPARM-STAT::' DATEPARM-STAT.


I am not initializing the FD record.

Thanks.
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7913
Location: Bellevue, IA

PostPosted: Tue Jun 30, 2009 7:29 pm    Post subject:
Reply with quote

Your program is most likely referencing DATEPARM-RECORD or DATEPARM-37 before doing
Code:
OPEN I-O DATEPARM.
That is why I asked to see the code for a few lines before the OPEN -- that's most likely where the invalid reference is coming from.
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


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

PostPosted: Tue Jun 30, 2009 8:15 pm    Post subject:
Reply with quote

why is this not a part of the select statement?
DATEPARM-STAT

since your select statement has a period at end:
Code:
SELECT DATEPARM ASSIGN TO DATEPARM.


and are you sure that the instruction is indeed the OPEN statement?
I doubt it.

and the JCL used to execute the module....
Back to top
View user's profile Send private message
sreenivasreddyg

New User


Joined: 23 Apr 2005
Posts: 39
Location: delhi

PostPosted: Wed Jul 01, 2009 9:56 am    Post subject:
Reply with quote

I am not referencing FD fields prior to the opening of the file.

Please see the JCL below.

Code:
//EXC1    EXEC PGM=LTEST1                         
//STEPLIB  DD  DSN=LOAD1,               
//             DISP=SHR                             
//         DD  DSN=LOAD2,
//             DISP=SHR                             

//DATEPARM DD  DSN=HUSER1.DATEPARM,   
//             DISP=SHR                             
//PRNTFILE DD  SYSOUT=*                             
//BNKTRNSF DD  DSN=Bankfile
//             DISP=SHR   
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7913
Location: Bellevue, IA

PostPosted: Wed Jul 01, 2009 3:01 pm    Post subject:
Reply with quote

Sorry, but I think you'll have to solve this one on your own. You have stated that your S0C4 is at the OPEN statement but you have provided absolutely nothing to confirm this -- no system output, no dump output, nothing. Furthermore, you have been asked to provide several things but either ignore the request or give us your statement about what was asked instead of posting what was requested.

Since you've obviously decided what your problem is, rather than letting the system tell you what the problem is, I think it best if we let you decide the solution as well. That way we won't keep asking for facts that might contradict your assumptions, and you can resolve the issue any way you want to.
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


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

PostPosted: Wed Jul 01, 2009 3:04 pm    Post subject:
Reply with quote

I would add to your SELECT statement the FILE-STATUS phrase,
otherwise, you do not know if your file has been opened properly or not.
Back to top
View user's profile Send private message
sreenivasreddyg

New User


Joined: 23 Apr 2005
Posts: 39
Location: delhi

PostPosted: Wed Jul 01, 2009 3:27 pm    Post subject:
Reply with quote

Hi,

I have removed AMODE(31), RMODE(ANY) from the link and then reran. Now, it is working fine. So, I am assuming that the problem is with 24/31 bit addressing.

Thanks.
Back to top
View user's profile Send private message
sreenivasreddyg

New User


Joined: 23 Apr 2005
Posts: 39
Location: delhi

PostPosted: Wed Jul 01, 2009 3:30 pm    Post subject:
Reply with quote

Robert,

I put the displays in the program and found that I was getting problem at the time opening the file. So, I mentioned that the problem is due to file OPEN.

Thanks.
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 PL/I code tuning/Performance improvement Virendra Shambharkar PL/I & Assembler 4 Mon Dec 05, 2016 11:57 am
No new posts What is the code in CLIST to enable t... jackzhang75 CLIST & REXX 1 Fri Dec 02, 2016 3:02 am
No new posts IDEAL - Code Retrieval yugendran CA Products 0 Fri Nov 25, 2016 3:27 pm
This topic is locked: you cannot edit posts or make replies. Need to code a Rexx PGM sundaram.naveen CLIST & REXX 18 Thu Oct 06, 2016 6:45 pm
No new posts Need Help in understanding what is th... mainakdalal PL/I & Assembler 9 Mon Oct 03, 2016 8:03 pm


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