*DECK SYNGN16 
PROC SYNGN16
*CALL LEXID 
          + 
*CALL SUB16 
          + 
*CALL SYNGN00 
      :ACCESS   :01 
            WRONGOVERLAY     / YES
  
      :ALTER    :01 
            WRONGOVERLAY     / YES
  
      :BREAK    :01 
            WRONGOVERLAY     / YES
  
      :COMPILE  :01 
            WRONGOVERLAY     / YES
  
      :CREATE   :01 
            WRONGOVERLAY     / YES
  
      :DATE     :01 
            WRONGOVERLAY     / YES
  
      :DEFINE   :01 
            WRONGOVERLAY     / YES
  
      :DELETE   :01 
            WRONGOVERLAY     / YES
  
      :DESCRIBE :01 
            WRONGOVERLAY     / YES
  
      :DETAIL   :01 
            WRONGOVERLAY     / YES
  
      :DIRECTORY  :01 
            WRONGOVERLAY     / YES
  
      :DISPLAY  :01 
            WRONGOVERLAY     / YES
  
      :DUPLICATE  :01 
            WRONGOVERLAY     / YES
  
      :ERASE    :01 
            WRONGOVERLAY     / YES
  
      :EVALUATE :01 
            WRONGOVERLAY     / YES
  
      :EXECUTE  :01 
            WRONGOVERLAY     / YES
  
      :EXHIBIT  :01 
            WRONGOVERLAY     / YES
  
      :EXTRACT  :01 
            WRONGOVERLAY     / YES
  
      :FOLLOW   :01 
            WRONGOVERLAY     / YES
  
      :FOOTING  :01 
            WRONGOVERLAY     / YES
  
      :FORMAT   :01 
            WRONGOVERLAY     / YES
  
      :HEADING  :01 
            WRONGOVERLAY     / YES
  
      :IF       :01 
            WRONGOVERLAY     / YES
  
      :INSERT   :01 
            WRONGOVERLAY     / YES
  
      :INVOKE   :01 
            WRONGOVERLAY     / YES
  
      :LOOKUP   :01 
            WRONGOVERLAY     / YES
  
      :MODIFY   :01 
            WRONGOVERLAY     / YES
  
      :MOVE     :01 
            WRONGOVERLAY     / YES
  
      :OS       :01                #-------O S-------------------------#
                                   #                                   #
            *OSINIT                # EXECUTE THE *OS* DIRECTIVE        #
            +SNC          NO /     # IF SOME ERROR                     #
            +SNC         YES / YES # IF SUCCESSFUL *OS* DIRECTIVE      #
                                   #                                   #
                                   #-----E N D----O S------------------#
  
      :PAGE-NUMBER  :01 
            WRONGOVERLAY     / YES
  
      :PAGE-SIZE  :01 
            WRONGOVERLAY     / YES
  
      :PERFORM  :01 
            WRONGOVERLAY     / YES
  
      :PREFACE  :01 
            WRONGOVERLAY     / YES
  
      :PREPARE  :01 
            WRONGOVERLAY     / YES
  
      :PREVIEW  :01 
            WRONGOVERLAY     / YES
  
      :RECAP    :01 
            WRONGOVERLAY     / YES
  
      :RECORDING  :01 
            WRONGOVERLAY     / YES
  
      :RECOVERY :01 
            WRONGOVERLAY     / YES
  
      :REMOVE   :01 
            WRONGOVERLAY     / YES
  
      :RETURN   :01                #-------R E T U R N-----------------#
                                   #                                   #
            *ENDBASC               #RELEASE MEMORY USED FOR BASIC TABLS#
            LOST          NO /     #IF XMISSION CONTAINED BASIC TABLE  #
                                   #DIRECTIVES, ERROR, IGNORE XMISSION #
        :03 *CHKNXID      05 / YES #CHECK IF NEXT WORD IS A DIRECTIVE  #
        :05 *SAVCP1A         /     #SET UP LFNINDEX FOR CHKLFN         #
            +NAME                  #                                   #
            D299  LOST    NO /     #IF NOT A VALID NAME                #
            *SVENAME         /     #SAVE THE RELATION OR PF NAME       #
            *RTNSCHEM     07 / 03  #IF SUBSCHEMA, RETURN SUB-SCHEMA    #
        :07 *RTNAREA      09 / 03  #IF AREA-NAME, RETURN AREA TABLE CM #
        :09 *RTNRELN      11 / 03  #IF RELATION, RETURN RELATION CM    #
        :11 *CHKLFN                #CHECK FOR VALID LOCAL FILE NAME    #
            D101  LOST    NO /     #ERROR IF NOT VALID LFN NAME        #
            *RTNLFN       03 / 03  #RETURN LFN                         #
                                   #                                   #
                                   #-----E N D----R E T U R N----------#
  
  
      :REWIND   :01                #-------R E W I N D-----------------#
                                   #                                   #
            *ENDBASC               #RELEASE MEMORY USED FOR BASIC TABLS#
            LOST          NO /     #IF XMISSION CONTAINED BASIC TABLE  #
                                   #DIRECTIVES, ERROR, IGNORE XMISSION #
        :03 *CHKNXID      05 / YES #CHECK IF NEXT WORD IS A DIRECTIVE  #
        :05 LFN                    #CHECK FOR VALID LFN                #
            LOST          NO /     #ERROR IF NOT VALID LFN             #
            *REWSEM       03 / 03  #REWIND FILE                        #
                                   #                                   #
                                   #-----E N D----R E W I N D----------#
  
      :SELECT   :01 
            WRONGOVERLAY     / YES
  
      :SEPARATOR  :01 
            WRONGOVERLAY     / YES
  
      :SORT     :01 
            WRONGOVERLAY     / YES
  
      :SPECIFY  :01 
            WRONGOVERLAY     / YES
  
      :STORE    :01 
            WRONGOVERLAY     / YES
  
      :SUMMARY  :01 
            WRONGOVERLAY     / YES
  
      :TABS     :01 
            WRONGOVERLAY     / YES
  
      :TIME     :01 
            WRONGOVERLAY     / YES
  
      :TITLE    :01 
            WRONGOVERLAY     / YES
  
      :UNIVERSAL  :01 
            WRONGOVERLAY     / YES
  
      :UPDATE   :01 
            WRONGOVERLAY     / YES
  
      :USE      :01 
            WRONGOVERLAY     / YES
  
      :VERIFY   :01 
            WRONGOVERLAY     / YES
  
      :VERSION  :01 
            WRONGOVERLAY     / YES
  
      :VETO     :01 
            WRONGOVERLAY     / YES
  
      :VIA      :01 
            WRONGOVERLAY     / YES
  
      :WHERE    :01                #----W H E R E----------------------#
            *ISIT77                # IF WE ARE NOT PROCESSING RESTRICTS#
            D077          NO /YES  # THEN THIS IS A USER INITIATED CALL#
                                   # FOR *WHERE* WHICH IS ILLEGAL.     #
                                   #----E N D----W H E R E-------------#
  
END 
