Re: General MPF exit using SYSREXX (SySTEM REXX)
I don't know if this helps, but the SNMP sub-agent that I wrote (file #805 on CBTTAPE) has code in it to call system REXX execs and retrieve the results. I use the REXX execs to issue system commands and populate variables with the command output which, in turn, can be interrogated with SNMP GET requests (a monitoring agent in our case). The MPF exit code [shell] is pretty generic and can be found in multiple places on the CBTTAPE. You could just lift out the system REXX code and stuff it into an MPF exit shell. mike Michael Schmutzok Sr Systems Programmer Shands HealthCare On 4/1/2010 at 1:30 AM, in message listserv%201004010030373752.0...@bama.ua.edu, Brian Westerman brian_wester...@syzygyinc.com wrote: The code in the hot topic is general in the sense that it can handle any message, but not that it is called for EVERY message, just the one(s) you set it up for in MPFLSTxx. I was hoping that someone had actually gotten the code that they referred to in the hot topic. Performance isn't an issue in this case, it's just for informational purposes to see how it's done. Anyone have the code already built? Brian -- 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 -- 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
Re: General MPF exit using SYSREXX (SySTEM REXX)
Thanks, I had already written it last night, but it was good to see that my code to get the exec was almost identical to what you had. It's always nice to have confirmation. Thank you very much for taking the time to answer, I really appreciate it. Brian -- 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
General MPF exit using SYSREXX (SySTEM REXX)
Hi all, I was going through the old Hot Topics #20 for z/os and one in particular from 2007 caught my eye. There is a section on the new system rexx, and they talked about having created a general MPF exit that used the AXREXX macro to invoke the SYSREXX execs that matched the message number (sort of like MPFSYS operates), but they didn't include the exit or a link to where it can be found. Does anyone know where this general exit can be found? I would rather not have to write a shell to match it if I don't have to, and I guess I'm being lazy but I'm just hoping that I missed the location somewhere and someone here can save me the coding time. Brian -- 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
Re: General MPF exit using SYSREXX (SySTEM REXX)
It seems to be invoked via the MPFLST faclilty. (don't know if there is anything in a SAMPLIB to help). An example from my system: ARC0621I,USEREXIT(MPFEXIT) AUTOMATIC DUMP ENDING Whenever MSG ARC0621I is encountered, the user exit MPFEXIT will get control. MPFEXIT would invoke the SYSREXX exec. HTH, snip There is a section on the new system rexx, and they talked about having created a general MPF exit that used the AXREXX macro to invoke the SYSREXX execs that matched the message number (sort of like MPFSYS operates), but they didn't include the exit or a link to where it can be found. /snip -- 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
Re: General MPF exit using SYSREXX (SySTEM REXX)
I would add a caution about using AXREXX from the general WTO MPF exit. As this exit is called for every WTO that does not have its own MPF exit defined in MPFLSTxx, a very busy system may very quickly overrun the limited number of AXREXX workers. To be as performance sensitive as positive, it would make sense to have an assembler or metal C shell that marshalls/demarshalls only the variables that the SYSREXX needs to get the job done for the particular message. Scott Fagen Chief Architect Mainframe BU CA -- 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
Re: General MPF exit using SYSREXX (SySTEM REXX)
The code in the hot topic is general in the sense that it can handle any message, but not that it is called for EVERY message, just the one(s) you set it up for in MPFLSTxx. I was hoping that someone had actually gotten the code that they referred to in the hot topic. Performance isn't an issue in this case, it's just for informational purposes to see how it's done. Anyone have the code already built? Brian -- 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