SOLVE:Operations Automation SYSNAME in REXX

book

Article ID: 108196

calendar_today

Updated On:

Products

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

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

Release: SLFTS.00200-12.1-SOLVE:FTS
Component:

Resolution

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