How to find the "caller" from a "sub-module"?

OS/VS COBOL, COBOL II, Enterprise COBOL for z/OS. OpenCOBOL and OOCobol.
Post Reply
Mukul Thriphati
New Member
Posts: 6
Joined: Sun Feb 16, 2014 9:04 pm

How to find the "caller" from a "sub-module"?

Post by Mukul Thriphati »

Hi,

I've a COBOL program which has got the linkage setion and Procedure Division like this:

Code: Select all

 LINKAGE SECTION.                                                 
                                                                  
                                                                  
*** *xx402D-xxxx-REC:                                             
     COPY xx402D01.                                               
                                                                  
 01  W-xx849-xx426O01.                                            
     03  W-DDNAME            PIC  X(08).                          
     03  W-NUMB              PIC S9(09) PACKED-DECIMAL.           
     03  W-INFO              PIC  X(01).                          
     03  FILLER              PIC  X(10).                          
/                                                                 
***************************************************************** 
*    P R O C E D U R E   D I V I S I O N                        * 
***************************************************************** 
 PROCEDURE DIVISION USING xx402D-xxxx-REC                         
                          W-xx849-xx426O01.                       
It is evident that this is a sub-program, is there a way to find who is calling this program?
User avatar
Anuj Dhawan
Founder
Posts: 2799
Joined: Sun Apr 21, 2013 7:40 pm
Location: Mumbai, India
Contact:
India

Re: How to find the "caller" from a "sub-module"?

Post by Anuj Dhawan »

I doubt if there is some straight way apart from searching the baseline library and making an educated guess.

This thread discusses a similar topic: http://www.zmainframes.com/viewtopic.ph ... call#p2488

Hope this helps.
Thanks,
Anuj

Disclaimer: My comments on this website are my own and do not represent the opinions or suggestions of any other person or business entity, in any way.
Post Reply

Create an account or sign in to join the discussion

You need to be a member in order to post a reply

Create an account

Not a member? register to join our community
Members can start their own topics & subscribe to topics
It’s free and only takes a minute

Register

Sign in

Return to “IBM COBOL, GnuCOBOL (OpenCOBOL), OOCobol.”