Hi
Look at the Layout Entry of Language Environment-Conforming Routines –
Standard:
http://publib.boulder.ibm.com/infocenter/zos/v1r10/topic/com.ibm.zos.r10.ceev100/rtnlyout.htm?resultof=%22%70%70%61%31%22%20
or:
http://publibz.boulder.ibm.com/epubs/pdf/ceev1190.pdf
Chapter 1. Common Interfaces and Conventions
From there you get to the PPA1 where you can find the actual module name.
If you go back the DSAs, you can access the PPAs from the previous modules.
If you are using dynamic calls, you have to skip the IGZxxxx modules.
You can also calculate the offset of the call via the return address in
R14.
The CAA is always addressable via R12.
Regards
Tobias
Am 03.07.2009, 12:57 Uhr, schrieb Thomas Berg <thomas.b...@swedbank.se>:
Hi,
Does anyone know a way to get the actual calling
modules name in a COBOL program ? Also other details
about the calling module would be interesting.
I looked through LE Programming Reference for callable
services buth didn't find any (obvious) such function.
Any hints ?
Regards,
Thomas Berg
__________________________________________
Thomas Berg Specialist IT-U SWEDBANK
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
--
Erstellt mit Operas revolutionärem E-Mail-Modul: http://www.opera.com/mail/
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
