*COMDECK  SUB03 
*CALL SUB00 
  
  
  
  
                                #--------------------------------------#
                                #                                      #
                                # FOLLOWING ROUTINES ARE CONTAINED IN  #
                                #                                      #
                                #   A T L I N E                        #
                                #                                      #
          BEYOFF              ; # TURN OFF ASSUMED *BEYOND*            #
          CKBYD               ; # CHECK FOR *BEYOND* WITH *TITLE*      #
          LINENO              ; # SAVE LINE NUMBER                     #
          SLINENO             ; 
                                #                                      #
                                #--------------------------------------#
  
  
  
  
                                #--------------------------------------#
                                #                                      #
                                # FOLLOWING ROUTINES ARE CONTAINED IN  #
                                #                                      #
                                #   B E F A F T                        #
                                #                                      #
          EVALAFT             ; # TEST FOR *BEFORE/AFTER*              #
          EVANO               ; # SET UP FOR THE *NO* OPTION           #022200
          EVAPTR1             ; # SET CODE FOR REPORT KEYWORD          #
          EVAPTR2             ; # SET FLAG FOR *ALL* OPTION            #
          EVAPTR3             ; # BUILD REPORT KEY FOR CATALOG         #
                                #                                      #
                                #--------------------------------------#
  
  
  
  
                                #--------------------------------------#
                                #                                      #
                                # FOLLOWING ROUTINES ARE CONTAINED IN  #
                                #                                      #
                                #   C E N T E R                        #
                                #                                      #
          CENTRON             ; # TURN ON *CENTER* BIT                 #
          COLMNO              ; # *CENTER* IN *COLUMN*                 #
          INCRCTR             ; # BUMP COUNTER FOR *NEXT TAB*          #
          NEXTAB              ; # *CENTER* IN *NEXT TAB*               #
          TABNO               ; # *CENTER* IN *TAB*                    #
                                #                                      #
                                #--------------------------------------#
  
  
  
  
                                #--------------------------------------#
                                #                                      #
                                # FOLLOWING ROUTINES ARE CONTAINED IN  #
                                #                                      #
                                #       C K O V L Y                    #
                                #                                      #
          CKOVLY              ; # *STDYES* IF IN PROPER OVERLAY FOR    #
                                # *MOVE*/*EVALUATE* DIRECTIVE. ELSE,   #
                                # RETURN THROUGH *STDNO*.              #
                                #                                      #
                                #--------------------------------------#
  
  
  
  
                                #--------------------------------------#
                                #                                      #
                                # FOLLOWING ROUTINES ARE CONTAINED IN  #
                                #                                      #
                                #   E V A L                            #
                                #                                      #
          EVAL                ; # COMMON PROCESSING FOR REPORT STYLE   #
                                # *MOVE/EVALUATE* SYNTAX               #
                                #                                      #
                                #--------------------------------------#
  
  
  
  
                                #--------------------------------------#
                                #                                      #
                                # FOLLOWING ROUTINES ARE CONTAINED IN  #
                                #                                      #
                                #   F O O T I N G                      #
                                #                                      #
          FTLEVEL             ; # SET THE *FOOTING* LEVEL NUMBER       #
                                #                                      #
                                #--------------------------------------#
  
  
  
  
                                #--------------------------------------#
                                #                                      #
                                # FOLLOWING ROUTINES ARE CONTAINED IN  #
                                #                                      #
                                #   H E A D I N G                      #
                                #                                      #
          ALLPG               ; # SET *ON ALL PAGES* OPTION            #
          HDLEVEL             ; # SET THE *HEADING* LEVEL NUMBER       #
                                #                                      #
                                #--------------------------------------#
  
  
  
  
                                #--------------------------------------#
                                #                                      #
                                # FOLLOWING ROUTINES ARE CONTAINED IN  #
                                #                                      #
                                #   I S E X P R                        #
                                #                                      #
          LASTPTR             ; # SET *LAST* POINTER IN HEADER         #
          STOATTR             ; # STORE ATTRIBUTES                     #
                                #                                      #
                                #--------------------------------------#
  
  
  
  
                                #--------------------------------------#
                                #                                      #
                                # FOLLOWING ROUTINES ARE CONTAINED IN  #
                                #                                      #
                                #   R P T E V A L                      #
                                #                                      #
          RESETEV             ; # RESET FOR ANOTHER *EVALUATE*         #
          SAVEVAL             ; # SAVE THIS *EVALUATE*                 #
                                #                                      #
                                #--------------------------------------#
  
  
  
  
                                #--------------------------------------#
                                #                                      #
                                # FOLLOWING ROUTINES ARE CONTAINED IN  #
                                #                                      #
                                #   R P T M O V E                      #
                                #                                      #
          MVEXP               ; # MOVE AN EXPRESSEION                  #
          MVNM                ; # MOVE A NAME                          #
          RESETMV             ; # RESET FOR ANOTHER *MOVE*             #
                                #                                      #
                                #--------------------------------------#
