Request an email from an Netmaster Alert
search cancel

Request an email from an Netmaster Alert

book

Article ID: 265294

calendar_today

Updated On:

Products

NetMaster Network Management for TCP/IP

Issue/Introduction

Customer would like to drive an email when an alert is driven

Resolution

Below is a sample email NCL.

Download / copy the content to the TESTEXEC.

Modify USERxEmail (as many as desired) and @COMPANY.COM to match the local environment. 
A distribution list email address can also be used.

Add the name of the NCL member in the RUN_NCL option where alert actions are defined. 

&CONTROL NOENDMSG NOINTLOG                                              00010000
-* &CONTROL TRACELOG                                                    00020000
                                                                        00030000
&CONTROL SHRVARS=($AM) NOUCASE                                         00040000
&ASSIGN MDO=$AMALERT MAP=$AMALERT                                      00050000
                                                                        00060000
&ASSIGN VARS=$AMDESC     FROM MDO=$AMALERT.DESC                         00070000
&ASSIGN VARS=$AMRESOURCE FROM MDO=$AMALERT.RESOURCE                     00080000
&ASSIGN VARS=$AMRESID    FROM MDO=$AMALERT.RESID                       00090000
&ASSIGN VARS=$AMSEVERITY FROM MDO=$AMALERT.SEVERITY                     00100000
                                                                      00110000
&CONTROL SHRVARS=($PS)                                                  00120000
&ASSIGN VARS=$PSDATA*   FROM MDO=$AMALERT.TEXT.{*}                     00130000
&ASSIGN VARS=#TEXTCOUNT OPT=#ITEMS PRESENT_IN +                        00140000
 MDO=$AMALERT.TEXT.{*}                                                  00150000
&$USER1   = &STR USER1Email                                             00160000
&$USER2   = &STR User2Email                                             00170000
&UCNT = 1                                                               00180000
&TITLE = &STR &$AMDESC                                                  00190000
                                                                        00200000
&Dowhile .&$user&ucnt ne .                                              00210000
  &$UADDR = &CONCAT &$USER&UCNT @COMPANY.COM                            00220000
  &gosub .sendemail                                                     00230000
  &UCNT = &ucnt + 1                                                     00240000
&Doend                                                                  00250000
&exit                                                                   00260000
                                                                        00270000
.sendemail                                                              00280000
&TITLE = &zquote &TITLE                                                 00290000
-EXEC $PSCALL OPT=OPEN PRINTER=$PSEMAIL HOLD=NO KEEP=NO +               00300000
 TITLE=&TITLE EXITDATA='JOB=SMTP TO=&$UADDR HOST= NODE= ATT=NMPRT'      00310000
   &IF .&RETCODE EQ .0 &THEN +                                          00320000
      &WRITE DATA=GOOD?                                                 00330000
-EXEC $PSCALL OPT=PUT REQ=&$PSREQ# TOTAL=&#TEXTCOUNT                    00340000
   &IF .&RETCODE EQ .0 &THEN +                                          00350000
      &WRITE DATA= OK?                                                  00360000
   &WRITE DATA= rtc=&RETCODE// &SYSMSG                                  00370000
-EXEC $PSCALL OPT=CLOSE REQ=&$PSREQ#                                    00380000
   &IF .&RETCODE EQ .0 &THEN +                                          00390000
      &WRITE DATA= GOOD OR OK¦                                          00400000
   &WRITE DATA= PRINT RTC=&ETCODE//&SYSMSG                              00410000
&retsub                                                                 00420000
                                                                        00430000
&$PSDATA1 = &STR &ALLPARMS                                              00440000
&$PSDATA2 = &STR line #2                                                00450000
&$PSDATA3 = &STR line #3                                                00460000
&$PSDATA4 = &STR line #4                                                00470000
&$PSDATA5 = &STR line #5                                                00480000
&$PSDATA6 = &STR line #6                                                00490000
&ASSIGN VARS=$AMTYPE     FROM MDO=$AMALERT.TYPE                        00500000
&ASSIGN VARS=$AMAPPLID   FROM MDO=$AMALERT.APPLID                      00510000
&ASSIGN VARS=$AMCLASSID  FROM MDO=$AMALERT.CLASSID                     00520000
&ASSIGN VARS=$AMAPPLOBJ  FROM MDO=$AMALERT.APPLOBJ                     00530000
&CNT = 6                                                                00540000