*DECK TOPTION 
      PROC TOPTION; 
      BEGIN 
      CONTROL STEXT;
*CALL NUMOPT
          DEF    CONTINUE#"+="#;   #CONTINUATION CHARACTERS FOR INPUT 
                                    FROM CARD OR CRT.  ONE TO TEN 
                                    EQUIVALENT CONTINUATION SYMBOLS CAN 
                                    BE DEFINED.  IF THE INSTALLATION
                                    WANTS TO USE AN APOSTROPHE, AN
                                    EQUIVALENCE SIGN OR A SEMI-COLON, 
                                    THE CONSTANT "CONTINUE" SHOULD BE 
                                    DEFINED WITH AN OCTAL LITERAL.     #
          # AMORE #                #DEFINED IN OPENTL.  IT IS THE 
                                    NOTICE SENT TO A CRT USER WHEN THERE
                                    IS MORE DATA WAITING FOR DISPLAY IN 
                                    THE BUFFERS.  THE USER REQUESTS THE 
                                    DATA BY TYPING ONE OF THE CHARACTERS
                                    DEFINED IN "NEXTPAGE".  (HAS A
                                    LEADING SKIP CHARACTER)            #
          DEF    SEP#"$"#;         #DEFAULT SEPARATOR TO DELIMIT ALPHA- 
                                    NUMERIC LITERALS.                  #
          DEF    NEXTDIR#" --"#;   #PROMPTING C8ARACTERS FOR NEXT 
                                    DIRECTIVE, WITH LEADING SKIP
                                    CHARACTER.                         #
          DEF    NEXTDATA#" >>"#;  #PROMPTING CHARACTERS FOR NEXT DATA
                                    LINE REQUIRED BY THE "USING" OPTION 
                                    OF THE INSERT/DELETE/UPDATE 
                                    DIRECTIVES.  (HAS A LEADING SKIP
                                    CHARACTER)                         #
          DEF    UNIVDEFLT#"##"#;    #DEFAULT UNIVERSAL CHAR# 
          DEF    VETOANSW#" VETO-"#; #PROMPTING CHARACTERS TO REQUEST 
                                    ANSWER TO THE VETO OPTION.  (HAS A
                                    LEADING SKIP CHARACTER)            #
          DEF    VETOYES#"YES"#;   # YES-ANSWER TO VETO REQUEST. QU WILL
                                     PERFORM THE PENDING ACTION.       #
          DEF    VETONO#"NO"#;     # NO-ANSWER TO VETO REQUEST. THE 
                                     PENDING ACTION WILL NOT BE DONE.  #
          DEF    VETOSTOP#"EXIT"#; # EXIT-ANSWER TO VETO REQUEST. THE 
                                     CURRENT DIRECTIVE IS DROPPED AND QU
                                     WILL REQUEST A NEW DIRECTIVE.     #
          DEF    VETOGO#"PROCEED"#; #PROCEED-ANSWER TO VETO REQUEST.
                                     THE VETO MODE THAT WAS ON FOR THIS 
                                     DIRECTIVE IS TURNED OFF AND QU WILL
                                     PROCEED TO THE COMPLETION OF THE 
                                     DIRECTIVE WITHOUT DISPLAYING ANY 
                                     INFORMATION FOR VERIFICATION.     #
          DEF    VETO#OFF#;        #THE VETO DIRECTIVE CAN BE SET TO ON 
                                    OR OFF AT LOAD TIME WITH "VETO".   #
  
          DEF FIELDNAMEMAX #5#; #MAX LEVEL OF QUALIFICATION FOR FIELD#
                                  #NAME#
          DEF    MAXSELECT #MAXSELE#; 
          DEF    MAXBREAK  #MAXBREA#; 
          DEF    MAXREPORT#200#;   #MAX NB OF REPORT ENTRIES# 
      DEF EESIZE       #3#;        #ELEMENTARY ITEM SIZE               #
      DEF EESIZEM1     #2#;        #ELEMENTARY ITEM SIZE MINUS ONE     #
  
      DEF LFNINFOSIZE  # 1+LFIT#;  #MINIMUM SIZE FOR LFNINFO TABLE     #
      DEF MAXATBLSIZE  #168#;      # MAXIMUM AREA TABLE SIZE           #000120
      DEF MINATBLSIZE  #14 + FDBSIZE + LFIT#;  # MIN LENGTH OF AREA TBL#
      DEF NBRAREASALLD #64#;       # MAXIMUM NO. OF AREAS ALLOWED      #
      DEF NBRRELSALLD  #59#;       # MAXIMUM NO. OF RELATIONS ALLOWED  #
  
  
         #OTHER ASSEMBLY OPTIONS. 
          SPECIFIC SORT COLLATING SEQUENCES CAN BE DEFINED AND NAMED
          DURING THE INSTALLATION OF THIS PRODUCT.  REFER TO THE
          TABLE -SEQTBL- IN THE COMPASS LISTING.                       #
      END 
      TERM
