/* REXX *** */
 /* report MVS variables */
SAY 'SYSMVS   = 'MVSVAR(SYSMVS)
SAY 'SYSDFP   = 'MVSVAR(SYSDFP)
SAY 'SYSNAME  = 'MVSVAR(SYSNAME)
SAY 'SYSOPSYS = 'MVSVAR(SYSOPSYS)
SAY 'SYSSMFID = 'MVSVAR(SYSSMFID)
SAY 'SYSSMS   = 'MVSVAR(SYSSMS)
SAY 'SYSSPLEX = 'MVSVAR(SYSPLEX)
EXIT 0