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

Accessing the User ID Management Services (UMS) Database
Advanced NCL Programming
106160 Tandem Computers Incorporated 18–11
The following screen shows the results of executing the procedure:
(06:08) --------------------- OPERATOR CONTROL SERVICES ----------------------
START ZEX1803N NNMABC NewPword MYNAME MYPLACE 1234567
Current user name is MYNAME
Current location is
Current phone is
New user name is MYNAME
New location is MYPLACE
New phone is 1234567
NNM1005 START ZEX1803N PROCESSING COMPLETE. NCLID 002676
_____________________________________________________________________________
---------- ------------------ NonStop NET/MASTER D30 ---------------- --------
M=>
Checking Logon Capability The SECCALL CHECK verb determines whether a user ID and password combination
is allowed to log on. The following NCL procedure verifies whether the specified
password and user ID combination is allowed to log on:
zex1804n: PROCEDURE EXTPARSE SMART NOFOLD
/* Checks log on for user ID/password */
SECCALL CHECK USERID=&1 PWD=&2
SELECT &SYS.RETCODE
WHEN 0 THEN SAY "0 Log on allowed"
WHEN 4 THEN SAY "4 Log on allowed"
WHEN 8 THEN SAY "8 Log on allowed"
WHEN 16 THEN SAY "16 Log on disallowed"
WHEN 20 THEN SAY "20 Log on disallowed"
WHEN 24 THEN SAY "24 Log on disallowed"
WHEN 28 THEN SAY "28 Log on from specific terminal"
OTHERWISE
SAY "&SYS.RETCODE is "&SYS.RETCODE
END
END zex1804n