SOLVE:Operations Automation SYSNAME in REXX

Article Id: 108196
Status: Published
Updated On: 30-07-2018 00:27
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 , CA SOLVE , SOLVE:Access Session Management , CA SOLVE , CA SOLVE:CA Mainframe Connector , CA 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:

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