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

The ASSIGN and DROP Verbs
Working With Mapping Services
10–32 106160 Tandem Computers Incorporated
The following NCL procedure uses the ASSIGN verb to create an MDO variable,
&ABC., which is mapped by the map $MSG:
zex1011n: PROCEDURE
/* Creates an MDO variable using ASSIGN */
SAY Creating an MDO variable with map $MSG
ASSIGN MDO=&abc. OPT=VALUE MAP=$MSG
SAY Creating fields in the MDO variable
&abc.text = "A test message"
&abc.msgattr.display.color = RED
&abc.msgattr.display.hlite = NONE
&abc.msgattr.display.intens = NORMAL
SAY Displaying fields in the MDO variable
SAY "Text is "&abc.text
SAY "Color is "&abc.msgattr.display.color
SAY "Hlite is "&abc.msgattr.display.hlite
SAY "Intens is "&abc.msgattr.display.intens
END zex1011n
The NCL procedure creates a series of compound variables under the stem &ABC.
using the assignment statement to assign values to each.
The following screen shows the results of executing the procedure:
(14:50) --------------------- OPERATOR CONTROL SERVICES ----------------------
START ZEX1011N
Creating an MDO variable with map $MSG
Creating fields in the MDO variable
Displaying fields in the MDO variable
Text is A test message
Color is RED
Hlite is NONE
Intens is NORMAL
NNM1005 START ZEX1011N PROCESSING COMPLETE. NCLID 001548
_____________________________________________________________________________
---------- ------------------ NonStop NET/MASTER D30 ---------------- --------
M=>