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

Reply via email to