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
 
S0C4 Abend in DB2 Stored Procedure

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

New User


Joined: 09 Apr 2008
Posts: 83
Location: Chennai

PostPosted: Thu Jan 23, 2014 3:41 am    Post subject: S0C4 Abend in DB2 Stored Procedure
Reply with quote

Hi,
I have a COBOL DB2 Stored Procedure which is having the following linkage variables:
Code:

01  SP-IP-1                        PIC X(09) .     
01  SP-IP-2                PIC X(100).     
01  SP-IP-3                   PIC X(06) .     
01  SP-IP-4                  PIC X(01) .     
01  SP-IP-5                  PIC X(02) .     
01  SP-IP-6          PIC X(02) .     
01  SP-IP-7                 PIC X(01) .     
01  SP-IP-8                  PIC X(03) .     
01  SP-IP-9                   PIC X(08) .     
01  SP-IP-10                PIC X(08) .     
01  SP-IP-11             PIC X(08) .     
01  SP-OP-SQL-CD                     PIC X(06).     
01  SP-OP-OUT-SQL-MSG.                               
     49  SP-OP-SQL-MSG-LTH           PIC S9(4) COMP.
     49  SP-OP-SQL-MSG-TXT           PIC X(1000).   
01  SP-OP-INFO-MSG.                                 
     49  SP-OP-INFO-MSG-LTH          PIC S9(4) COMP.
         49  SP-OP-INFO-MSG-TXT          PIC X(1200).         
    01  SP-OUT-CLOB     USAGE IS SQL TYPE IS CLOB(700000).


While compiling this Stored Procedure, I did not see any warnings from Compiler.
This Stored Procedure calls another Stored Procedure and then reformats the output and generates XML and moves the XML to the CLOB variable SP-OUT-CLOB.

With the above layout, I face a 0C4 abend whenever I try to move any values to the O/P variables.
this is a sample code of where I face the abend:

Code:

MOVE ' ' TO SP-OP-INFO-MSG-TXT
MOVE 1 TO SP-OP-INFO-MSG-LTH


I can confirm that since I debugged using the Xpeditor.

However, the strange fact is that the Stored Procedure does not abend when I remove the following variables from the output parameters:
Code:
01  SP-OP-OUT-SQL-MSG.                               
     49  SP-OP-SQL-MSG-LTH           PIC S9(4) COMP.
     49  SP-OP-SQL-MSG-TXT           PIC X(1000).   


Has it something to do with the fact that I've 2 VARCHARs in my O/P parameters?
Back to top
View user's profile Send private message

rahuindo

New User


Joined: 09 Apr 2008
Posts: 83
Location: Chennai

PostPosted: Thu Jan 23, 2014 4:19 am    Post subject: Reply to: S0C4 Abend in DB2 Stored Procedure
Reply with quote

I looked at the Compiler warnings and I found this:
"SP-OP-INFO-MSG" or one of its subordinates was referenced, but
"SP-OP-INFO-MSG" was a "LINKAGE SECTION" item that did not have
addressability. This reference will not be resolved successfully at
execution.

This error implied that the SP-OP-INFO-MSG should also be referenced in the PROCEDURE division. I was not referencing this variable in the PROCEDURE division.
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7315

PostPosted: Thu Jan 23, 2014 5:27 am    Post subject: Reply to: S0C4 Abend in DB2 Stored Procedure
Reply with quote

You mean the PROCEDURE DIVISION USING...?

The parameter also needs to be supplied by the CALLing program. else you'll still have a problem.
Back to top
View user's profile Send private message
rahuindo

New User


Joined: 09 Apr 2008
Posts: 83
Location: Chennai

PostPosted: Thu Jan 23, 2014 6:09 am    Post subject: Reply to: S0C4 Abend in DB2 Stored Procedure
Reply with quote

Hi Bill,
Yes, I meant the PROCEDURE DIVISION Using.. The Calling program was passing this parameter. It was just not defined in the PROCEDURE DIVISION Using.
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 Create procedure issues -628 when add... chandraBE DB2 1 Mon Sep 18, 2017 12:16 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 Query on DB2 WLM stored procedures ashek15 DB2 8 Sun Feb 12, 2017 11:13 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
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us