Charles Checkout the STEMPUSH and STEMPULL rexx functions on www.mximvs.com - I wrote these some time ago to allow rexx stems to be passed between rexx execs in the same address space. The rexx variables are pushed onto a dataspace stack and the STOKEN for the stack is passed to the other rexx exec where it is used to pull the stem variables down.
Rob Scott Rocket Software, Inc 275 Grove Street Newton, MA 02466 617-614-2305 [EMAIL PROTECTED] http://www.rs.com/portfolio/mxi_g2 -----Original Message----- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Charles Mills Sent: 16 January 2007 12:43 To: [email protected] Subject: Re: PULL? PUSH? STEM? (was: REXX EXECIO changing LOWERCASE TO UPPERCASE) It would be great to be able to pass stems to Rexx functions, internal or external. Even with an internal function, you are reduced to passing the NAME of the step in quotes, and having the function use Interpret or Value or similar. I don't know exactly what the invocation syntax would be, but it would be great also if functions could return stems. As it is, if a function wants to return multiple values, they must be either exposed variables (with all of the potential problems) or parsed by the caller from a single returned string (clumsy and non-intuitive). I guess the "invocation syntax" problem is fundamentally the problem that Rexx has no "stem assignment." Rexx really could use ToVar. = FromVar. Then the stem function invocation could be something like ToVar. = StemFunc.(x, y, z) It would not work for "stem functions," but at the very least, it would be great if you could do "stem assignment" with something like Do x = Every tail of FromVar. ToVar.x = FromVar.x End x Charles -----Original Message----- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of wtrovijo Sent: Tuesday, January 16, 2007 8:37 AM To: [email protected] Subject: Re: PULL? PUSH? STEM? (was: REXX EXECIO changing LOWERCASE TO UPPERCASE) By the way it would be nice to have some kind of modified rexx environment to allow rexx programs to share stems. It would avoid passing data thru stacks even between different rexx programs ---------------------------------------------------------------------- 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
