*COMDECK  NP$GMB
      COMMON NP$GMB;               # BUFFER FOR HOLDING MULTIPLE UPLINE#
                                   # DATA FOR A PARTICULAR CONNECTION  #
        BEGIN                      # NUMBER OR LIST NUMBER             #
        BASED ARRAY GMB S(1); 
          BEGIN 
                                        # HEADER WORD OF UPLINE DATA BF#
          ITEM GMBACN     U(0,00,12);   # APPLICATION CONNECTION NUMBER#
          ITEM GMBALN     U(0,12,12);   # APPLICATION LIST NUMBER      #
          ITEM GMBFLG     B(0,35,01);   # ON/OFF FLG FOR MULT UPLINE MS#
          ITEM GMBSIZE    U(0,48,12);   # SIZE OF UPLINE DATA MSG AREA #
                                        # UPLINE MESSAGE AREA          #
          ITEM GMBABT     U(0,00,06);   # APPLICATION BLOCK TYPE       #
          ITEM GMBADR     U(0,06,12);   # APPLICATION CONNECTION NUM   #
          ITEM GMBABN     U(0,18,18);   # APPLICATION BLOCK NUMBER     #
          ITEM GMBACT     U(0,36,04);   # APPLICATION CHARACTER TYPE   #
          ITEM GMBIBU     B(0,40,01);   # INPUT BLK UNDELIVERABLE BIT  #
          ITEM GMBBRK     B(0,41,01);   # UNUSED                       #
          ITEM GMBTRU     B(0,42,01);   # TRUNCATED DATA BIT           #
          ITEM GMBR43     B(0,43,01);   # UNUSED                       #
          ITEM GMBNFE     B(0,44,01);   # NO FORMAT EFFECTOR BIT       #
          ITEM GMBXPT     B(0,45,01);   # TRANSPARENT DATA BIT         #
          ITEM GMBCAN     B(0,46,01);   # CANCEL BIT                   #
          ITEM GMBBIT     B(0,47,01);   # PARITY ERROR BIT             #
          ITEM GMBDBC     U(0,40,08);   # DATA BLOCK CLARIFIER         #
          ITEM GMBTLC     U(0,48,12);   # TEXT LENGTH IN CHARACTERS    #
          ITEM GMBWRD     U(0,00,60);   # WHOLE WORD                   #
          END 
  
        END 
