No I have not. I have the real problem solved and so probably will not, but 
that is a fascinating idea. If it were C you would want InISREDIT to be a 
static so you had only one variable even on a recursive call.

I don't *think* that will work in Rexx. I have evidence that the source code 
gets reused rather than reloaded but I suspect we come in with a new set of 
variables.

Charles


On Thu, 4 Sep 2025 14:10:10 -0500, Charles Hardee <[email protected]> 
wrote:

>Just for grins, have you tried this:
>
>InISREDIT = 0
>if address() \= "ISREDIT" then do
>  Address ISREDIT "MACRO"
>   InISREDIT   = 1
>  end

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to