SOLVE:Operations Automation SYSNAME in REXX

Document ID : KB000108196
Last Modified Date : 30/07/2018
Show Technical Document Details
Question:
In SOLVE:Operations Automation calling REXX from a message rule, need to find out what the system name is. What is the recommended way to find out the z/OS SYSNAME from inside a REXX program?
Answer:
Use an ADDRESS to set the MVS environment before using an MVS function.
 
For example -
 
address "MVS"                  
 Say "Sysname="MVSVAR("SYSNAME")
 
 
Tried this and it worked Ok………
 
Sysname=CA11                                               
NR3001 REXX PROCEDURE JMREXX COMPLETED. PID: 16118 RC: -   
 
OR
 
Use an NCL proc to return the value. $NMOM02U is one that already exists -
 
address "NM"
"CALL PROC=$NMOM02U PARM1=GETSVARS PARM2=ZSYSNAME SHARE1=ZZZRETVAL"
say "Sysname="zzzretval