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
 

 

SOC-4 Abend while calling a program

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
pinakinc

New User


Joined: 19 Nov 2003
Posts: 7

PostPosted: Thu Aug 19, 2004 11:17 am    Post subject: SOC-4 Abend while calling a program
Reply with quote

Hi,

I am executing a program which calls another program statically. My called program is abending before it enters the procedure division. There are some parameters passed to the called program. Could someone help me with this??

Any help is appreciated!!

Regards,

Pinakin Chaubal
Back to top
View user's profile Send private message

sandip_datta

Active User


Joined: 02 Dec 2003
Posts: 151
Location: Tokyo, Japan

PostPosted: Thu Aug 19, 2004 12:44 pm    Post subject:
Reply with quote

From Manual, S0C4 means -
Code:
PROTECTION EXCEPTION - A VIRTUAL ADDRESS COULD NOT BE TRANSLATED INTO A REAL ADDRESS. --POSSIBLE CAUSE-- INVALID ADDRESS WAS REFERENCED DUE TO SUBSCRIPT ERROR OR BAD PARMS THE KEY OF AN INSTRUCTION OR AN OPERAND IN STORAGE DOES NOT MATCH THE PROTECTION KEY IN THE PSW (INTERRUPT CODE 4) THE VIRTUAL SEGMENT OR PAGE WAS NEVER ALLOCATED (INTERRUPT CODE 10 OR 11, RESPECTIVELY) THE PAGE WAS PAGED OUT AND THE ROUTINE REQUESTING THE CODE WAS DISABLED FOR I/O INTERRUPTS (INTERRUPT CODE 11) COBOL - IN GROUP MOVE, RECEIVING RECORD VARIABLE LENGTH DEFINED WRONG - TRIED MOVING VAR. LENGTH REC. LARGER THAN TARGET FIELD MAX - TRIED TO READ OR WRITE A FILE WHICH WAS NOT OPEN - USED DD DUMMY AND LOGIC SAYS AT END MOVE HIGH VALUES TO FD - TRIED TO CALL WITHIN COBOL F SORT INPUT/OUTPUT PROCEDURE - U WITH SORT - TRIED TO GOBACK IN THE OUTPUT PROCEDURE


For more specific answer, give us more details, your parm structutr on called and calling program and the code while calling the sub program and other relevant information.

Regards,
Sandip.
Back to top
View user's profile Send private message
BalaMuraliL

New User


Joined: 01 Aug 2007
Posts: 10
Location: Pune

PostPosted: Fri Aug 03, 2007 2:12 am    Post subject:
Reply with quote

Hi Pinakin,

1. Please check the length of your calling program and called program. Both should match and equal.

2. In Called program , under linkage section, please specify first varible as length variable with S9(4) Comp. In called progra check the record length. Hope called program record structure is not matching with calling program record structure.

3. As per the error descriptions provided by you , your program is dealing with COBOL FILES concepts. you are trying to read / write a file with out OPENenig a file. so, please check in called program whether you opened a file or not.

Please let me know, if it works / any issues. Thanks.
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: Fri Aug 03, 2007 2:57 am    Post subject:
Reply with quote

Hello BalaMuraliL,

Please note that the post you replied to is nearly 3 years old.

We seldom see new activity on topics like this after a few weeks or at most a few months.

I mention this not to discourage, but to let you know that "pinakinc" has never followed up on the original post.

Enjoy the forums icon_smile.gif
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3158
Location: Tucson AZ

PostPosted: Fri Aug 03, 2007 3:06 am    Post subject: Re: SOC-4 Abend while calling a program
Reply with quote

pinakinc wrote:
I am executing a program which calls another program statically. My called program is abending before it enters the procedure division.
First things first, verify that the link/binder map shows that the called module is actually statically linked to the version of the calling module you are testing. If that means recompiling the calling program with a unique flag in WS, so be it.....
Check that link map and check the abend dump for the unique flag.....

Rule #1: Eliminate the uncertainty, know that what you are executing is matched to the listing and link map.
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 -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts IMS T-Pipe queue counts in a COBOL Pr... Siva NKK Kothamasu IMS DB/DC 0 Tue May 09, 2017 6:31 pm
No new posts Need help in REXX CALL program Raje1002 CLIST & REXX 5 Wed Apr 19, 2017 11:18 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 SQL query not working in Cobol program. CuriousMainframer COBOL Programming 14 Wed Feb 22, 2017 5:56 pm
No new posts Calling procedure with multiple entri... steve-myers PL/I & Assembler 5 Fri Jan 27, 2017 3:33 pm


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