Impossible. The names of dynamically called routines are not passed to the Binder. Why would they be? They are not a part of the resulting program object. They are only known at execution time. Despite the fact that the COBOL CALL 'MYSUB' has the name, "hard coded" as a literal, the compiler generates exactly the same code for that as it would for:
MOVE 'MYSUB' TO SUBROUTINE-NAME CALL SUBROUTINE-NAME Where SUBROUTINE-NAME is defined as PIC X(8). If you want a strange example, we have code in COBOL which does something like: ACCEPT SUBROUTINE-NAME FROM SYSIN CALL SUBROUTINE-NAME In this case, the compiler has no idea what module is going to be called. Again, the CALL 'LITERAL' with the DYNAM compile option is functionally identical to this. The compiler creates a PIC X(8) internal variable and compiles the same code as the dynamic CALL VAR-NAME statement. I am certain of this because I compiled a program with: CALL 'LITERAL'. MOVE 'LITERAL' TO SUBROUTINE-NAME. CALL SUBROUTINE-NAME. And the assembler code generated, from the LIST compiler option, shows near-identical code. It sets ups identical parm information and does a static call to IGZCFCC, which must do the dynamic loading and calling of the subroutine. -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * [email protected] * www.HealthMarkets.com Confidentiality Notice: This e-mail message may contain confidential or proprietary information. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. HealthMarkets(r) is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance Company(r), Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM > -----Original Message----- > From: IBM Mainframe Discussion List > [mailto:[email protected]] On Behalf Of K Zafirop > Sent: Thursday, October 20, 2011 5:44 AM > To: [email protected] > Subject: Dynamic calls in Binder sysprint > > Dear Listers > > I am using IBM Enterprise COBOL for z/OS 3.4.1 and z/OS V1 > R11 binder. How can I see all dynamic calls to subroutins in > linkage editor sysprint? I can only see static calls to > subroutines (e.g. CALL 'MYSUBRTN' but there is no information > for dynamic calls (e.g. CALL PROGRAM-MYSUBRTN). > > > Thanks in advance > K. Zafiropoulos > z/OS support team, Eurobank > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to [email protected] with the message: GET IBM-MAIN INFO > Search the archives at http://bama.ua.edu/archives/ibm-main.html > > ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
