*COMDECK,GLOBALI
# 
     GLOBAL ITEM DEFINITIONS
                                                                       #
  
# 
      NOTE - THIS COMMON BLOCK IS USED BY REMOVE SETACN  ROUTINE. ANY 
             CHANGES TO THIS BLOCK WOULD AFFT THE CODE IN THAT ROUTINE
# 
      COMMON GLOBALI; 
      BEGIN 
      ITEM IDLESHUTDOWN B= FALSE;      # IDLE SHUT DOWN FLAG           #
  
      ITEM CLOCK I;                    # CONTAINS CURRENT TIME IN      #
                                       # SECONDS SINCE RBF BROUGHT UP  #
  
  
      ITEM ACN U;            # ACN OF CONNECTION CURRENTLY BEING       #
                             # PROCESSED                               #
  
  
      ITEM NETTEDON B = FALSE;   # NETTED ON FLAG                      #
      ITEM RBFBSN U = 0;               # BLOCK SEQUENCE NUMBER FOR RBF #
      ITEM CHGSIZEREJ B = FALSE;   # CHANGE BUFFER SIZE REJECTED       #
      ITEM MC;               # MAX NO OF MSGS IN ZZZZZDN BEFORE FLUSH  #
      ITEM SYSACT B;                       #SYSTEM (PP) ACTIVITY       #
      END 
