SUBROUTINE PAINT_GLOBAL_ALLOC()
C----------------------------------------------------------------------
C-
C-   Purpose and Methods : Clear the screen and paint the background of the
C-      global view page of the monitor program.
C-
C-      NOTE: If the layout of the display is changed, BOTH the text here and
C-            the coordinate parameters must be changed.
C-            
C-   Inputs  : none
C-   Outputs : none
C-   Controls: none
C-
C----------------------------------------------------------------------
C-   Created  10-OCT-1990   MICHIGAN STATE UNIVERSITY, TRIGGER CONTROL SOFTWARE
C-   Updated  30-APR-1991 Added events transferred for each spec. trig. 
C-   Updated  17-MAR-1992   Philippe Laurens, Steven Klocek  
C-                            Added Global Exposition percentage and other
C-                            items.
C-
C----------------------------------------------------------------------
      IMPLICIT NONE
      INCLUDE 'LV1_MON_SCREEN.INC'
      INCLUDE 'LV1_MON_SCREEN_LAYOUT.PARAMS'
C
C       Reset margins and clear screen
C
      CALL CLEAR_SCREEN()
C
      CALL PUT_STRING( 1, 1,
     &  'Global Monitoring of All Allocated Specific Triggers' )
C
      CALL PAINT_GLOBAL_HEADER
C
      CALL PUT_STRING( GA_ALLOC_START_L-4, 1,
     &    '                                              '
     &  //'        |Tot|Tot |Total|')
C
      CALL PUT_STRING( GA_ALLOC_START_L-3, 1,
     &    'Sp.|Firing| Andor|Prscl|L 1.5|Events|Globl|F-E'
     &  //'nd|Level|And|Strt|Watch|')
C
      CALL PUT_STRING( GA_ALLOC_START_L-2, 1,
     &    'Trg|  Rate|  Rate|Ratio|Rejct|Transf|Expos| Bu'
     &  //'sy|2 Dis|Trm|Dgtz|Busy |')
C
      CALL PUT_STRING( GA_ALLOC_START_L-1, 1,
     &    '---|----Hz|----Hz|-----|----%|------|----%|---'
     &  //'-%|----%|---|----|-----|-------')
C
C----------------------------------------------------------------------
      CALL FLUSH_SCREEN()
      RETURN
      END