*DECK SYMPL60 
PROC SYMPL60; 
BEGIN 
*CALL SYMPL00 
  
  
  
  
                                #--------------------------------------#
                                #                                      #
                                # FOLLOWING ROUTINES ARE CONTAINED IN  #
                                #                                      #
                                #   C K I M F O V                      #
                                #                                      #
      XREF PROC CKIMFOV;        # STDYES IF IN CORRECT S/M/R OVERLAY   #
                                #                                      #
                                #--------------------------------------#
  
  
  
  
                                #--------------------------------------#
                                #                                      #
                                # FOLLOWING ROUTINES ARE CONTAINED IN  #
                                #                                      #
                                #     C K O V L Y                      #
                                #                                      #
      XREF PROC CKOVLY;         # *STDYES IF IN PROPER OVERLAY         #
                                # FOR MOVE/EVALUATE DIRECTIVE          #
                                #                                      #
                                #--------------------------------------#
  
  
  
  
                                #--------------------------------------#
                                #                                      #
                                # FOLLOWING ROUTINES ARE CONTAINED IN  #
                                #                                      #
                                #   D I S P L A Y                      #
                                #                                      #
      XREF PROC DISPEND;        # FINISH DISPLAY TABLE                 #
      XREF PROC DISPTBL;        # SET DISPLAY TABLE                    #
      XREF PROC SETDISFROM;     # SET -DISPLAY FROM-, SAVE LFN         #
                                #                                      #
                                #--------------------------------------#
  
  
  
  
                                #--------------------------------------#
                                #                                      #
                                # FOLLOWING ROUTINES ARE CONTAINED IN  #
                                #                                      #
                                #   E X T R A C T                      #
                                #                                      #
      XREF PROC BUDEXTR;        # BUILD EXTRACT TABLE ENTRY            #
      XREF PROC BUDFIT;         # INITIALIZE INFO FOR -UPON- LFN       #
      XREF PROC CHKAS;          # CHECK IF -AS- CLAUSE LEGAL           #
      XREF PROC CHKFIGS;        # CHECK FOR LEGAL USE OF FIG SUBSCRIPT #
      XREF PROC DIROVOFF;       # SET TEMP DIRECTORY OVERRIDE TO OFF   #
      XREF PROC DIROVON;        # SET TEMP DIRECTORY OVERRIDE TO ON    #
      XREF PROC GET15;          # ALLOC A 15-WD BLK FOR EXTRACT TABLE  #
      XREF PROC NEWLFNLINK;     # LINK NEW LFN INTO -LFNLIST-          #
      XREF PROC RLSALL;         # RELEASE -DESLIST- TABLE SPACE        #
      XREF PROC RSDESLIST;      # RESTORE -DESLIST-                    #
      XREF PROC SVDESLIST;      # SAVE AND ZERO -DESLIST-              #
                                #                                      #
                                #--------------------------------------#
  
  
  
  
                                #--------------------------------------#
                                #                                      #
                                # FOLLOWING ROUTINES ARE CONTAINED IN  #
                                #                                      #
                                #   I F S Y N                          #
                                #                                      #
      XREF PROC CKFILL;         # CHECKS FOR IMMED OR DEFERRED EVAL    #
      XREF PROC IFTEMP;         # EVALUATES *IF* ON TEMPORARIES        #
      XREF PROC SETIFTBL;       # FLAGS TYPE OF THING *IF*ED           #
      XREF PROC SETNEXT;        # FLAG NEXT TRANSMISSION AS PREDICATE  #
                                #                                      #
                                #--------------------------------------#
  
  
  
  
                                #--------------------------------------#
                                #                                      #
                                # FOLLOWING ROUTINES ARE CONTAINED IN  #
                                #                                      #
                                #   I M F D I C T                      #
                                #                                      #
      XREF PROC FOL$END;        # STORE NAVIGATION STRATEGY            #
      XREF PROC FOL$INI;        # INITIALIZE FOLLOW DIRECTIVE          #
      XREF PROC FOL$OFF;        # TERMINATE FOLLOW DIRECTIVE           #
      XREF PROC GET$AP;         # FIND PATH GIVEN SEARCH KEYS          #
      XREF PROC INITID;         # INITIALIZE QUERY UPDATE TABLES       #
      XREF PROC STO$AP;         # GET ACCESS PATH IDENTIFIER           #
      XREF PROC STO$MEM;        # GET COSET AND MEMBER IDENTIFIERS     #
      XREF PROC STO$OWN;        # GET COSET AND OWNER IDENTIFIERS      #
      XREF PROC STO$REC;        # GET RECORD IDENTIFIER                #
                                #                                      #
                                #--------------------------------------#
  
  
  
  
                                #--------------------------------------#
                                #                                      #
                                # FOLLOWING ROUTINES ARE CONTAINED IN  #
                                #                                      #
                                #     M O V E V A L                    #
                                #                                      #
      XREF PROC MOVEXEC;        # ISOLATE AREA, IF ANY. BUILD MOVE TABL#
      XREF PROC MVEXP;          # *MOVE* AN EXPRESSION                 #
      XREF PROC SAVEVA;         # SAVE *EVALUATE* ENTRY                #
      XREF PROC SETMOVE;        # INITIALIZE FOR *MOVE* CLAUSE         #
      XREF PROC SETPOIN;        # CLEAR SM$GROUPID                     #
                                #                                      #
                                #--------------------------------------#
  
  
  
  
                                #--------------------------------------#
                                #                                      #
                                # FOLLOWING ROUTINES ARE CONTAINED IN  #
                                #                                      #
                                #   N A V I C H K                      #
                                #                                      #
      XREF PROC NAVICHK;        # NAVIGATIONAL STRATEGY CHECK          #
      XREF PROC SEGMCHK;        # PATH SEGMENTATION CHECK              #
                                #                                      #
                                #--------------------------------------#
  
  
  
  
                                #--------------------------------------#
                                #                                      #
                                # FOLLOWING ROUTINES ARE CONTAINED IN  #
                                #                                      #
                                #   S A M E                            #
                                #                                      #
      XREF PROC GETSAME;        # RETRIEVE FROM *SAME* ARRAY           #
      XREF PROC MOVSAME;        # SAVE IN *SAME* ARRAY                 #
      XREF PROC SAVPTR;         # SAVE POINTER TO NEW *SAME* LIST      #
                                #                                      #
                                #--------------------------------------#
  
  
  
  
                                #--------------------------------------#
                                #                                      #
                                # FOLLOWING ROUTINES ARE CONTAINED IN  #
                                #                                      #
                                #   S E M S M R                        #
                                #                                      #
      XREF PROC CHKSMR;         # VALIDITY CHECK FOR STORE/MOD/REMOVE  #
      XREF PROC DE$INI;         # INITIALIZE FOR DISPLAY/EXTRACT       #
      XREF PROC EV$INI;         # INITIALIZE *EVALUATE*                #
      XREF PROC IF$INI;         # SET BASCODE FOR *IF*                 #
      XREF PROC MOD$INI;        # BEGIN ANALYSIS OF -MODIFY-           #
      XREF PROC MOV$INI;        # INITIALIZE - MOVE- DIRECTIVE         #
      XREF PROC REM$INI;        # BEGIN ANALYSIS OF -REMOVE-           #
      XREF PROC SAVDATA;        # SAVE SETTING ENTRY                   #
      XREF PROC SAVEUSI;        # SAVE USING ENTRY                     #
      XREF PROC SETFROM;        # CHECH AND SAVE *FROM* FILE           #
      XREF PROC SETPV;          # SET *PASS/VETO* FLAG                 #
      XREF PROC SETSET;         # INITIALIZE *SETTING* FOR *STORE*     #
      XREF PROC SETUSI;         # INITIALIZE *USING* FOR *MOD/REMOVE*  #
      XREF PROC SETUSISET;      # INITIALIZE *SETTING* FOR *MOD/REMOVE*#
      XREF PROC SET60;          # INITIALIZE FOR DATA BASE ACCESS      #
      XREF PROC STO$INI;        # BEGIN ANALYSIS OF -STORE-            #
                                #                                      #
                                #--------------------------------------#
  
  
  
  
SWVECTR:                           # SWITCH OF PROC CALLS FOR STD      #
*CALL SUB60 
END 
TERM
