*COMDECK BMGTBDCLS
  
# THE FOLLOWING BASED ARRAY DESCRIBES THE FORMAT OF AN ENTRY IN THE    #
# ERROR MESSAGE TABLE, DB$BETX, AND THE USER REPORT MESSAGE TABLE,     #
# DB$BUTX.                                                             #
  
      BASED ARRAY MSGTABLE; 
        BEGIN 
        ITEM MSGFNFE  B(00,00,01);     # FATAL/NON-FATAL ERROR FLAG.   #
                                       # BITS 1-5 ARE UNUSED.          #
        ITEM MSGNUM   U(00,06,12);     # MESSAGE NUMBER.               #
                                       # BITS 18-35 ARE UNUSED.        #
        ITEM MSGTLENC U(00,36,12);     # MESSAGE TEXT LENGTH IN CHARS. #
        ITEM MSGELENW U(00,48,12);     # MESSAGE TABLE ENTRY LENGTH    #
                                       # IN WORDS.                     #
        ITEM MSGTEXT  C(01,00,DFMSGBUFLENC);
                                       # MESSAGE TEXT.                 #
        END 
  
