On Fri, 5 Jan 2024 08:10:52 -0600, Willy Jensen <willy.h.jen...@outlook.com> wrote:
>When running in Netview it doesn't abend, but it doesn't do anything either, > except that the return value is valid. It returns 0, which indicates success. Saying "returns 0" tells us nothing. >The function in question reads. lists and writes variables, it uses IRXEXCOM >for variable access, > IRXSTK for stack access and IRXSAY for terminal output. There's too much going on for us to be of any help. Start with IRXEXCOM that creates a REXX variable with a known value and a REXX that calls this program and displays it. The ENVBLOCK should be correct and this is the simplest method to verify you have R0 and 2 parmlist fields pointing to it. Once you have this working, then you can proceed to other functions. > r0 points to an ENVBLOCK Make sure you pass it correctly to IRXEXCOM (R0 and 2 parmlist fields). In theory, these can be 0, but why make REXX search for it when you have it in R0. > field ENVBLOCK_IRXEXTE points to a valid IRXEXTE, > but the fields IRXEXCOM, IRXSTK and IRXSAY in there points to the TSO > modules. REXX was first ported to TSO and those modules were coded generically. It could also be that a TSO environment is built into Netview. I know it's built into another automation product. >I verified this by running the program under TSO. TSO REXX is more forgiving than other environments. >I did look at the sample Netview program CNMS8002, but that didn't help. I don't have access to z/OS so I can't comment on this program and the requirements to setup a valid REXX environment for Netview. Later, it might be useful to compare with your program but for now, it's not helpful. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN