NET/MASTER Network Control Language (NCL) Programmer's Guide

Accessing the User ID Management Services (UMS) Database
Advanced NCL Programming
18–14 106160 Tandem Computers Incorporated
SAY “RMS_ACCESS is "&ums.rms_access
SAY "HLPM_ACCESS is "&ums.hlpm_access
SAY "NCL_LIB is "&ums.ncl_lib
SAY "NCL_OBJLIB is "&ums.ncl_objlib
SAY "PANEL_LIB is "&ums.panel_lib
SAY "USER_PROC is "&ums.user_proc
SAY "USER_MENU is "&ums.user_menu
SAY "AUTH_LEVEL is "&ums.auth_level
SAY "SUSPEND_DT is "&ums.suspend_dt
SAY "PW_EXPIRE is "&ums.pw_expire
SAY "TIMEOUT is "&ums.timeout
SAY "MULTI_LOGON is "&ums.multi_logon
SAY "TERM_RESTRICTN1 is "&ums.term_restrictn1
SAY "TERM_RESTRICTN2 is "&ums.term_restrictn2
SAY "TERM_RESTRICTN3 is "&ums.term_restrictn3
SAY "TERM_RESTRICTN4 is "&ums.term_restrictn4
SAY "TERM_RESTRICTN5 is "&ums.term_restrictn5
SAY "TERM_RESTRICTN6 is "&ums.term_restrictn6
SAY "TERM_RESTRICTN7 is "&ums.term_restrictn7
SAY "TERM_RESTRICTN8 is "&ums.term_restrictn8
SAY "INSTALL_ATTR1 is "&ums.install_attr1
SAY "INSTALL_ATTR2 is "&ums.install_attr2
SAY "INSTALL_ATTR3 is "&ums.install_attr3
SAY "INSTALL_ATTR4 is "&ums.install_attr4
SAY "MON_STATUS is "&ums.mon_status
SAY "EMS_RECEIVE is "&ums.ems_receive
SAY "MSGCODE is "D2X(&ums.msg_code,2)
SAY "MSGPROC is "&ums.msg_proc
SAY "MSG_TRUNC is "&ums.msg_trunc
SAY "MSG_PROF is "&ums.msg_prof
SAY "UNSOL_PROF is "&ums.unsol_prof
SELECT &ums.ems_sever_lvl
WHEN 0 THEN SAY "EMS_SEVER_LVL is "INFO
WHEN 1 THEN SAY "EMS_SEVER_LVL is "WARN
WHEN 2 THEN SAY "EMS_SEVER_LVL is "NORM
WHEN 3 THEN SAY "EMS_SEVER_LVL is "SER
OTHERWISE
NOP
END /*select*/
SAY "REC_ALLEMS is "&ums.rec_allems
SAY "INITCMD is "&ums.initcmd
SAY "ROC_IN is "&ums.roc_in
SAY "ROC_OUT is "&ums.roc_out
END zex1805n
Note The integer index for GUIDs range from 2 through 9, not 1 through 8. Therefore, the control variable in
the DO loop that obtains the Guardian user ID(s) for a user must have an initial value of 2, not 1.