COMUOUT 
COMMON
  
#     COMUOUT - *FET* POINTER AND REPORT FORMATTER DEFINITIONS.       # 
                                               CONTROL NOLIST;
                                               CONTROL IFEQ LISTCON,1;
                                               CONTROL LIST;
                                               CONTROL FI;
      BEGIN  # COMUOUT #
  
# 
***   COMUOUT - *FET* POINTER AND REPORT FORMATTER DEFINITIONS. 
* 
*         COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
* 
*     *COMUOUT* CONTAINS A WORD IN COMMON TO HOLD THE ADDRESS 
*     OF THE *FET* FOR THE REPORT FILE.  THIS IS SET EQUAL TO 
*     *NULLFILE* IF NO REPORT FILE IS SPECIFIED.  IT ALSO 
*     CONTAINS THE STATUS LIST AND OTHER DEFINITIONS USED IN
*     CALLING THE *MSS* REPORT FORMATTER ROUTINES.
# 
  
  
      DEF CONT$LN    #1#;            # LINE CONTINUATION FLAG # 
      DEF DEFLT$HDR  #1#;            # DEFAULT HEADER OPTION #
      DEF END$LN     #0#;            # LINE END FLAG #
      DEF NULLFILE   #0#;            # NULL REPORT FILE OPTION #
  
      STATUS SP                      # REQUEST TYPES FOR *RPSPACE* #
        LIMIT,                       # CHANGE LINE LIMIT #
        LINE,                        # POSITION TO ABSOLUTE LINE #
        SPACE,                       # SPACE SPECIFIED NUMBER LINES # 
        LSTSP;                       # END OF STATUS LIST # 
  
      COMMON UOUTCOM; 
        BEGIN  # UOUTCOM #
        ITEM OUT$FETP   U;           # FET POINTER FOR REPORT FILE #
        END  # UOUTCOM #
  
      END  # COMUOUT #
  
                                               CONTROL LIST;
