Mainframe, MVS and zOS Discussion

Posted: **Mon Sep 08, 2014 5:25 pm**

Hi,

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

 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?

Posted: **Fri Aug 05, 2016 2:59 pm**

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.

Mainframe, MVS and zOS Discussion

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

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

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