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

Development Considerations for System-Level NCL Procedures
Developing System-Level NCL Procedures
106160 Tandem Computers Incorporated 17–11
The following screen shows the results of executing the procedure:
(13:59) --------------------- OPERATOR CONTROL SERVICES ----------------------
PROFILE MSGPROC=ZEX1702N
NNM0393 MSGPROC PROCESSING ACTIVATED
NNM0357 PROFILE HAS CHANGED
Full text is NNM0393 MSGPROC PROCESSING ACTIVATED
Word 1 is NNM0393
Word 2 is MSGPROC
Word 3 is PROCESSING
Word 4 is ACTIVATED
Full text is NNM0357 PROFILE HAS CHANGED
Word 1 is NNM0357
Word 2 is PROFILE
Word 3 is HAS
Word 4 is CHANGED
_____________________________________________________________________________
---------- ------------------ NonStop NET/MASTER D30 ---------------- --------
M=>
Deleting a System-Level Message
After reading a message using one of the EMSREAD, LOGREAD, or MSGREAD verbs,
you can use the EMSDEL, LOGDEL, and MSGDEL verbs, respectively, to delete a
message. Deleting a message prevents the system-level NCL procedure from sending
the message to its destination.
The following MSGPROC NCL procedure uses the MSGREAD verb and the ARGS
keyword to place every word of a message into a separate variable from &1 through
&n; it uses the MSGDEL verb to delete every message:
zex1703n: PROCEDURE
/* MSGPROC to delete messages */
DO FOREVER
MSGREAD ARGS
SAY "Full text is "&$msg.text
DO &i = 1 TO &SYS.VARCNT
SAY "Word "&i" is "&&i
END
MSGDEL
END
END zex1703n