SOLVE:Operations Automation find out the z/OS SYSNAME from inside a REXX program.

Products

• CMDB for z/OS
• NetSpy Network Performance
• NetMaster Network Automation
• SOLVE
• NetMaster Network Management for SNA
• NetMaster Network Management for TCP/IP
• NetMaster File Transfer Management
• SOLVE:Operations Automation
• SOLVE:Access Session Management
• SOLVE:FTS

Issue/Introduction

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?

Environment

Component: SFTS

Release:12.2

Resolution

Use an ADDRESS to set the MVS environment before using an MVS function.
 
For example:
 
address "MVS"                  
 Say "Sysname="MVSVAR("SYSNAME")
 
 
Result:

 
Sysname=nnnn                                                
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