compile insert GEC_COMMON
COMMON /GEC_COMMON/ SCREEN_TABLE@, PRINTER_TABLE@, PRINTER_INFO@
/*
         SCREEN_TABLE@ contains the display equivalence table.
         It is loaded by DEVICE_CONTROL from the DISPLAY_CONFIG
         file, using the key indicated in @ENVIRON.SET<E.DET>

         PRINTER_TABLE@ is the printer driver table, used to convert
         generic escape codes into device specific instructions.
         It is loaded by DEVICE_CONTROL from the PRINTER_CONFIG
         file, using the key indicated in
         @ENVIRON.SET<E.PRN.DRVS,PRINTER_INFO<1>>

         PRINTER_INFO@ contains the following information:
         field 1   -         contains an integer indicating the
                             currently active printer.
         field 2   -         used to track open/closed status of
                             print job

*/
* Source Date: 09:26:07  14 NOV 1990  Build ID: AREV*2.0.110  Level: 2.1