I don't know of a way that's built in to TSO-REXX. But if the need is important enough, you can always include the name of the caller as an arg in the call.
In my own REXX execs I always start with the following: parse source . calltype self . SELF is the name of the routine, so if it has to abend because of some error it can say (eg) MYROUTIN abending with RC 8. Loss often I use CALLTYPE, but I can look at that and decide whether to return a value to the calling program or SAY it. The rest of the PARSE SOURCE data I never use. --- Bob Bridges, [email protected], cell 336 382-7313 /* "I will tell you what I say", answered Ransom, jumping to his feet. "Of course good came of it. Is Maleldil a beast that we can stop His path, or a leaf that we can twist His shape? Whatever you do, He will make good of it. But not the good He had prepared for you if you had obeyed Him. That is lost forever. The first King and first Mother of our world did the forbidden thing; and He brought good of it in the end. But what they did was not good; and what they lost we have not seen." -from Pelelandra by C S Lewis */ -----Original Message----- From: IBM Mainframe Discussion List <[email protected]> On Behalf Of Weizman arbel Sent: Thursday, February 6, 2025 02:27 is it possible to retrieve the name of the calling (main) REXX procedure in a called (subroutine) REXX procedure? ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
