*COMDECK  SMSGNVF 
#     SMSGNVF - NVF STATUS MESSAGES.  # 
CONTROL NOLIST; 
  
# 
**    SMSGNVF - NVF STATUS MESSAGES.
* 
*     SMSGNVF CONTAINS ALL HOST ELEMENT STATUS MESSAGES (BOTH SOLICITED 
*     AND UNSOLICITED) ISSUED BY NVF. 
# 
  
      DEF  LMSH40$  #40#;    # LENGTH OF MESSAGE IN CHARS              #
  
      COMMON SMSGNVF; 
  
      BEGIN  # SMSGNVF #
  
  
# 
*     ASMBUF - APPLICATION STATUS MESSAGE BUFFER. 
# 
      ARRAY ASMBUF[00:00] S(4); 
        BEGIN 
        ITEM ASM$MSG1   C(00,00,25) = ["APPLICATION ON/OFF/FAI - "];
        ITEM ASM$TYPE   C(01,12,10);   # NETTED ON/NETTED OFF/FAILED   #
        ITEM ASM$MSG2   C(02,30,07) = ["APPNAME"];
        ITEM ASM$ANAME  C(02,30,07);   # APPLICATION NAME              #
        END 
  
      END  # SMSGNVF #
  
CONTROL LIST; 
