*COMDECK HDRAREA
# 
*     HDRAREA - HEADER WORD FOR ASYNCHRONOUS SUPERVISORY MESSAGE. 
# 
  
      ARRAY HDRAREA [0:0] S(1); 
        BEGIN  # ARRAY HDRAREA #
        ITEM HDR$WORD   I(0,00,60);  # HEADER WORD #
        ITEM HDR$ABT    U(0,00,06);  # APPLICATION BLOCK TYPE # 
        ITEM HDR$ACN    U(0,06,12);  # APPLICATION CONNECTION NUMBER #
        ITEM HDR$ABN    I(0,18,18);  # APPLICATION BLOCK NUMBER # 
        ITEM HDR$ACT    U(0,36,04);  # APPLICATION CHARACTER TYPE # 
        ITEM HDR$IBUBIT B(0,40,01);  # INPUT BLOCK UNDELIVERABLE BIT #
        ITEM HDR$TLCU   U(0,48,12);  # TEXT LENGTH IN CHARACTER UNITS # 
        END 
  
