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

Sending a Message to EMSPROC
Developing System-Level NCL Procedures
106160 Tandem Computers Incorporated 17–25
The following three NCL procedures show the results of sending a message using the
EMSSEND verb.
The first NCL procedure is an EMSPROC procedure called ZEX1706N, described
earlier in this subsection.
The second NCL is a MSGPROC procedure called ZEX1707N, described earlier in this
subsection.
The third NCL procedure is an NCL procedure called ZEX1709N. It uses the
EMSSEND verb to send a message through the specified EMS event collector to
EMSPROC. (The SYSPARMS EMSCOLLPNM command allows you to specify the
process name of an EMS collector.)
To see how these NCL procedures work, follow the steps described earlier in this
subsection with four exceptions:
First, after installing ZEX1706N as your EMSPROC procedure and ZEX1707N as your
active MSGPROC procedure, type the following NCL procedure, calling it ZEX1709N:
zex1709n: PROCEDURE
/* Sends a message to the EMS collector */
SAY "Sending a message to the EMS collector"
ASSIGN MDO=&abc. MAP=$MSG
&abc.text = "TEST This is the &ABC.TEXT text"
&abc.msgattr.display.color = WHITE
&abc.msgattr.display.hlite = HIGH
&abc.spi.tandem.zspi_tkn_ssid = TANDEM.NNM.D30
&abc.spi.tandem.zems_tkn_subject_mark = "TANDEM.ZEMS_TKN_TEXT{1}"
&abc.spi.tandem.zems_tkn_text =,
"TEST This is the &ABC.SPI.TANDEM.ZEMS_TKN_TEXT text"
&abc.spi.tandem.zems_tkn_eventnumber.# = 9999
EMSSEND MDO=&abc.
END zex1709n
Second, execute the following commands to ensure NonStop NET/MASTER MS can
receive EMS messages:
EMSDIST START
EMSCOLL START
The EMSDIST START command starts the receiving of events from an EMS distributor
to NonStop NET/MASTER MS. The EMSCOLL START command starts the recording
of events from NonStop NET/MASTER MS to the specified EMS collector. You can
use the STATUS command to confirm that your EMS distributor and EMS collector
interfaces have been started.
Third, after starting the EMS distributor and the EMS collector and ensuring that you
are profiled to receive EMS and unsolicited messages, execute ZEX1709N from the
OCS command input line by using the following command:
START ZEX1709N