!
! This file was converted from DEC LSE format to ELSE format
! by Douglas Harter (djharter@aol.com)
! Send an email to that address with any problems, concerns,
! or comments.
!
! This is the DEC implementation of COBOL on the mainframe.
! It might not comform exactly to the COBOL you are using
! on your computer.
!
!*************************************************************************
!									 *
!	      © 2000 BY							 *
!	      COMPAQ COMPUTER CORPORATION                                *
!	      © 1998, 2000 BY						 *
!	      ELECTRONIC DATA SYSTEMS LIMITED                            *
!									 *
! THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND  COPIED *
! ONLY  IN  ACCORDANCE  WITH  THE  TERMS  OF  SUCH  LICENSE AND WITH THE *
! INCLUSION OF THE ABOVE COPYRIGHT NOTICE.  THIS SOFTWARE OR  ANY  OTHER *
! COPIES  THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY *
! OTHER  PERSON.  NO  TITLE TO OR OWNERSHIP OF THE  SOFTWARE  IS  HEREBY *
! TRANSFERRED.                                                           *
!									 *
! THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE  WITHOUT  NOTICE *
! AND  SHOULD  NOT  BE  CONSTRUED  AS  A COMMITMENT  BY  COMPAQ COMPUTER *
! CORPORATION OR EDS.                                                    *
!									 *
! NEITHER  COMPAQ  NOR  EDS  ASSUME ANY RESPONSIBILITY FOR  THE  USE  OR *
! RELIABILITY  OF  THIS SOFTWARE ON EQUIPMENT WHICH IS NOT  SUPPLIED  BY *
! COMPAQ.                                                                *
!									 *
!*************************************************************************

DELETE LANGUAGE "cobol"
DEFINE LANGUAGE "cobol" -
    /VALID_IDENTIFIER_CHARACTERS="ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789$_-" -
    /INITIAL_STRING="[program module]" -
    /PUNCTUATION_CHARACTERS=".,;" -
    /INDENT_SIZE=4 -
    /VERSION="V2.2-622+" -

END DEFINE
DELETE PLACEHOLDER "({ARITHMETIC-EXPRESSION}...)" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "({ARITHMETIC-EXPRESSION}...)" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "({arithmetic-expression}...)"

END DEFINE

DELETE PLACEHOLDER "({LEFTMOST-CHARACTER-POSITION} : [{LENGTH}])" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "({LEFTMOST-CHARACTER-POSITION} : [{LENGTH}])" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "({leftmost-character-position} : [{length}])"

END DEFINE

DELETE PLACEHOLDER "01 [GROUP-DATA-NAME] .." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "01 [GROUP-DATA-NAME] .." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "01  [group-data-name]"
    "	[LINE NUMBER IS {{line-num1} [ON NEXT PAGE]|PLUS {line-num-plus}}]"
    "	[NEXT GROUP IS {{next-group-line-num}|PLUS {next-group-line-num-plus}|NEXT PAGE}]"
    "	[TYPE IS {{REPORT|PAGE|CONTROL} HEADING|DETAIL|{CONTROL|PAGE|REPORT} FOOTING}]"
    "	[USAGE IS DISPLAY]."
    "	[follows-report-group-description-entry]"

END DEFINE

DELETE PLACEHOLDER "66 {NEW-NAME} RENAMES {RENAME-START} [THROUGH {RENAME-END}]." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "66 {NEW-NAME} RENAMES {RENAME-START} [THROUGH {RENAME-END}]." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "66 {new-name} RENAMES {rename-start} [THROUGH {rename-end}]."

END DEFINE

DELETE PLACEHOLDER "88 {CONDITION-NAME} VALUE IS {{LOW-VALUE} [THROUGH {HIGH-VALUE}]}...." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "88 {CONDITION-NAME} VALUE IS {{LOW-VALUE} [THROUGH {HIGH-VALUE}]}...." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "88 {condition-name} VALUE IS {{low-value} [THROUGH {high-value}]}...."

END DEFINE

DELETE PLACEHOLDER "=={PSEUDO-TEXT-1}==" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "=={PSEUDO-TEXT-1}==" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "=={pseudo-text-1}=="

END DEFINE

DELETE PLACEHOLDER "=={PSEUDO-TEXT-1}== BY =={PSEUDO-TEXT-2}==" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "=={PSEUDO-TEXT-1}== BY =={PSEUDO-TEXT-2}==" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    " =={pseudo-text-1}== BY =={pseudo-text-2}=="

END DEFINE

DELETE PLACEHOLDER "=={PSEUDO-TEXT-2}==" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "=={PSEUDO-TEXT-2}==" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "=={pseudo-text-2}=="

END DEFINE

DELETE PLACEHOLDER ACCEPT1 -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER ACCEPT1 -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="ACCEPT [FROM input-source]" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "ACCEPT {dest-item1} [FROM {input-source}]"
    "	[at-end-phrase]"
    "END-ACCEPT"

END DEFINE

DELETE PLACEHOLDER ACCEPT2 -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER ACCEPT2 -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="ACCEPT FROM {DATE|DAY|DAY-OF-WEEK|TIME}" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "ACCEPT {dest-item1} FROM {DATE|DAY|DAY-OF-WEEK|TIME}"

END DEFINE

DELETE PLACEHOLDER ACCEPT3 -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER ACCEPT3 -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="ACCEPT screen extensions" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "ACCEPT {dest-item1}"
    "	[FROM LINE NUMBER {line-num-options1}]"
    "	[FROM COLUMN NUMBER {column-num-options1}]"
    "	[ERASE [TO END OF] {SCREEN|LINE}]"
    "	[WITH BELL]"
    "	[UNDERLINED]"
    "	[BOLD]"
    "	[WITH BLINKING]"
    "	[PROTECTED [SIZE {{prot-size-lit}|{prot-size-item}}] [with-options]]"
    "	[WITH CONVERSION]"
    "	[REVERSED]"
    "	[WITH NO ECHO]"
    "	[DEFAULT IS {default-options}]"
    "	[CONTROL KEY IN {key-dest-item}]"
    "	[on-exception-phrase|at-end-phrase]"
    "END-ACCEPT"

END DEFINE

DELETE PLACEHOLDER ACCEPT4 -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER ACCEPT4 -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="ACCEPT CONTROL KEY" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "ACCEPT CONTROL KEY IN {key-dest-item}"
    "	[FROM LINE NUMBER {line-num-options1}]"
    "	[FROM COLUMN NUMBER {column-num-options1}]"
    "	[ERASE [TO END OF] {SCREEN|LINE}]"
    "	[WITH BELL]"
    "	[on-exception-phrase|at-end-phrase]"
    "END-ACCEPT"

END DEFINE

DELETE PLACEHOLDER ACCEPT5 -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER ACCEPT5 -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="ACCEPT X/Open screen extensions for DEC COBOL" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "ACCEPT {screen-name3}"
    "	[FROM LINE NUMBER {screen-line-num-options}]"
    "	[FROM COLUMN NUMBER {screen-column-num-options}]"
    "	[on-exception-phrase]"
    "END-ACCEPT"

END DEFINE

DELETE PLACEHOLDER "ACCESS MODE IS SEQUENTIAL" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ACCESS MODE IS SEQUENTIAL" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "ACCESS MODE IS SEQUENTIAL"

END DEFINE

DELETE PLACEHOLDER "ACCESS MODE IS {SEQUENTIAL|RANDOM|DYNAMIC}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ACCESS MODE IS {SEQUENTIAL|RANDOM|DYNAMIC}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "ACCESS MODE IS {SEQUENTIAL|RANDOM|DYNAMIC}"

END DEFINE

DELETE PLACEHOLDER "ACCESS MODE IS {{SEQUENTIAL|RANDOM|DYNAMIC} RELATIVE KEY IS {REL-KEY}}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ACCESS MODE IS {{SEQUENTIAL|RANDOM|DYNAMIC} RELATIVE KEY IS {REL-KEY}}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "ACCESS MODE IS {{SEQUENTIAL|RANDOM|DYNAMIC} RELATIVE KEY IS {rel-key}}"

END DEFINE

DELETE PLACEHOLDER ADD1 -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER ADD1 -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="ADD .. TO" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "ADD {num-or-func} [{num-or-func}]... TO {{result-n} [ROUNDED]}..."
    "	[on-size-error-clause]"
    "END-ADD"

END DEFINE

DELETE PLACEHOLDER ADD2 -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER ADD2 -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="ADD .. GIVING" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "ADD {num-or-func} [{num-or-func}]... TO {num-or-func} GIVING {{result-n-or-ne} [ROUNDED]}..."
    "	[on-size-error-clause]"
    "END-ADD"

END DEFINE

DELETE PLACEHOLDER ADD3 -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER ADD3 -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="ADD CORRESPONDING" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "ADD CORRESPONDING {grp} TO {grp} [ROUNDED]"
    "	[on-size-error-clause]"
    "END-ADD"

END DEFINE

DELETE PLACEHOLDER "ADVANCE-NUM" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ADVANCE-NUM" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is an integer or the identifier of an unsigned data item described"
    "as an integer.  Its value can be zero."

END DEFINE

DELETE PLACEHOLDER "AFTER INITIAL {DELIM-VAL}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "AFTER INITIAL {DELIM-VAL}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "AFTER INITIAL {delim-val}"

END DEFINE

DELETE PLACEHOLDER "AFTER {VAR} FROM {INIT} BY {INCREM1} UNTIL {CONDITIONAL-EXPRESSION}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "AFTER {VAR} FROM {INIT} BY {INCREM1} UNTIL {CONDITIONAL-EXPRESSION}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "AFTER {var} FROM {init} BY {increm1} UNTIL {conditional-expression}"

END DEFINE

DELETE PLACEHOLDER ALL -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER ALL -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "ALL"

END DEFINE

DELETE PLACEHOLDER "ALL-PHRASE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ALL-PHRASE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "ALL [FROM {keeplist-name}...|CURRENT]"

END DEFINE

DELETE PLACEHOLDER "ALLOWING NO OTHERS" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ALLOWING NO OTHERS" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "ALLOWING NO OTHERS"

END DEFINE

DELETE PLACEHOLDER "ALLOWING {UPDATERS|READERS|NO OTHERS}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ALLOWING {UPDATERS|READERS|NO OTHERS}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "ALLOWING {UPDATERS|READERS|NO OTHERS}"

END DEFINE

DELETE PLACEHOLDER "ALLOWING-FILE-SHARING-OPTIONS" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ALLOWING-FILE-SHARING-OPTIONS" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "ALLOWING {allowing-options}"

END DEFINE

DELETE PLACEHOLDER "ALLOWING-OPTIONS" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ALLOWING-OPTIONS" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=MENU -

    "NO OTHERS"
    "[READERS] [WRITERS] [UPDATERS]"/PLACEHOLDER
    "ALL"

END DEFINE

DELETE PLACEHOLDER "ALL|LEADING|FIRST" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ALL|LEADING|FIRST" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "ALL"
    "LEADING"
    "FIRST"

END DEFINE

DELETE PLACEHOLDER ALPHA -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER ALPHA -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is an alphabet-name defined in the SPECIAL-NAMES paragraph of the"
    "Environment Division."

END DEFINE

DELETE PLACEHOLDER "ALPHABET {ALPHABET-NAME2} IS {ALPHABET-SELECTOR}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ALPHABET {ALPHABET-NAME2} IS {ALPHABET-SELECTOR}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "ALPHABET {alphabet-name2} IS {alphabet-selector}"

END DEFINE

DELETE PLACEHOLDER "ALPHABET-NAME1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ALPHABET-NAME1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the name of a collating sequence defined in the ALPHABET clause of the"
    "SPECIAL-NAMES paragraph."

END DEFINE

DELETE PLACEHOLDER "ALPHABET-NAME2" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ALPHABET-NAME2" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the user-defined word for a character set and/or collating"
    "sequence.  It always possesses the global attribute."

END DEFINE

DELETE PLACEHOLDER "ALPHABET-NAME3" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ALPHABET-NAME3" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the name of a character set defined in the SPECIAL-NAMES paragraph."
    "It cannot be described with literals in the ALPHABET clause."

END DEFINE

DELETE PLACEHOLDER "ALPHABET-SELECTOR" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ALPHABET-SELECTOR" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "ASCII"
    "STANDARD-1"
    "STANDARD-2"
    "NATIVE"
    "EBCDIC"
    "{first-literal} [THROUGH {last-literal}|ALSO {lit1}]"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "ALPHA|VAX" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ALPHA|VAX" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "ALPHA"
    "VAX"

END DEFINE

DELETE PLACEHOLDER "ALSO {DATABASE-KEY}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ALSO {DATABASE-KEY}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "ALSO {database-key}"

END DEFINE

DELETE PLACEHOLDER "ALSO {DATABASE-KEY}|NULL|WITHIN {KEEPLIST-NAME}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ALSO {DATABASE-KEY}|NULL|WITHIN {KEEPLIST-NAME}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "ALSO {database-key}"/PLACEHOLDER
    "NULL"
    "WITHIN {keeplist-name}"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "ALSO {EVAL-SUBJECT}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ALSO {EVAL-SUBJECT}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "ALSO {eval-subject}"

END DEFINE

DELETE PLACEHOLDER "ALSO {LIT1}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ALSO {LIT1}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "ALSO {lit1}"

END DEFINE

DELETE PLACEHOLDER "ALSO {OBJECT-ITEM}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ALSO {OBJECT-ITEM}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "ALSO {object-item}"

END DEFINE

DELETE PLACEHOLDER "ALT-KEY" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ALT-KEY" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the Alternate Record Key for the file.  It is the data-name of a data"
    "item in a Record Description entry for the file.  The data item must be"
    "described as: (1) alphanumeric or alphabetic category, (2) a group item,"
    "(3) unsigned numeric display, (4) a COMP-3 integer, or (5) a COMP integer"
    "with no more than eighteen digits."

END DEFINE

DELETE PLACEHOLDER "ALT-KEY2" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ALT-KEY2" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "alt-key"/PLACEHOLDER
    "{alt-seg-key = {seg}...}"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "ALT-SEG-KEY" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ALT-SEG-KEY" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the Alternate Record Key for the file. It is a  segmented-key  name"
    "that  represents  the  concatenation  of  one  or  more  (up to eight)"
    "occurrences of seg."

END DEFINE

DELETE PLACEHOLDER ALTER -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER ALTER -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="ALTER statement" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "ALTER {{proc} TO PROCEED TO {new-proc}}..."

END DEFINE

DELETE PLACEHOLDER "ALTERNATE RECORD KEY IS {ALT-KEY2} [WITH DUPLICATES] [ASCENDING|DESCENDING]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ALTERNATE RECORD KEY IS {ALT-KEY2} [WITH DUPLICATES] [ASCENDING|DESCENDING]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "ALTERNATE RECORD KEY IS {alt-key2} [WITH DUPLICATES] [ASCENDING|DESCENDING]"

END DEFINE

DELETE PLACEHOLDER "AND {SEARCH-SELECTOR}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "AND {SEARCH-SELECTOR}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "AND {search-selector}"

END DEFINE

DELETE PLACEHOLDER "AND|OR" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "AND|OR" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "AND"
    "OR"

END DEFINE

DELETE PLACEHOLDER "APPLY [APPLY-OPTIONS] ON {FILE-NAME}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "APPLY [APPLY-OPTIONS] ON {FILE-NAME}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "APPLY"
    "	[DEFERRED-WRITE]"
    "	[EXTENSION {extend-amt}]"
    "	[FILL-SIZE]"
    "	[LOCK-HOLDING]"
    "	[MASS-INSERT]"
    "	[[CONTIGUOUS|CONTIGUOUS-BEST-TRY] PREALLOCATION {preall-amt}]"
    "	[PRINT-CONTROL]"
    "	[WINDOW {window-ptrs}]"
    "	ON {file-name}..."

END DEFINE

DELETE PLACEHOLDER ARG1 -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER ARG1 -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "is the argument.  It identifies the data that is available to both the"
    "calling and called programs.  It is any data item described in the"
    "Sub-Schema Section, File Section, Working-Storage Section, or Linkage"
    "Section, or it is a nonnumeric literal."

END DEFINE

DELETE PLACEHOLDER ARG2 -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER ARG2 -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the argument tested against each elemnt in the search.  It is an"
    "identifier, a literal, or an arithmetic expression."

END DEFINE

DELETE PLACEHOLDER "ARG2-OR-FUNC" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ARG2-OR-FUNC" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "ARG2"/PLACEHOLDER
    "FUNCTION"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "ARITHMETIC-EXPR" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ARITHMETIC-EXPR" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "One of the following:"
    "  an identifier of a numeric elementary item"
    "  a numeric literal"
    "  two or more of the above choices separated by arithmetic operators"
    "  two or more arithmetic expressions separated by an arithmetic operator"
    "  an arithmetic expression enclosed in parentheses"

END DEFINE

DELETE PLACEHOLDER "ARITHMETIC-EXPRESSION" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ARITHMETIC-EXPRESSION" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "ARITHMETIC-EXPR"/PLACEHOLDER
    "FUNCTION"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "ASCENDING|DESCENDING" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ASCENDING|DESCENDING" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "ASCENDING"
    "DESCENDING"

END DEFINE

DELETE PLACEHOLDER "AT COLUMN NUMBER {COLUMN-NUM-OPTIONS2}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "AT COLUMN NUMBER {COLUMN-NUM-OPTIONS2}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "AT COLUMN NUMBER {column-num-options2}"

END DEFINE

DELETE PLACEHOLDER "AT COLUMN NUMBER {SCREEN-COLUMN-NUM-OPTIONS}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "AT COLUMN NUMBER {SCREEN-COLUMN-NUM-OPTIONS}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "AT COLUMN NUMBER {screen-column-num-options}"

END DEFINE

DELETE PLACEHOLDER "AT END {STATEMENT}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "AT END {STATEMENT}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "AT END"
    "   {statement}..."

END DEFINE

DELETE PLACEHOLDER "AT END-OF-PAGE {STATEMENT}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "AT END-OF-PAGE {STATEMENT}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "AT END-OF-PAGE"
    "	{statement}..."

END DEFINE

DELETE PLACEHOLDER "AT LINE NUMBER {LINE-NUM-OPTIONS2}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "AT LINE NUMBER {LINE-NUM-OPTIONS2}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "AT LINE NUMBER {line-num-options2}"

END DEFINE

DELETE PLACEHOLDER "AT LINE NUMBER {SCREEN-LINE-NUM-OPTIONS}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "AT LINE NUMBER {SCREEN-LINE-NUM-OPTIONS}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "AT LINE NUMBER {screen-line-num-options}"

END DEFINE

DELETE PLACEHOLDER "AT-END-OF-PAGE-PHRASE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "AT-END-OF-PAGE-PHRASE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[AT END-OF-PAGE {statement}...]"
    "[NOT AT END-OF-PAGE {statement}...]"

END DEFINE

DELETE PLACEHOLDER "AT-END-PHRASE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "AT-END-PHRASE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[AT END {statement}...]"
    "[NOT AT END {statement}...]"

END DEFINE

DELETE PLACEHOLDER "AT-END-PHRASE|ON-ERROR-PHRASE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "AT-END-PHRASE|ON-ERROR-PHRASE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "at-end-phrase"/PLACEHOLDER
    "on-error-phrase"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "AUTHOR. [COMMENT-ENTRY]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "AUTHOR. [COMMENT-ENTRY]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "AUTHOR. [comment-entry]"

END DEFINE

DELETE PLACEHOLDER AUTO -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER AUTO -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "AUTO"

END DEFINE

DELETE PLACEHOLDER "AXP|VAX" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "AXP|VAX" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "AXP"
    "VAX"

END DEFINE

DELETE PLACEHOLDER "BACKGROUND COLOR IS {COLOR-NUM}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "BACKGROUND COLOR IS {COLOR-NUM}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "BACKGROUND COLOR IS {color-num}"

END DEFINE

DELETE PLACEHOLDER "BEFORE INITIAL {DELIM-VAL}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "BEFORE INITIAL {DELIM-VAL}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "BEFORE INITIAL {delim-val}"

END DEFINE

DELETE PLACEHOLDER "BEFORE|AFTER" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "BEFORE|AFTER" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "BEFORE"
    "AFTER"

END DEFINE

DELETE PLACEHOLDER BELL -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER BELL -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "BELL"

END DEFINE

DELETE PLACEHOLDER "BLANK SCREEN" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "BLANK SCREEN" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "BLANK SCREEN"

END DEFINE

DELETE PLACEHOLDER "BLANK WHEN ZERO" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "BLANK WHEN ZERO" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "BLANK WHEN ZERO"

END DEFINE

DELETE PLACEHOLDER "BLANK {LINE|SCREEN}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "BLANK {LINE|SCREEN}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "BLANK {LINE|SCREEN}"

END DEFINE

DELETE PLACEHOLDER BLINK -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER BLINK -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "BLINK"

END DEFINE

DELETE PLACEHOLDER "BLOCK CONTAINS [{SMALLEST-BLOCK} TO] {BLOCKSIZE} {RECORDS|CHARACTERS}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "BLOCK CONTAINS [{SMALLEST-BLOCK} TO] {BLOCKSIZE} {RECORDS|CHARACTERS}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "BLOCK CONTAINS [{smallest-block} TO] {blocksize} {RECORDS|CHARACTERS}"

END DEFINE

DELETE PLACEHOLDER BLOCKSIZE -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER BLOCKSIZE -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is an integer literal.  It specifies the exact or maximum physical record"
    "size."

END DEFINE

DELETE PLACEHOLDER BOLD -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER BOLD -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "BOLD"

END DEFINE

DELETE PLACEHOLDER "BOOL-CONDITION" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "BOOL-CONDITION" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{src-item1} {bool-operator} {src-item1}"

END DEFINE

DELETE PLACEHOLDER "BOOL-EXP" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "BOOL-EXP" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[NOT] {bool-condition} [combined-bool-condition]..."

END DEFINE

DELETE PLACEHOLDER "BOOL-OPERATOR" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "BOOL-OPERATOR" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "IS [NOT] EQUAL TO"
    "IS [NOT] ="
    "IS [NOT] LESS THAN"
    "IS [NOT] <"
    "IS [NOT] GREATER THAN"
    "IS [NOT] >"
    "IS GREATER THAN OR EQUAL TO"
    "IS >="
    "IS LESS THAN OR EQUAL TO"
    "IS <="
    "DOES [NOT] CONTAINS"
    "DOES [NOT] MATCH"
    "DOES [NOT] MATCHES"

END DEFINE

DELETE PLACEHOLDER "BOTTOM-LINES" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "BOTTOM-LINES" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is an integer or the data-name of an elementary unsigned integer numeric"
    "data item.  Its value can be zero.  Bottom-lines specifies the number of"
    "lines in the bottom margin of the logical page.  If bottom-lines is"
    "a data-name, it can be qualified."

END DEFINE

DELETE PLACEHOLDER "BY CONTENT {ARG1}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "BY CONTENT {ARG1}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "BY CONTENT {arg1}..."

END DEFINE

DELETE PLACEHOLDER "BY DESCRIPTOR {ARG1}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "BY DESCRIPTOR {ARG1}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "BY DESCRIPTOR {arg1}..."

END DEFINE

DELETE PLACEHOLDER "BY REFERENCE {ARG1}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "BY REFERENCE {ARG1}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "BY REFERENCE {arg1}..."

END DEFINE

DELETE PLACEHOLDER "BY VALUE {ARG1}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "BY VALUE {ARG1}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "BY VALUE {arg1}..."

END DEFINE

DELETE PLACEHOLDER CALL -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER CALL -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="CALL statement" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "CALL {prog-name1}"
    "	[USING {first-args} [other-args]...]"
    "	[GIVING {function-res}]"
    "	[on-exception-phrase]"
    "END-CALL"

END DEFINE

DELETE PLACEHOLDER CANCEL -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER CANCEL -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="CANCEL statement" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "CANCEL {prog-name2}..."

END DEFINE

DELETE PLACEHOLDER "CARD-READER .." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CARD-READER .." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "CARD-READER"
    "PAPER-TAPE-READER"
    "CONSOLE"
    "LINE-PRINTER"
    "PAPER-TAPE-PUNCH"
    "C01"

END DEFINE

DELETE PLACEHOLDER "CHANNEL-NUM" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CHANNEL-NUM" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "for VAX COBOL VFU is an integer or the identifier of an unsigned data"
    "item described as an integer.  Its value can be between zero and 15."

END DEFINE

DELETE PLACEHOLDER CHAR -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER CHAR -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a one-character nonnumeric literal that specifies the currency symbol."
    "It cannot be a symbolic character."

END DEFINE

DELETE PLACEHOLDER "CHAR-VAL" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CHAR-VAL" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is an integer that indicates the ordinal position of a character in the"
    "native character set."

END DEFINE

DELETE PLACEHOLDER "CHARACTER-STRING" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CHARACTER-STRING" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "contains allowable combinations of characters in the COBOL character set."
    "These characters are called the 'symbols' of the PICTURE character-string;"
    "character-string can contain from 1 to 255 symbols."

END DEFINE

DELETE PLACEHOLDER "CHARACTERS BY {REPLACE-CHAR} [{BEFORE|AFTER} INITIAL {DELIM-VAL}]..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CHARACTERS BY {REPLACE-CHAR} [{BEFORE|AFTER} INITIAL {DELIM-VAL}]..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "CHARACTERS BY {replace-char} [{BEFORE|AFTER} INITIAL {delim-val}]..."

END DEFINE

DELETE PLACEHOLDER "CHG-DATE-AUTHOR-DESC" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CHG-DATE-AUTHOR-DESC" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "Chg #     Date     Author     Description"

END DEFINE

DELETE PLACEHOLDER "CLASS {CLASS-NAME} IS {CLASS-DEF}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CLASS {CLASS-NAME} IS {CLASS-DEF}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "CLASS {class-name} IS {class-def}..."

END DEFINE

DELETE PLACEHOLDER "CLASS-DEF" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CLASS-DEF" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{first-literal} [THROUGH {last-literal}]"

END DEFINE

DELETE PLACEHOLDER "CLASS-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CLASS-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a user-defined word for a class. It always possesses the global"
    "attribute"

END DEFINE

DELETE PLACEHOLDER "CLOSE-OPTION" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CLOSE-OPTION" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "REEL [FOR REMOVAL|WITH NO REWIND]"/PLACEHOLDER
    "UNIT [FOR REMOVAL|WITH NO REWIND]"/PLACEHOLDER
    "WITH NO REWIND"
    "WITH LOCK"

END DEFINE

DELETE PLACEHOLDER "CODE {REPORT-CODE}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CODE {REPORT-CODE}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "CODE {report-code}"

END DEFINE

DELETE PLACEHOLDER "CODE-SET IS {ALPHABET-NAME3}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CODE-SET IS {ALPHABET-NAME3}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "CODE-SET IS {alphabet-name3}"

END DEFINE

DELETE PLACEHOLDER "COLLATING SEQUENCE IS {ALPHA}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "COLLATING SEQUENCE IS {ALPHA}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "COLLATING SEQUENCE IS {alpha}"

END DEFINE

DELETE PLACEHOLDER "COLOR-NUM" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "COLOR-NUM" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "an integer in the range 0-7 specifying a color."

END DEFINE

DELETE PLACEHOLDER "COLUMN NUMBER IS {COLUMN-NUM1}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "COLUMN NUMBER IS {COLUMN-NUM1}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "COLUMN NUMBER IS {column-num1}"

END DEFINE

DELETE PLACEHOLDER "COLUMN NUMBER IS {[PLUS] {SCREEN-POSITION-SPEC}}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "COLUMN NUMBER IS {[PLUS] {SCREEN-POSITION-SPEC}}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "COLUMN NUMBER IS {[PLUS] {screen-position-spec}}"

END DEFINE

DELETE PLACEHOLDER "COLUMN-ID" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "COLUMN-ID" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the identifier of a data item that provides a column position on the"
    "terminal screen."

END DEFINE

DELETE PLACEHOLDER "COLUMN-NUM-OPTIONS1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "COLUMN-NUM-OPTIONS1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "COLUMN-NUM2"/PLACEHOLDER
    "{column-id} [PLUS [plus-num1]]"/PLACEHOLDER
    "PLUS [plus-num1]"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "COLUMN-NUM-OPTIONS2" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "COLUMN-NUM-OPTIONS2" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "COLUMN-NUM2"/PLACEHOLDER
    "{column-id} [PLUS [plus-num2]]"/PLACEHOLDER
    "PLUS [plus-num2]"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "COLUMN-NUM1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "COLUMN-NUM1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a positive integer greater than zero."

END DEFINE

DELETE PLACEHOLDER "COLUMN-NUM2" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "COLUMN-NUM2" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a numeric literal that specifies a column position on the terminal"
    "screen.  Column-num must be a positive integer.  It cannot be zero."

END DEFINE

DELETE PLACEHOLDER "COMBINED-BOOL-CONDITION" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "COMBINED-BOOL-CONDITION" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{AND|OR} [NOT] {bool-condition}"

END DEFINE

DELETE PLACEHOLDER "COMMENT-ENTRY" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "COMMENT-ENTRY" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "can consist of any combination of characters from the computer character"
    "set.  Comment-entries can span several lines in Area B.  However,"
    "they cannot be continued by using a hyphen in the indicator area."
    "The end of comment-entry is the line before the next entry in Area A."

END DEFINE

DELETE PLACEHOLDER COMMON -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER COMMON -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "COMMON"

END DEFINE

DELETE PLACEHOLDER "COMPARE-CHAR-CLAUSE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "COMPARE-CHAR-CLAUSE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{compare-val} [{BEFORE|AFTER} INITIAL {delim-val}]..."

END DEFINE

DELETE PLACEHOLDER "COMPARE-CHARS" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "COMPARE-CHARS" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the string that contains the individual characters that convert to"
    "those in convert-chars.  It is the same kind of item as compare-val."

END DEFINE

DELETE PLACEHOLDER "COMPARE-VAL" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "COMPARE-VAL" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the character-string INSPECT uses for comparison.  It is a nonnumeric"
    "literal (or figurative constant other than ALL literal) or the identifier"
    "of an elementary alphabetic, alphanumeric, or numeric data item with"
    "DISPLAY usage."

END DEFINE

DELETE PLACEHOLDER "COMPARE-VAL-CLAUSE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "COMPARE-VAL-CLAUSE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "ALL {compare-char-clause}..."
    "LEADING {compare-char-clause}..."
    "CHARACTERS [{BEFORE|AFTER} INITIAL {delim-val}]... "

END DEFINE

DELETE PLACEHOLDER "COMP|COMP-1|COMP-2|COMP-3|COMP-5|COMP-X|DISPLAY|INDEX|POINTER" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "COMP|COMP-1|COMP-2|COMP-3|COMP-5|COMP-X|DISPLAY|INDEX|POINTER" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "BINARY"
    "COMPUTATIONAL"
    "COMP"
    "COMPUTATIONAL-1"
    "COMP-1"
    "COMPUTATIONAL-2"
    "COMP-2"
    "COMPUTATIONAL-3"
    "COMP-3"
    "COMPUTATIONAL-5"
    "COMP-5"
    "COMPUTATIONAL-X"
    "COMP-X"
    "DISPLAY"
    "INDEX"
    "PACKED-DECIMAL"
    "POINTER"

END DEFINE

DELETE PLACEHOLDER "COMP|COMP-1|COMP-2|COMP-3|COMP-5|COMP-X|DISPLAY|INDEX|POINTER|POINTER-64" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "COMP|COMP-1|COMP-2|COMP-3|COMP-5|COMP-X|DISPLAY|INDEX|POINTER|POINTER-64" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "BINARY"
    "COMPUTATIONAL"
    "COMP"
    "COMPUTATIONAL-1"
    "COMP-1"
    "COMPUTATIONAL-2"
    "COMP-2"
    "COMPUTATIONAL-3"
    "COMP-3"
    "COMPUTATIONAL-5"
    "COMP-5"
    "COMPUTATIONAL-X"
    "COMP-X"
    "DISPLAY"
    "INDEX"
    "PACKED-DECIMAL"
    "POINTER"
    "POINTER-64"

END DEFINE

DELETE PLACEHOLDER "CONCURRENT|EXCLUSIVE|PROTECTED|BATCH" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CONCURRENT|EXCLUSIVE|PROTECTED|BATCH" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "CONCURRENT"
    "EXCLUSIVE"
    "PROTECTED"
    "BATCH"

END DEFINE

DELETE PLACEHOLDER "COND-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "COND-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a condition-name for the ON or OFF status of the switch."
    "It always possesses the global attribute.  Its truth value is"
    "TRUE when the STATUS phrase matches the status of the switch,"
    "FALSE when it does not."

END DEFINE

DELETE PLACEHOLDER "CONDITION-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CONDITION-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "A user-defined word that assigns a name to a subset of values that"
    "a conditional variable can assume or names the status of an external"
    "switch."

END DEFINE

DELETE PLACEHOLDER "CONDITION-NAME1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CONDITION-NAME1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "is a condition-name that must be associated with a conditional variable."

END DEFINE

DELETE PLACEHOLDER "CONDITIONAL-EXPRESSION" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CONDITIONAL-EXPRESSION" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "[NOT] {conditional-expression} {{AND|OR} [NOT] {conditional-expression}}..."/PLACEHOLDER
    "{relation-condition} [{AND|OR} [relational-operator] {relation-object}]..."/PLACEHOLDER
    "{identifier} IS [NOT] {NUMERIC|ALPHABETIC|ALPHABETIC-LOWER|ALPHABETIC-UPPER|{class-name}}"/PLACEHOLDER
    "CONDITION-NAME"/PLACEHOLDER
    "SWITCH-STATUS"/PLACEHOLDER
    "{arithmetic-expression} IS [NOT] {POSITIVE|NEGATIVE|ZERO}"/PLACEHOLDER
    "DATABASE-CONDITION"/PLACEHOLDER
    "{status-code-id} IS {SUCCESS|FAILURE}"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "CONFIGURATION SECTION .." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CONFIGURATION SECTION .." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "CONFIGURATION SECTION."
    "[SOURCE-COMPUTER ..]"
    "[OBJECT-COMPUTER ..]"
    "[SPECIAL-NAMES ..]"

END DEFINE

DELETE PLACEHOLDER "CONTAINED-PROGRAM" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CONTAINED-PROGRAM" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    ""
    "{IDENTIFICATION DIVISION ..}"
    "[ENVIRONMENT DIVISION ..]"
    "[DATA DIVISION ..]"
    "[PROCEDURE DIVISION ..]"
    "[contained-program]..."
    "END PROGRAM {program-name}."

END DEFINE

DELETE PLACEHOLDER "CONTAINS .. CHARACTERS|IS VARYING .." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CONTAINS .. CHARACTERS|IS VARYING .." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "CONTAINS [{shortest-rec} TO] {longest-rec} CHARACTERS"/PLACEHOLDER
    "IS VARYING IN SIZE [FROM {shortest-rec}] [TO {longest-rec}] CHARACTERS [DEPENDING ON {depending-item2}]"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "CONTAINS [{SHORTEST-REC} TO] {LONGEST-REC} CHARACTERS" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CONTAINS [{SHORTEST-REC} TO] {LONGEST-REC} CHARACTERS" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "CONTAINS [{shortest-rec} TO] {longest-rec} CHARACTERS"

END DEFINE

DELETE PLACEHOLDER "CONTIGUOUS|CONTIGUOUS-BEST-TRY" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CONTIGUOUS|CONTIGUOUS-BEST-TRY" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "CONTIGUOUS"
    "CONTIGUOUS-BEST-TRY"

END DEFINE

DELETE PLACEHOLDER "CONTROL FOOTING {{CONTROL-FOOT-NAME}|FINAL}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CONTROL FOOTING {{CONTROL-FOOT-NAME}|FINAL}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "CONTROL FOOTING {{control-foot-name}|FINAL}"

END DEFINE

DELETE PLACEHOLDER "CONTROL HEADING {{CONTROL-HEAD-NAME}|FINAL}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CONTROL HEADING {{CONTROL-HEAD-NAME}|FINAL}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "CONTROL HEADING {{control-head-name}|FINAL}"

END DEFINE

DELETE PLACEHOLDER "CONTROL IS {{CONTROL-NAME}|FINAL [CONTROL-NAME]...}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CONTROL IS {{CONTROL-NAME}|FINAL [CONTROL-NAME]...}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "CONTROL IS {{control-name}|FINAL [control-name]...}"

END DEFINE

DELETE PLACEHOLDER "CONTROL KEY IN {KEY-DEST-ITEM}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CONTROL KEY IN {KEY-DEST-ITEM}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "CONTROL KEY IN {key-dest-item}"

END DEFINE

DELETE PLACEHOLDER "CONTROL-FOOT-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CONTROL-FOOT-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "must reference a control-name in the report's CONTROL clause."

END DEFINE

DELETE PLACEHOLDER "CONTROL-HEAD-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CONTROL-HEAD-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "names a control-name in the CONTROL clause."

END DEFINE

DELETE PLACEHOLDER "CONTROL-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CONTROL-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "is any data-name in the Subschema, File, Working-Storage, or Linkage"
    "Section."

END DEFINE

DELETE PLACEHOLDER "CONVERT-CHARS" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CONVERT-CHARS" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the string that contains the individual characters to which the"
    "characters in compare-chars convert.  It is the same kind of item"
    "as compare-val."

END DEFINE

DELETE PLACEHOLDER "COUNT IN {COUNTR}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "COUNT IN {COUNTR}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "COUNT IN {countr}"

END DEFINE

DELETE PLACEHOLDER COUNTR -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER COUNTR -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the identifier of an elementary numeric data item described as an"
    "integer.  It contains the count of characters moved."

END DEFINE

DELETE PLACEHOLDER "CP-DESCRIPTION" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CP-DESCRIPTION" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "indicates how the program is called and what other programs are"
    "called from within the main program."

END DEFINE

DELETE PLACEHOLDER "CRT STATUS IS {CRT-STS-NAME}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CRT STATUS IS {CRT-STS-NAME}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION=" : FOR X/Open on DEC COBOL" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "CRT STATUS IS {crt-sts-name}"

END DEFINE

DELETE PLACEHOLDER "CRT-STS-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CRT-STS-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "For X/Open on DEC COBOL: is a group data item declared in program's Working-Storage"

END DEFINE

DELETE PLACEHOLDER "CURRENCY SIGN IS {CHAR}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CURRENCY SIGN IS {CHAR}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "CURRENCY SIGN IS {char}"

END DEFINE

DELETE PLACEHOLDER "CURRENCY-INDICATORS" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CURRENCY-INDICATORS" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[REALM] [RECORD] [[SET] [set-name]...]"

END DEFINE

DELETE PLACEHOLDER CURRENT -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER CURRENT -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "CURRENT"

END DEFINE

DELETE PLACEHOLDER "CURRENT [WITHIN {{RECORD-NAME}|{SET-NAME}|{REALM-NAME}}]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CURRENT [WITHIN {{RECORD-NAME}|{SET-NAME}|{REALM-NAME}}]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "CURRENT [WITHIN {{record-name}|{set-name}|{realm-name}}]"

END DEFINE

DELETE PLACEHOLDER "CURSOR IS {CURSOR-NAME}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CURSOR IS {CURSOR-NAME}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION=" : FOR X/Open on DEC COBOL" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "CURSOR IS {cursor-name}"

END DEFINE

DELETE PLACEHOLDER "CURSOR-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "CURSOR-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "For X/Open on DEC COBOL: is a data item declared in the program's Working-Storage"

END DEFINE

DELETE PLACEHOLDER "DATA DIVISION .." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DATA DIVISION .." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    ""
    "DATA DIVISION."
    "[SUB-SCHEMA SECTION ..]"
    "[FILE SECTION ..]"
    "[WORKING-STORAGE SECTION ..]"
    "[LINKAGE SECTION ..]"
    "[REPORT SECTION ..]"
    "[SCREEN SECTION ..]"

END DEFINE

DELETE PLACEHOLDER "DATA RECORDS ARE {REC-NAME3}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DATA RECORDS ARE {REC-NAME3}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "DATA RECORDS ARE {rec-name3}..."

END DEFINE

DELETE PLACEHOLDER "DATA-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DATA-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "names a data item in the File, Working-Storage, or Subschema Section."
    "Data-name may be qualified."

END DEFINE

DELETE PLACEHOLDER "DATABASE-CONDITION" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DATABASE-CONDITION" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "[NOT] [set-name] {OWNER|MEMBER|TENANT}"/PLACEHOLDER
    "[{set-name} IS] [NOT] EMPTY"/PLACEHOLDER
    "{database-key} IS [NOT] {ALSO {database-key}|NULL|WITHIN {keeplist-name}}"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "DATABASE-KEY" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DATABASE-KEY" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "references a DBMS currency indicator, or a DBMS keeplist entry"
    "in the Sub-Schema Section."

END DEFINE

DELETE PLACEHOLDER "DATABASE-KEY-ID" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DATABASE-KEY-ID" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "CURRENT [WITHIN {{record-name}|{set-name}|{realm-name}}]"/PLACEHOLDER
    "{OFFSET {integer-exp}|FIRST|LAST} {WITHIN {keeplist-name}}"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "DATABASE-KEY-ID|ALL-PHRASE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DATABASE-KEY-ID|ALL-PHRASE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "database-key-id"/PLACEHOLDER
    "all-phrase"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "DATABASE-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DATABASE-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "represents a complete or partial file specification defining the DBMS "
    "database occurrence.  A database occurrence is a root file.  At run time,"
    "database-name points the Data Base Control System (DBCS) to the root file."

END DEFINE

DELETE PLACEHOLDER "DATE [YYYYMMDD]|DAY [YYYYDDD]|DAY-OF-WEEK|TIME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DATE [YYYYMMDD]|DAY [YYYYDDD]|DAY-OF-WEEK|TIME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "DATE [YYYYMMDD]"
    "DAY [YYYYDDD]"
    "DAY-OF-WEEK"
    "TIME"

END DEFINE

DELETE PLACEHOLDER "DATE-COMPILED. [COMMENT-ENTRY]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DATE-COMPILED. [COMMENT-ENTRY]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "DATE-COMPILED. [comment-entry]"

END DEFINE

DELETE PLACEHOLDER "DATE-WRITTEN. [COMMENT-ENTRY]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DATE-WRITTEN. [COMMENT-ENTRY]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "DATE-WRITTEN. [comment-entry]"

END DEFINE

DELETE PLACEHOLDER "DATE|DAY|DAY-OF-WEEK|TIME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DATE|DAY|DAY-OF-WEEK|TIME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "DATE"
    "DAY"
    "DAY-OF-WEEK"
    "TIME"

END DEFINE

DELETE PLACEHOLDER "DB {SUBSCHEMA-NAME} .. [LD {KEEPLIST-NAME}.]..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DB {SUBSCHEMA-NAME} .. [LD {KEEPLIST-NAME}.]..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "DB {subschema-name} WITHIN {schema-name} "
    "	[FOR {database-name}] [THRU {stream-name}]."
    "[LD {keeplist-name}.]..."

END DEFINE

DELETE PLACEHOLDER DBKEY -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER DBKEY -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "DBKEY"

END DEFINE

DELETE PLACEHOLDER "DBM$_EXCEPTION-CONDITION" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DBM$_EXCEPTION-CONDITION" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "is a symbolic constant name beginning with the characters 'DBM$_'."
    "It identifies a DBMS exception condition."

END DEFINE

DELETE PLACEHOLDER "DECIMAL-POINT IS COMMA" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DECIMAL-POINT IS COMMA" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "DECIMAL-POINT IS COMMA"

END DEFINE

DELETE PLACEHOLDER "DECLARATIVE-SECTION" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DECLARATIVE-SECTION" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{section-name} SECTION [segment-number]."
    "	{use-statement}."
    "[paragraph]..."

END DEFINE

DELETE PLACEHOLDER "DECLARATIVES .." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DECLARATIVES .." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "DECLARATIVES."
    "{declarative-section}..."
    "END DECLARATIVES."

END DEFINE

DELETE PLACEHOLDER "DEFAULT IS {DEFAULT-OPTIONS}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DEFAULT IS {DEFAULT-OPTIONS}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "DEFAULT IS {default-options}"

END DEFINE

DELETE PLACEHOLDER "DEFAULT-OPTIONS" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DEFAULT-OPTIONS" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "DEFAULT-SRC-LIT"/PLACEHOLDER
    "DEFAULT-SRC-ITEM"/PLACEHOLDER
    "CURRENT VALUE"

END DEFINE

DELETE PLACEHOLDER "DEFAULT-SRC-ITEM" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DEFAULT-SRC-ITEM" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the identifier of an alphanumeric data item."

END DEFINE

DELETE PLACEHOLDER "DEFAULT-SRC-LIT" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DEFAULT-SRC-LIT" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a nonnumeric literal or a figurative constant.  However, it cannot"
    "be the figurative constant ALL literal."

END DEFINE

DELETE PLACEHOLDER "DEFERRED-WRITE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DEFERRED-WRITE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "DEFERRED-WRITE"

END DEFINE

DELETE PLACEHOLDER "DELIM-DEST" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DELIM-DEST" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the identifier of an alphanumeric data item.  It is the receiving"
    "field for delimiters."

END DEFINE

DELETE PLACEHOLDER "DELIM-VAL" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DELIM-VAL" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the character-string that delimits the INSPECT operation.  Its"
    "content restrictions are the same as those for compare-val."

END DEFINE

DELETE PLACEHOLDER DELIM1 -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER DELIM1 -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a nonnumeric literal or the identifier of a DISPLAY data item.  It is"
    "the delimiter of src-string."

END DEFINE

DELETE PLACEHOLDER DELIM2 -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER DELIM2 -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a nonumeric literal or the identifier of an alphanumeric data item."
    "It is the delimiter for the UNSTRING operation."

END DEFINE

DELETE PLACEHOLDER "DELIMITED BY [ALL] {DELIM2} [OR [ALL] {DELIM2}]..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DELIMITED BY [ALL] {DELIM2} [OR [ALL] {DELIM2}]..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "DELIMITED BY [ALL] {delim2} [OR [ALL] {delim2}]..."

END DEFINE

DELETE PLACEHOLDER "DELIMITER IN {DELIM-DEST}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DELIMITER IN {DELIM-DEST}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "DELIMITER IN {delim-dest}"

END DEFINE

DELETE PLACEHOLDER "DEPENDING ON {DEPENDING-ITEM2}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DEPENDING ON {DEPENDING-ITEM2}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "DEPENDING ON {depending-item2}"

END DEFINE

DELETE PLACEHOLDER "DEPENDING-ITEM1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DEPENDING-ITEM1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the data-name of an elementary unsigned integer data item.  Its value"
    "specifies the current number of occurrences.  Depending-item can be"
    "qualified."

END DEFINE

DELETE PLACEHOLDER "DEPENDING-ITEM2" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DEPENDING-ITEM2" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the data-name of an elementary unsigned integer data item in the"
    "Working-Storage or Linkage Section.  It specifies the number of"
    "character positions for an output operation, and it contains the number"
    "of character positions after a successful input operation."

END DEFINE

DELETE PLACEHOLDER "DESCRIPTION OR NONE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DESCRIPTION OR NONE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "NONE"

END DEFINE

DELETE PLACEHOLDER "DEST-AREA" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DEST-AREA" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the identifier of the data item to which the returned smrg-file record"
    "is moved."

END DEFINE

DELETE PLACEHOLDER "DEST-ITEM1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DEST-ITEM1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the identifier of a data item into which data is accepted."

END DEFINE

DELETE PLACEHOLDER "DEST-ITEM2" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DEST-ITEM2" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "is an identifier that represents the receiving area."

END DEFINE

DELETE PLACEHOLDER "DEST-ITEM3" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DEST-ITEM3" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the identifier of a data item that receives the record accessed by the"
    "READ statement."

END DEFINE

DELETE PLACEHOLDER "DEST-STRING" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DEST-STRING" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the identifier of an alphanumeric, alphabetic, or numeric DISPLAY"
    "data item.  It is the receiving field for the data from src-string."

END DEFINE

DELETE PLACEHOLDER "DEST-STRING1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DEST-STRING1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the identifier of a DISPLAY data item.  It cannot be reference"
    "modified.  Dest-string is the receiving area that contains the result"
    "of the concatenated src-strings."

END DEFINE

DELETE PLACEHOLDER "DESTINATION-KEEPLIST" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DESTINATION-KEEPLIST" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "names a DBMS keeplist in the program's Sub-Schema Section to receive"
    "DBMS database key values."

END DEFINE

DELETE PLACEHOLDER "DETAIL-REPORT-GROUP-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DETAIL-REPORT-GROUP-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "names a DETAIL report group."

END DEFINE

DELETE PLACEHOLDER "DEVICE-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DEVICE-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a mnemonic-name for a device or the first line of a logical page"
    "(top-of-page).  It always possesses the global attribute.  Only the"
    "ACCEPT, DISPLAY, and WRITE statements can refer to it."

END DEFINE

DELETE PLACEHOLDER "DISK-SEQ-FILE-EXPR" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DISK-SEQ-FILE-EXPR" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{EXTERNAL|DYNAMIC} {file-spec1}"

END DEFINE

DELETE PLACEHOLDER DISP -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER DISP -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is any literal, or any figurative constant except ALL literal."

END DEFINE

DELETE PLACEHOLDER "DYNAMIC RELATIVE KEY IS {REL-KEY}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "DYNAMIC RELATIVE KEY IS {REL-KEY}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "DYNAMIC RELATIVE KEY IS {rel-key}"

END DEFINE

DELETE PLACEHOLDER ELEMNT -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER ELEMNT -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is an indexed data-name.  It refers to the table element against which the"
    "argument is compared."

END DEFINE

DELETE PLACEHOLDER "ELSE {ELSE-PART}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ELSE {ELSE-PART}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "ELSE"
    "	{else-part}"

END DEFINE

DELETE PLACEHOLDER "ELSE-PART" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ELSE-PART" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "STATEMENT"/PLACEHOLDER
    "NEXT SENTENCE"

END DEFINE

DELETE PLACEHOLDER "END PROGRAM {PROGRAM-NAME}." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "END PROGRAM {PROGRAM-NAME}." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "END PROGRAM {program-name}."

END DEFINE

DELETE PLACEHOLDER "END-IF" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "END-IF" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "END-IF"

END DEFINE

DELETE PLACEHOLDER "END-PROC1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "END-PROC1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the section-name or paragraph-name of the OUTPUT procedure's"
    "last section or paragraph."

END DEFINE

DELETE PLACEHOLDER "END-PROC2" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "END-PROC2" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a procedure-name that identifies a paragraph or section in the"
    "Procedure Division.  The set of statements in end-proc are the last"
    "set of statements in the PERFORM range."

END DEFINE

DELETE PLACEHOLDER "END-PROC3" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "END-PROC3" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the section-name or paragraph-name of the last section"
    "or paragraph of the INPUT or OUTPUT procedure range."

END DEFINE

DELETE PLACEHOLDER "ENVIRONMENT DIVISION .." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ENVIRONMENT DIVISION .." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    ""
    "ENVIRONMENT DIVISION."
    "[CONFIGURATION SECTION ..]"
    "[INPUT-OUTPUT SECTION ..]"

END DEFINE

DELETE PLACEHOLDER "EOL|EOS" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "EOL|EOS" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "EOL"
    "EOS"

END DEFINE

DELETE PLACEHOLDER "ERASE [TO END OF] {SCREEN|LINE}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ERASE [TO END OF] {SCREEN|LINE}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "ERASE [TO END OF] {SCREEN|LINE}"

END DEFINE

DELETE PLACEHOLDER "ERASE {EOL|EOS}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ERASE {EOL|EOS}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "ERASE {EOL|EOS}"

END DEFINE

DELETE PLACEHOLDER "EVAL-SUBJECT" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "EVAL-SUBJECT" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=MENU -

    "SUBJ-ITEM"/PLACEHOLDER
    "FUNCTION"/PLACEHOLDER
    "TRUE"
    "FALSE"

END DEFINE

DELETE PLACEHOLDER "EXCEPTION|ERROR" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "EXCEPTION|ERROR" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "EXCEPTION"
    "ERROR"

END DEFINE

DELETE PLACEHOLDER "EXTEND-AMT" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "EXTEND-AMT" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is an integer from 0 through 65535.  It specifies the number of blocks"
    "in each extension of a disk file."

END DEFINE

DELETE PLACEHOLDER "EXTEND|OUTPUT" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "EXTEND|OUTPUT" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=MENU -

    "EXTEND {file-name1}..."
    "OUTPUT {{file-name1} [WITH NO REWIND]}..."

END DEFINE

DELETE PLACEHOLDER "EXTENSION {EXTEND-AMT}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "EXTENSION {EXTEND-AMT}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "EXTENSION {extend-amt}"

END DEFINE

DELETE PLACEHOLDER "EXTERNAL {EXTERNAL-NAME}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "EXTERNAL {EXTERNAL-NAME}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "EXTERNAL {external-name}"

END DEFINE

DELETE PLACEHOLDER "EXTERNAL-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "EXTERNAL-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "names a COBOL link-time bound constant.  It must define a word or longword"
    "integer value."

END DEFINE

DELETE PLACEHOLDER "EXTERNAL|DYNAMIC" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "EXTERNAL|DYNAMIC" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "EXTERNAL"
    "DYNAMIC"

END DEFINE

DELETE PLACEHOLDER "FD-INDEXED" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FD-INDEXED" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="FD indexed file" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "FD {file-name}"
    "	[IS EXTERNAL]"
    "	[IS GLOBAL]"
    "	[BLOCK CONTAINS [{smallest-block} TO] {blocksize} {RECORDS|CHARACTERS}]"
    "	[RECORD {CONTAINS .. CHARACTERS|IS VARYING ..}]"
    "	[LABEL RECORDS ARE {STANDARD|OMITTED}]"
    "	[VALUE OF ID IS {file-spec2}]"
    "	[DATA RECORDS ARE {rec-name3}...]"
    "	[ACCESS MODE IS {SEQUENTIAL|RANDOM|DYNAMIC}]"
    "	[RECORD KEY IS {rec-key1} [WITH DUPLICATES] [ASCENDING|DESCENDING]]"
    "   [ALTERNATE RECORD KEY IS {alt-key2} [WITH DUPLICATES] [ASCENDING|DESCENDING]]..."
    "	[FILE STATUS IS {file-stat}]."

END DEFINE

DELETE PLACEHOLDER "FD-RELATIVE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FD-RELATIVE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="FD relative file" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "FD {file-name}"
    "	[IS EXTERNAL]"
    "	[IS GLOBAL]"
    "	[BLOCK CONTAINS [{smallest-block} TO] {blocksize} {RECORDS|CHARACTERS}]"
    "	[RECORD {CONTAINS .. CHARACTERS|IS VARYING ..}]"
    "	[LABEL RECORDS ARE {STANDARD|OMITTED}]"
    "	[VALUE OF ID IS {file-spec2}]"
    "	[DATA RECORDS ARE {rec-name3}...]"
    "	[ACCESS MODE IS {{SEQUENTIAL|RANDOM|DYNAMIC} RELATIVE KEY IS {rel-key}}]"
    "	[FILE STATUS IS {file-stat}]."

END DEFINE

DELETE PLACEHOLDER "FD-REPORT" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FD-REPORT" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="FD report file" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "FD {file-name}"
    "	[IS EXTERNAL]"
    "	[IS GLOBAL]"
    "	[BLOCK CONTAINS [{smallest-block} TO] {blocksize} {RECORDS|CHARACTERS}]"
    "	[RECORD {CONTAINS .. CHARACTERS|IS VARYING ..}]"
    "	[LABEL RECORDS ARE {STANDARD|OMITTED}]"
    "	[VALUE OF ID IS {file-spec2}]"
    "	[ACCESS MODE IS SEQUENTIAL]"
    "	REPORTS ARE {report-name}..."
    "	[CODE-SET IS {alphabet-name3}]"
    "	[FILE STATUS IS {file-stat}]."

END DEFINE

DELETE PLACEHOLDER "FD-SEQUENTIAL" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FD-SEQUENTIAL" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="FD sequential file" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "FD {file-name}"
    "	[IS EXTERNAL]"
    "	[IS GLOBAL]"
    "	[BLOCK CONTAINS [{smallest-block} TO] {blocksize} {RECORDS|CHARACTERS}]"
    "	[RECORD {CONTAINS .. CHARACTERS|IS VARYING ..}]"
    "	[LABEL RECORDS ARE {STANDARD|OMITTED}]"
    "	[VALUE OF ID IS {file-spec2}]"
    "	[DATA RECORDS ARE {rec-name3}...]"
    "	[LINAGE IS {page-lines} LINES]"
    "	[CODE-SET IS {alphabet-name3}]"
    "	[ACCESS MODE IS SEQUENTIAL]"
    "	[FILE STATUS IS {file-stat}]."

END DEFINE

DELETE PLACEHOLDER "FILE SECTION .." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FILE SECTION .." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "FILE SECTION."
    "[file-description]..."
    "[report-file-description]..."
    "[sort-merge-file-description]..."

END DEFINE

DELETE PLACEHOLDER "FILE STATUS IS {FILE-STAT}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FILE STATUS IS {FILE-STAT}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "FILE STATUS IS {file-stat}"

END DEFINE

DELETE PLACEHOLDER "FILE-CONTROL .." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FILE-CONTROL .." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "FILE-CONTROL."
    "	{file-control-entry}..."

END DEFINE

DELETE PLACEHOLDER "FILE-CONTROL-ENTRY" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FILE-CONTROL-ENTRY" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR="" -
    /TYPE=MENU -

    "SELECT-LINE-SEQUENTIAL" /TOKEN
    "SELECT-SEQUENTIAL" /TOKEN
    "SELECT-RELATIVE" /TOKEN
    "SELECT-INDEXED" /TOKEN
    "SELECT-SORT-MERGE" /TOKEN
    "SELECT-REPORT" /TOKEN

END DEFINE

DELETE PLACEHOLDER "FILE-DESCRIPTION" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FILE-DESCRIPTION" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{file-description-entry}"
    "{record-description-entry}..."

END DEFINE

DELETE PLACEHOLDER "FILE-DESCRIPTION-ENTRY" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FILE-DESCRIPTION-ENTRY" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "FD-SEQUENTIAL" /TOKEN
    "FD-RELATIVE" /TOKEN
    "FD-INDEXED" /TOKEN

END DEFINE

DELETE PLACEHOLDER "FILE-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FILE-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "A user-defined word that names a file connector described in a file"
    "description entry or a sort-merge file description entry."

END DEFINE

DELETE PLACEHOLDER "FILE-NAME1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FILE-NAME1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "is the name of a file described in the Data Division.  It cannot be a sort"
    "or merge file."

END DEFINE

DELETE PLACEHOLDER "FILE-NAME2" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FILE-NAME2" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the name of a relative or indexed file described in the Data Division."
    "It cannot be the name of a sequential file or a sort or merge file."

END DEFINE

DELETE PLACEHOLDER "FILE-NAME3" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FILE-NAME3" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the name of an indexed or relative file with sequential or dynamic"
    "access.  It cannot be the name of a sort or merge file."

END DEFINE

DELETE PLACEHOLDER "FILE-NAME4" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FILE-NAME4" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the name of a sequential, relative, or indexed file described in the"
    "Data Division."

END DEFINE

DELETE PLACEHOLDER "FILE-SPEC-DATANAME-1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FILE-SPEC-DATANAME-1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a the data-name of an alphanumeric Working-Storage Section data item."
    "It contains a fullor partial file specification.  It can be qualified."

END DEFINE

DELETE PLACEHOLDER "FILE-SPEC-LITERAL-1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FILE-SPEC-LITERAL-1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a nonnumeric literal containing a full or partial file"
    "specification."

END DEFINE

DELETE PLACEHOLDER "FILE-SPEC1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FILE-SPEC1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "DISK"
    "PRINTER"
    "{file-spec-literal-1}"
    "{file-spec-dataname-1}"

END DEFINE

DELETE PLACEHOLDER "FILE-SPEC2" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FILE-SPEC2" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a nonnumeric literal or the data-name of an alphanumeric Working-"
    "Storage Section data item.  It contains the full or partial file"
    "specification.  File-spec can be qualified."

END DEFINE

DELETE PLACEHOLDER "FILE-SPEC3" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FILE-SPEC3" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "DISK"
    "{file-spec-literal-1}"
    "{file-spec-dataname-1}"

END DEFINE

DELETE PLACEHOLDER "FILE-STAT" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FILE-STAT" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the data-name of a two-character alphanumeric Sub-Schema Section,"
    "Working-Storage Section, or Linkage Section data item.  File-stat is the"
    "file's FILE STATUS data item."

END DEFINE

DELETE PLACEHOLDER "FILL-SIZE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FILL-SIZE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "FILL-SIZE"

END DEFINE

DELETE PLACEHOLDER "FINAL [CONTROL-NAME]..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FINAL [CONTROL-NAME]..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "FINAL [control-name]..."

END DEFINE

DELETE PLACEHOLDER "FIRST DETAIL {FIRST-DETAIL-LINE}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FIRST DETAIL {FIRST-DETAIL-LINE}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "FIRST DETAIL {first-detail-line}"

END DEFINE

DELETE PLACEHOLDER "FIRST-ARGS" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FIRST-ARGS" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "ARG1"/PLACEHOLDER
    "BY REFERENCE {arg1}..."/PLACEHOLDER
    "BY CONTENT {arg1}..."/PLACEHOLDER
    "BY DESCRIPTOR {arg1}..."/PLACEHOLDER
    "BY VALUE {arg1}..."/PLACEHOLDER
    "OMITTED"

END DEFINE

DELETE PLACEHOLDER "FIRST-DETAIL-LINE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FIRST-DETAIL-LINE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a one- to three-digit integer.  It defines the first line number for"
    "a CONTROL HEADING, DETAIL, and CONTROL FOOTING report group on the"
    "logical page."

END DEFINE

DELETE PLACEHOLDER "FIRST-LITERAL" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FIRST-LITERAL" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a literal.  It specifies: (1) the value of one or more alphabetic"
    "characters, or (2) the first in a range of values."

END DEFINE

DELETE PLACEHOLDER "FIRST-PROC1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FIRST-PROC1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the section-name or paragraph-name of the OUTPUT procedure's"
    "first (or only) section or paragraph."

END DEFINE

DELETE PLACEHOLDER "FIRST-PROC2" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FIRST-PROC2" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a procedure-name that identifies a paragraph or section in the"
    "Procedure Division.  The set of statements in first-proc are the"
    "first (or only) set of statements in the PERFORM range."

END DEFINE

DELETE PLACEHOLDER "FIRST-PROC3" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FIRST-PROC3" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the section-name or paragraph-name of the first (or only)"
    "section or paragraph of the INPUT or OUTPUT procedure range."

END DEFINE

DELETE PLACEHOLDER "FLD-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FLD-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "is the identifier of the receiving area data item."

END DEFINE

DELETE PLACEHOLDER "FOLLOWS-REPORT-GROUP-DESCRIPTION-ENTRY" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FOLLOWS-REPORT-GROUP-DESCRIPTION-ENTRY" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR="" -
    /TYPE=MENU -

    "REPORT-SUBORDINATE-ENTRY"/PLACEHOLDER
    "REPORT-ELEMENTARY-ENTRY"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "FOOTING {FOOTING-LINE2}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FOOTING {FOOTING-LINE2}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "FOOTING {footing-line2}"

END DEFINE

DELETE PLACEHOLDER "FOOTING-LINE1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FOOTING-LINE1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a positive integer or the data-name of an elementary unsigned integer"
    "numeric data item.  Its value must be greater than zero, but cannot be"
    "greater than page-lines.  Footing-line specifies the line number where"
    "the footing area begins in the page body.  If footing-line is a"
    "data-name, it can be qualified."

END DEFINE

DELETE PLACEHOLDER "FOOTING-LINE2" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FOOTING-LINE2" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a one- to three-digit integer.  It defines the last line number for a"
    "CONTROL FOOTING report group and the first line number for the PAGE"
    "FOOTING report group on the logical page."

END DEFINE

DELETE PLACEHOLDER "FOR REMOVAL|WITH NO REWIND" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FOR REMOVAL|WITH NO REWIND" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "FOR REMOVAL"
    "WITH NO REWIND"

END DEFINE

DELETE PLACEHOLDER "FOR UPDATE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FOR UPDATE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "FOR UPDATE"

END DEFINE

DELETE PLACEHOLDER "FOR {DATABASE-NAME}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FOR {DATABASE-NAME}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "FOR {database-name}"

END DEFINE

DELETE PLACEHOLDER "FOREGROUND COLOR IS {COLOR-NUM}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FOREGROUND COLOR IS {COLOR-NUM}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "FOREGROUND COLOR IS {color-num}"

END DEFINE

DELETE PLACEHOLDER "FP-DESCRIPTION" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FP-DESCRIPTION" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a description of the meaning of the parameters that are passed."

END DEFINE

DELETE PLACEHOLDER "FROM COLUMN NUMBER {COLUMN-NUM-OPTIONS1}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FROM COLUMN NUMBER {COLUMN-NUM-OPTIONS1}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "FROM COLUMN NUMBER {column-num-options1}"

END DEFINE

DELETE PLACEHOLDER "FROM COLUMN NUMBER {SCREEN-COLUMN-NUM-OPTIONS}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FROM COLUMN NUMBER {SCREEN-COLUMN-NUM-OPTIONS}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "FROM COLUMN NUMBER {screen-column-num-options}"

END DEFINE

DELETE PLACEHOLDER "FROM LINE NUMBER {LINE-NUM-OPTIONS1}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FROM LINE NUMBER {LINE-NUM-OPTIONS1}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "FROM LINE NUMBER {line-num-options1}"

END DEFINE

DELETE PLACEHOLDER "FROM LINE NUMBER {SCREEN-LINE-NUM-OPTIONS}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FROM LINE NUMBER {SCREEN-LINE-NUM-OPTIONS}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "FROM LINE NUMBER {screen-line-num-options}"

END DEFINE

DELETE PLACEHOLDER "FROM {INPUT-SOURCE}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FROM {INPUT-SOURCE}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "FROM {input-source}"

END DEFINE

DELETE PLACEHOLDER "FROM {KEEPLIST-NAME}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FROM {KEEPLIST-NAME}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "FROM {keeplist-name}..."

END DEFINE

DELETE PLACEHOLDER "FROM {KEEPLIST-NAME}...|CURRENT" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FROM {KEEPLIST-NAME}...|CURRENT" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "FROM {keeplist-name}..."/PLACEHOLDER
    "CURRENT"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "FROM {SHORTEST-REC}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FROM {SHORTEST-REC}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "FROM {shortest-rec}"

END DEFINE

DELETE PLACEHOLDER "FROM {SRC-AREA}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FROM {SRC-AREA}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "FROM {src-area}"

END DEFINE

DELETE PLACEHOLDER "FROM {SRC-ITEM4}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FROM {SRC-ITEM4}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "FROM {src-item4}"

END DEFINE

DELETE PLACEHOLDER FULL -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER FULL -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "FULL"

END DEFINE

DELETE PLACEHOLDER "FUNC-ARG2" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FUNC-ARG2" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{func-item2}[({leftmost-character-position} : [{length}])]"

END DEFINE

DELETE PLACEHOLDER "FUNC-ITEM2" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FUNC-ITEM2" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "A nonnumeric literal, an identifier of an"
    "alphanumeric, alphabetic data item; or a numeric literal,"
    "the identifier of an elementary numeric data item, or"
    "an arithmetic expression.  If a table is specified, the"
    "table may be subscripted with ALL."

END DEFINE

DELETE PLACEHOLDER FUNCTION -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER FUNCTION -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="Intrinsic FUNCTION" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "FUNCTION {function-name}"

END DEFINE

DELETE PLACEHOLDER "FUNCTION-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FUNCTION-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "ACOS ({numeric-arg1})"
    "ANNUITY ({numeric-arg1} {integer-arg})"
    "ARGCOUNT"
    "ASIN ({numeric-arg1})"
    "ATAN ({numeric-arg1})"
    "CHAR ({integer-arg})"
    "COS ({numeric-arg1})"
    "CURRENT-DATE"
    "DATE-OF-INTEGER ({integer-arg})"
    "DAY-OF-INTEGER ({integer-arg})"
    "FACTORIAL ({integer-arg})"
    "INTEGER ({numeric-arg1})"
    "INTEGER-OF-DATE ({integer-arg})"
    "INTEGER-OF-DAY ({integer-arg})"
    "INTEGER-PART ({numeric-arg1})"
    "LENGTH ({nonnumeric-arg})"
    "LOG ({numeric-arg1})"
    "LOG10 ({numeric-arg1})"
    "LOWER-CASE ({nonnumeric-arg})"
    "MAX ({func-arg2}...)[({leftmost-character-position} : [{length}])]"
    "MEAN ({numeric-arg2}...)"
    "MEDIAN ({numeric-arg2}...)"
    "MIDRANGE ({numeric-arg2}...)"
    "MIN ({func-arg2}...)[({leftmost-character-position} : [{length}])]"
    "MOD ({integer-arg} {integer-arg})"
    "NUMVAL ({nonnumeric-arg})"
    "NUMVAL-C ({nonnumeric-arg} {nonnumeric-arg})"
    "ORD ({nonnumeric-arg})"
    "ORD-MAX ({func-arg2}...)"
    "ORD-MIN ({func-arg2}...)"
    "PRESENT-VALUE ({numeric-arg1} {numeric-arg2}...)"
    "RANDOM ([{ran-arg}])"
    "RANGE ({numeric-arg2}...)"
    "REM ({numeric-arg1} {numeric-arg1})"
    "REVERSE ({nonnumeric-arg})"
    "SIN ({numeric-arg1})"
    "SQRT ({numeric-arg1})"
    "STANDARD-DEVIATION ({numeric-arg2}...)"
    "SUM ({numeric-arg2}...)"
    "TAN ({numeric-arg1})"
    "UPPER-CASE ({nonnumeric-arg})"
    "VARIANCE ({numeric-arg2}...)"
    "WHEN-COMPILED[({leftmost-character-position} : [{length}])]"

END DEFINE

DELETE PLACEHOLDER "FUNCTION-RES" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "FUNCTION-RES" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the identifier of an elementary integer numeric data item with COMP,"
    "COMP-1, or COMP-2 usage and no scaling positions.  Function-res can be"
    "subscripted, and it can be qualified.  When control returns to the calling"
    "program, function-res can contain a function result."

END DEFINE

DELETE PLACEHOLDER "GIVING {FUNCTION-RES}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "GIVING {FUNCTION-RES}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "GIVING {function-res}"

END DEFINE

DELETE PLACEHOLDER "GIVING {IDENTIFIER}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "GIVING {IDENTIFIER}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "GIVING {identifier}"

END DEFINE

DELETE PLACEHOLDER "GIVING {OUTFILE}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "GIVING {OUTFILE}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "GIVING {outfile}..."

END DEFINE

DELETE PLACEHOLDER GLOBAL -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER GLOBAL -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "GLOBAL"

END DEFINE

DELETE PLACEHOLDER "GROUP INDICATE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "GROUP INDICATE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "GROUP INDICATE"

END DEFINE

DELETE PLACEHOLDER "GROUP-DATA-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "GROUP-DATA-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the name of a report group in a report group description entry in a"
    "Data Division.  It must not appear in more than one USE statement."

END DEFINE

DELETE PLACEHOLDER GRP -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER GRP -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the identifier of a numeric group item."

END DEFINE

DELETE PLACEHOLDER "HEADING {HEADING-LINE}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "HEADING {HEADING-LINE}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "HEADING {heading-line}"

END DEFINE

DELETE PLACEHOLDER "HEADING-LINE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "HEADING-LINE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a one- to three-digit integer.  It defines the first line number for"
    "a REPORT HEADING or PAGE HEADING report group on the logical page."

END DEFINE

DELETE PLACEHOLDER "HIGH-VAL" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "HIGH-VAL" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a numeric or nonnumeric literal.  It is the highest value in a range"
    "of values associated with a condition-name in a level 88 data"
    "description entry."

END DEFINE

DELETE PLACEHOLDER "HIGH-VALUE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "HIGH-VALUE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "HIGH-VAL"/PLACEHOLDER
    "EXTERNAL {external-name}"/PLACEHOLDER
    "REFERENCE {data-name}"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "HIGHLIGHT|LOWLIGHT" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "HIGHLIGHT|LOWLIGHT" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "HIGHLIGHT"
    "LOWLIGHT"

END DEFINE

DELETE PLACEHOLDER "I-O-CONTROL .." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "I-O-CONTROL .." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "I-O-CONTROL."
    "	[i-o-control-entry]"

END DEFINE

DELETE PLACEHOLDER "I-O-CONTROL-ENTRY" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "I-O-CONTROL-ENTRY" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[APPLY [apply-options] ON {file-name}...]..."
    "[SAME [RECORD|SORT|SORT-MERGE] AREA FOR {same-area-file} {same-area-file}...]..."
    "[MULTIPLE FILE TAPE CONTAINS {{file-name} [POSITION {pos-num}]}...]..."

END DEFINE

DELETE PLACEHOLDER "IDENTIFICATION DIVISION .." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "IDENTIFICATION DIVISION .." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "IDENTIFICATION DIVISION."
    "PROGRAM-ID. {program-name} [IS [INITIAL] [COMMON] PROGRAM] [WITH IDENT {module-vers-string}]."
    "[AUTHOR. [comment-entry]]"
    "[INSTALLATION. [comment-entry]]"
    "[DATE-WRITTEN. [comment-entry]]"
    "[DATE-COMPILED. [comment-entry]]"
    "[SECURITY. [comment-entry]]"
    "[Routine level comments]"

END DEFINE

DELETE PLACEHOLDER IDENTIFIER -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER IDENTIFIER -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{data-name} [OF {data-name}]... [({arithmetic-expression}...)] [({leftmost-character-position} : [{length}])]"

END DEFINE

DELETE PLACEHOLDER "IDENTIFIER-1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "IDENTIFIER-1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a text-matching argument that the compiler compares against text-words"
    "in the library text."

END DEFINE

DELETE PLACEHOLDER "IDENTIFIER-2" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "IDENTIFIER-2" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a replacement item that the compiler inserts into the source program."

END DEFINE

DELETE PLACEHOLDER IDENTIFIER1 -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER IDENTIFIER1 -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a data item in the File, Working-Storage, Linkage, or Sub-Schema Section."

END DEFINE

DELETE PLACEHOLDER "II-DESCRIPTION" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "II-DESCRIPTION" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "describes all uses of the values of global storage objects used"
    "by the program."

END DEFINE

DELETE PLACEHOLDER "IN DICTIONARY" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "IN DICTIONARY" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "IN DICTIONARY"

END DEFINE

DELETE PLACEHOLDER "IN {ALPHABET-NAME2}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "IN {ALPHABET-NAME2}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "IN {alphabet-name2}"

END DEFINE

DELETE PLACEHOLDER INCREM1 -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER INCREM1 -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a nonzero numeric literal or the identifier of a numeric elementary"
    "data item.  It systematically changes the value of var each time"
    "the program executes all statements in the PERFORM range."

END DEFINE

DELETE PLACEHOLDER INCREM2 -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER INCREM2 -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is an integer, which may be signed.  It can also be the identifier of an"
    "elementary numeric data item described as an integer."

END DEFINE

DELETE PLACEHOLDER "IND-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "IND-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "is an index-name.  It associates an index with the table and allows"
    "indexing in table element references."

END DEFINE

DELETE PLACEHOLDER "INDEXED BY {IND-NAME}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "INDEXED BY {IND-NAME}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "INDEXED BY {ind-name}..."

END DEFINE

DELETE PLACEHOLDER INDX -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER INDX -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "is an index-name."

END DEFINE

DELETE PLACEHOLDER INFILE -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER INFILE -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "is the file-name of the input file.  It must be described in a file"
    "description (FD) entry in the Data Division."

END DEFINE

DELETE PLACEHOLDER INIT -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER INIT -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a numeric literal, index-name, or the identifier of a numeric"
    "elementary data item.  It specifies the value of var before any"
    "statement in the PERFORM range executes."

END DEFINE

DELETE PLACEHOLDER INITIAL -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER INITIAL -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "INITIAL"

END DEFINE

DELETE PLACEHOLDER "INPUT PROCEDURE ..|USING .." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "INPUT PROCEDURE ..|USING .." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "INPUT PROCEDURE IS {first-proc3} [THROUGH {end-proc3}]"/PLACEHOLDER
    "USING {infile}..."/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "INPUT PROCEDURE IS {FIRST-PROC3} [THROUGH {END-PROC3}]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "INPUT PROCEDURE IS {FIRST-PROC3} [THROUGH {END-PROC3}]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "INPUT PROCEDURE IS {first-proc3} [THROUGH {end-proc3}]"

END DEFINE

DELETE PLACEHOLDER "INPUT-OUTPUT SECTION .." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "INPUT-OUTPUT SECTION .." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "INPUT-OUTPUT SECTION."
    "{FILE-CONTROL ..}"
    "[I-O-CONTROL ..]"

END DEFINE

DELETE PLACEHOLDER "INPUT-SOURCE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "INPUT-SOURCE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a mnemonic-name defined in the SPECIAL-NAMES paragraph of the"
    "Environment Division."

END DEFINE

DELETE PLACEHOLDER "INPUT|OUTPUT|I-O|EXTEND" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "INPUT|OUTPUT|I-O|EXTEND" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=MENU -

    "INPUT {{file-name1} {[WITH NO REWIND] [{open-locking-options}]}}..."
    "OUTPUT {{file-name1} {[WITH NO REWIND] [{open-locking-options}]}}..."
    "I-O {{file-name1} {[{open-locking-options}]}}..."
    "EXTEND {{file-name1} {[{open-locking-options}]}}..."

END DEFINE

DELETE PLACEHOLDER "INSTALLATION. [COMMENT-ENTRY]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "INSTALLATION. [COMMENT-ENTRY]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "INSTALLATION. [comment-entry]"

END DEFINE

DELETE PLACEHOLDER "INT-EXP" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "INT-EXP" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is an integer or arithmetic expression resulting in a longword integer"
    "value.  It cannot be zero."

END DEFINE

DELETE PLACEHOLDER "INTEGER-ARG" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "INTEGER-ARG" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "INTGR-ARG"/PLACEHOLDER
    "FUNCTION"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "INTEGER-ARG1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "INTEGER-ARG1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "INTGR-ARG1"/PLACEHOLDER
    "FUNCTION"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "INTEGER-ARG3" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "INTEGER-ARG3" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "INTGR-ARG3"/PLACEHOLDER
    "FUNCTION"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "INTEGER-ARG5" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "INTEGER-ARG5" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "INTGR-ARG5"/PLACEHOLDER
    "FUNCTION"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "INTEGER-EXP" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "INTEGER-EXP" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is an arithmetic expression or integer.  It refers to a position in"
    "DBMS keeplist-name.  Integer-exp cannot be zero."

END DEFINE

DELETE PLACEHOLDER "INTGR-ARG" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "INTGR-ARG" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "An integer literal, the identifier of an integer"
    "elementary data item, or an arithmetic expression"
    "which evaluates to an integer."

END DEFINE

DELETE PLACEHOLDER "INTGR-ARG1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "INTGR-ARG1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "An integer literal, the identifier of an integer, elementary"
    "data item, or an arithmetic expression which evaluates to an"
    "integer in the range of 0 through 99."

END DEFINE

DELETE PLACEHOLDER "INTGR-ARG2" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "INTGR-ARG2" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "An optional integer literal, the identifier of an integer, elementary"
    "data item, or an arithmetic expression which evaluates to an integer"
    "in the range of 1700 through 9999."

END DEFINE

DELETE PLACEHOLDER "INTGR-ARG3" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "INTGR-ARG3" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "An integer literal, the identifier of an integer, elementary"
    "data item, or an arithmetic expression which evaluates to an"
    "integer in the range of 0 through 999999."

END DEFINE

DELETE PLACEHOLDER "INTGR-ARG4" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "INTGR-ARG4" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "An optional integer literal, the identifier of an integer, elementary"
    "data item, or an arithmetic expression which summed with current year"
    "evaluates to an integer in the range of 1700 through 9999."

END DEFINE

DELETE PLACEHOLDER "INTGR-ARG5" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "INTGR-ARG5" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "An integer literal, the identifier of an integer, elementary"
    "data item, or an arithmetic expression which evaluates to an"
    "integer in the range of 0 through 99999."

END DEFINE

DELETE PLACEHOLDER "INTO {DEST-AREA}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "INTO {DEST-AREA}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "INTO {dest-area}"

END DEFINE

DELETE PLACEHOLDER "INTO {DEST-ITEM3}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "INTO {DEST-ITEM3}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "INTO {dest-item3}"

END DEFINE

DELETE PLACEHOLDER "INVALID KEY {STATEMENT}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "INVALID KEY {STATEMENT}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "INVALID KEY"
    "	{statement}..."

END DEFINE

DELETE PLACEHOLDER "INVALID-KEY-PHRASE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "INVALID-KEY-PHRASE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[INVALID KEY {statement}...]"
    "[NOT INVALID KEY {statement}...]"

END DEFINE

DELETE PLACEHOLDER "IO-DESCRIPTION" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "IO-DESCRIPTION" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "describes all modifications to the values of global storage"
    "objects used by the program."

END DEFINE

DELETE PLACEHOLDER "IS EXTERNAL" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "IS EXTERNAL" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "IS EXTERNAL"

END DEFINE

DELETE PLACEHOLDER "IS GLOBAL" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "IS GLOBAL" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "IS GLOBAL"

END DEFINE

DELETE PLACEHOLDER "IS VARYING IN SIZE [FROM {SHORTEST-REC}] [TO {LONGEST-REC}] CHARACTERS [DEPENDING ON {DEPENDING-ITEM2}]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "IS VARYING IN SIZE [FROM {SHORTEST-REC}] [TO {LONGEST-REC}] CHARACTERS [DEPENDING ON {DEPENDING-ITEM2}]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "IS VARYING IN SIZE [FROM {shortest-rec}] [TO {longest-rec}] CHARACTERS [DEPENDING ON {depending-item2}]"

END DEFINE

DELETE PLACEHOLDER "IS [INITIAL] [COMMON] PROGRAM" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "IS [INITIAL] [COMMON] PROGRAM" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "IS [INITIAL] [COMMON] PROGRAM"

END DEFINE

DELETE PLACEHOLDER "IS {SWITCH-NAME1}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "IS {SWITCH-NAME1}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "IS {switch-name1}"

END DEFINE

DELETE PLACEHOLDER "JUSTIFIED RIGHT" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "JUSTIFIED RIGHT" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "JUSTIFIED RIGHT"

END DEFINE

DELETE PLACEHOLDER "KEEPLIST-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "KEEPLIST-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "is a user-defined name.  A keeplist contains a list of DBMS database "
    "keys used by a run unit to lock database records for later reference."

END DEFINE

DELETE PLACEHOLDER "KEY IS {KEY-NAME2}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "KEY IS {KEY-NAME2}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "KEY IS {key-name2}"

END DEFINE

DELETE PLACEHOLDER "KEY {START-KEY-OPTIONS} {KEY-DATA}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "KEY {START-KEY-OPTIONS} {KEY-DATA}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "KEY {start-key-options} {key-data}"

END DEFINE

DELETE PLACEHOLDER "KEY-DATA" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "KEY-DATA" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the data-name of a data item or the segmented-key name"
    "specified as a record key,  or  the  leftmost  part  of a"
    "record key, or the relative key  for file-name. It can be"
    "qualified."

END DEFINE

DELETE PLACEHOLDER "KEY-DEST-ITEM" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "KEY-DEST-ITEM" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the identifier of a data item that defines a control key.  Key-dest-item"
    "must specify an alphanumeric data item at least four characters in length."

END DEFINE

DELETE PLACEHOLDER "KEY-NAME1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "KEY-NAME1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "is the data-name of an entry that contains the OCCURS clause or an entry"
    "subordinate to it.  Key-name can be qualified.  Each key-name after the"
    "first must name an entry subordinate to the entry that contains the"
    "OCCURS clause.  The values in each key-name are the basis of the ascending"
    "or descending arrangement of the table's repeated data."

END DEFINE

DELETE PLACEHOLDER "KEY-NAME2" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "KEY-NAME2" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the data-name of a data item  or  the  segmented-key  name"
    "specified as a record key for file-name. It can be qualified."

END DEFINE

DELETE PLACEHOLDER "LABEL RECORDS ARE {STANDARD|OMITTED}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "LABEL RECORDS ARE {STANDARD|OMITTED}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "LABEL RECORDS ARE {STANDARD|OMITTED}"

END DEFINE

DELETE PLACEHOLDER "LAST DETAIL {LAST-DETAIL-LINE}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "LAST DETAIL {LAST-DETAIL-LINE}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "LAST DETAIL {last-detail-line}"

END DEFINE

DELETE PLACEHOLDER "LAST-DETAIL-LINE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "LAST-DETAIL-LINE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a one- to three-digit integer.  It defines the last line number for a"
    "CONTROL HEADING or DETAIL report group on the logical page."

END DEFINE

DELETE PLACEHOLDER "LAST-LITERAL" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "LAST-LITERAL" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a literal.  It specifies the last in a range of values."

END DEFINE

DELETE PLACEHOLDER "LD {KEEPLIST-NAME}." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "LD {KEEPLIST-NAME}." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "LD {keeplist-name}."

END DEFINE

DELETE PLACEHOLDER "LEADING|TRAILING" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "LEADING|TRAILING" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "LEADING"
    "TRAILING"

END DEFINE

DELETE PLACEHOLDER "LEFT-PART" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "LEFT-PART" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "=={pseudo-text-1}=="/PLACEHOLDER
    "IDENTIFIER-1"/PLACEHOLDER
    "LITERAL-1"/PLACEHOLDER
    "WORD-1"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "LEFTMOST-CHARACTER-POSITION" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "LEFTMOST-CHARACTER-POSITION" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is an arithmetic expression specifying the ordinal position of the data"
    "item's leftmost character."

END DEFINE

DELETE PLACEHOLDER "LEFT|RIGHT" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "LEFT|RIGHT" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "LEFT"
    "RIGHT"

END DEFINE

DELETE PLACEHOLDER LENGTH -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER LENGTH -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is an arithmetic expression specifying the size of the unique data item."

END DEFINE

DELETE PLACEHOLDER "LEVEL-NUMBER" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "LEVEL-NUMBER" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "a two digit number between 01 and 50 inclusive showing the position"
    "of a data item within the hierarchical structure of a logical record"
    "or a report group. See also condition-names and the RENAMES clause."

END DEFINE

DELETE PLACEHOLDER "LIBRARY-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "LIBRARY-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the name of the AXP Librarian library file that contains text-name."

END DEFINE

DELETE PLACEHOLDER "LINAGE IS {PAGE-LINES} LINES" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "LINAGE IS {PAGE-LINES} LINES" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "LINAGE IS {page-lines} LINES"
    "	[WITH FOOTING AT {footing-line1}]"
    "	[LINES AT TOP {top-lines}]"
    "	[LINES AT BOTTOM {bottom-lines}]"

END DEFINE

DELETE PLACEHOLDER "LINE NUMBER IS {[PLUS] {SCREEN-POSITION-SPEC}}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "LINE NUMBER IS {[PLUS] {SCREEN-POSITION-SPEC}}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "LINE NUMBER IS {[PLUS] {screen-position-spec}}"

END DEFINE

DELETE PLACEHOLDER "LINE NUMBER IS {{LINE-NUM1} [ON NEXT PAGE]|PLUS {LINE-NUM-PLUS}}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "LINE NUMBER IS {{LINE-NUM1} [ON NEXT PAGE]|PLUS {LINE-NUM-PLUS}}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "LINE NUMBER IS {{line-num1} [ON NEXT PAGE]|PLUS {line-num-plus}}"

END DEFINE

DELETE PLACEHOLDER "LINE-ID" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "LINE-ID" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the identifier of a data item that provides a line position on the"
    "terminal screen."

END DEFINE

DELETE PLACEHOLDER "LINE-NUM-OPTIONS1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "LINE-NUM-OPTIONS1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "LINE-NUM2"/PLACEHOLDER
    "{line-id} [PLUS [plus-num1]]"/PLACEHOLDER
    "PLUS [plus-num1]"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "LINE-NUM-OPTIONS2" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "LINE-NUM-OPTIONS2" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "LINE-NUM2"/PLACEHOLDER
    "{line-id} [PLUS [plus-num2]]"/PLACEHOLDER
    "PLUS [plus-num2]"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "LINE-NUM-PLUS" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "LINE-NUM-PLUS" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a nonnegative integer.  Line-num-plus represents a relative line"
    "number on a logical page and establishes a print line for a Report"
    "Writer report group."

END DEFINE

DELETE PLACEHOLDER "LINE-NUM1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "LINE-NUM1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a nonnegative integer.  Line-num represents an absolute line number"
    "on a logical page and establishes a print line for a Report Writer"
    "report group."

END DEFINE

DELETE PLACEHOLDER "LINE-NUM2" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "LINE-NUM2" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a numeric literal that specifies a line position on the terminal"
    "screen.  Line-num must be a positive integer.  It cannot be zero."

END DEFINE

DELETE PLACEHOLDER "LINES AT BOTTOM {BOTTOM-LINES}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "LINES AT BOTTOM {BOTTOM-LINES}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "LINES AT BOTTOM {bottom-lines}"

END DEFINE

DELETE PLACEHOLDER "LINES AT TOP {TOP-LINES}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "LINES AT TOP {TOP-LINES}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "LINES AT TOP {top-lines}"

END DEFINE

DELETE PLACEHOLDER "LINE|SCREEN" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "LINE|SCREEN" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "LINE"
    "SCREEN"

END DEFINE

DELETE PLACEHOLDER "LINKAGE SECTION .." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "LINKAGE SECTION .." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "LINKAGE SECTION."
    "[record-description-entry]..."

END DEFINE

DELETE PLACEHOLDER LIT1 -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER LIT1 -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a literal.  It specifies an alphabetic character value."

END DEFINE

DELETE PLACEHOLDER LIT2 -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER LIT2 -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a numeric or nonnumeric literal."

END DEFINE

DELETE PLACEHOLDER LIT3 -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER LIT3 -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a literal that represents the sending area."

END DEFINE

DELETE PLACEHOLDER LITERAL -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER LITERAL -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "a literal."

END DEFINE

DELETE PLACEHOLDER "LITERAL-1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "LITERAL-1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a text-matching argument that the compiler compares against text-words"
    "in the library text."

END DEFINE

DELETE PLACEHOLDER "LITERAL-2" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "LITERAL-2" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a replacement item that the compiler inserts into the source program."

END DEFINE

DELETE PLACEHOLDER "LOCK MODE IS {REL-IND-LOCK-MODE}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "LOCK MODE IS {REL-IND-LOCK-MODE}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "LOCK MODE IS {rel-ind-lock-mode}"

END DEFINE

DELETE PLACEHOLDER "LOCK MODE IS {SEQ-LOCK-MODE}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "LOCK MODE IS {SEQ-LOCK-MODE}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "LOCK MODE IS {seq-lock-mode}"

END DEFINE

DELETE PLACEHOLDER "LOCK-HOLDING" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "LOCK-HOLDING" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "LOCK-HOLDING"

END DEFINE

DELETE PLACEHOLDER "LOGICAL PROPERTIES" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "LOGICAL PROPERTIES" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR="" -
    /TYPE=MENU -

    "PRECONDITIONS" /TOKEN
    "POSTCONDITIONS" /TOKEN
    "INVARIANTS" /TOKEN
    "CLIENT OBLIGATIONS" /TOKEN

END DEFINE

DELETE PLACEHOLDER "LONGEST-REC" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "LONGEST-REC" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is an integer greater than shortest-rec.  It specifies the maximum"
    "number of character positions in a variable length record or the size"
    "of a fixed length record."

END DEFINE

DELETE PLACEHOLDER "LOW-VAL" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "LOW-VAL" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a numeric or nonnumeric literal.  It is the lowest value in a range"
    "of values associated with a condition-name in a level 88 data"
    "description entry."

END DEFINE

DELETE PLACEHOLDER "LOW-VALUE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "LOW-VALUE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "LOW-VAL"/PLACEHOLDER
    "EXTERNAL {external-name}"/PLACEHOLDER
    "REFERENCE {data-name}"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER LSE$BLOCK_COMMENT -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER LSE$BLOCK_COMMENT -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "* "
    "*"

END DEFINE

DELETE PLACEHOLDER LSE$GENERIC -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER LSE$GENERIC -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{tbs}"

END DEFINE

DELETE PLACEHOLDER LSE$LINE_COMMENT -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER LSE$LINE_COMMENT -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "*	{tbs}"

END DEFINE

DELETE PLACEHOLDER "MASS-INSERT" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "MASS-INSERT" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "MASS-INSERT"

END DEFINE

DELETE PLACEHOLDER "MAX-TIMES" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "MAX-TIMES" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is an integer that specifies the maximum number of occurrences"
    "of a table element.  Its value must be greater than min-times."

END DEFINE

DELETE PLACEHOLDER MERGEFILE -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER MERGEFILE -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a file-name described in a sort-merge file description (SD) entry"
    "in the Data Division."

END DEFINE

DELETE PLACEHOLDER MERGEKEY -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER MERGEKEY -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "is the data-name of a data item in a record associated with mergefile."

END DEFINE

DELETE PLACEHOLDER "MIN-TIMES" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "MIN-TIMES" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is an integer that specifies the minimum number of occurrences of"
    "a table element.  Its value must be greater than or equal to zero."

END DEFINE

DELETE PLACEHOLDER "MODULE LEVEL COMMENTS" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "MODULE LEVEL COMMENTS" -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="STANDARD-MODULE-LEVEL-COMMENTS"

END DEFINE
DELETE PLACEHOLDER "MODULE-VERS-STRING" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "MODULE-VERS-STRING" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "The version string for the source module."
    "The quoted string can contain between 1 and 31 characters, and"
    "will be used as the identification string in the object module"
    "generated.  If none is specified, the string consisting of the single"
    "character zero (0) is used"

END DEFINE

DELETE PLACEHOLDER MORE_SUBTAGS -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER MORE_SUBTAGS -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    " "
    "{identifier}:"
    "    {tbs}"

END DEFINE

DELETE PLACEHOLDER "MULTIPLE FILE TAPE CONTAINS {{FILE-NAME} [POSITION {POS-NUM}]}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "MULTIPLE FILE TAPE CONTAINS {{FILE-NAME} [POSITION {POS-NUM}]}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "MULTIPLE FILE TAPE CONTAINS {{file-name} [POSITION {pos-num}]}..."

END DEFINE

DELETE PLACEHOLDER "N TIMES" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "N TIMES" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{first-proc2} [THROUGH {end-proc2}] {repeat-count} TIMES"

END DEFINE

DELETE PLACEHOLDER "N TIMES (IN-LINE)" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "N TIMES (IN-LINE)" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{repeat-count} TIMES"
    "{statement}..."
    "END-PERFORM"

END DEFINE

DELETE PLACEHOLDER "N TIMES|N TIMES (IN-LINE)" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "N TIMES|N TIMES (IN-LINE)" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "n TIMES"/PLACEHOLDER
    "n TIMES (in-line)"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "NEW-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "NEW-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the data-name of the item being described.  It identifies an"
    "alternate grouping of one or more items in a record."

END DEFINE

DELETE PLACEHOLDER "NEW-PROC" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "NEW-PROC" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a procedure-name."

END DEFINE

DELETE PLACEHOLDER "NEXT GROUP IS {{NEXT-GROUP-LINE-NUM}|PLUS {NEXT-GROUP-LINE-NUM-PLUS}|NEXT PAGE}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "NEXT GROUP IS {{NEXT-GROUP-LINE-NUM}|PLUS {NEXT-GROUP-LINE-NUM-PLUS}|NEXT PAGE}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "NEXT GROUP IS {{next-group-line-num}|PLUS {next-group-line-num-plus}|NEXT PAGE}"

END DEFINE

DELETE PLACEHOLDER "NEXT TO" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "NEXT TO" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "NEXT TO"

END DEFINE

DELETE PLACEHOLDER "NEXT-GROUP-LINE-NUM" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "NEXT-GROUP-LINE-NUM" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a positive one- to three-digit integer value greater than zero.  It"
    "represents an absolute line number on a logical page and establishes a"
    "print line for the next Report Writer report group."

END DEFINE

DELETE PLACEHOLDER "NEXT-GROUP-LINE-NUM-PLUS" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "NEXT-GROUP-LINE-NUM-PLUS" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a positive one- to three-digit integer value.  It represents a relative"
    "line number on a logical page and establishes a print line for the next"
    "Report Writer report group."

END DEFINE

DELETE PLACEHOLDER "NONNUMERIC-ARG" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "NONNUMERIC-ARG" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{nonnumeric-item}[({leftmost-character-position} : [{length}])]"

END DEFINE

DELETE PLACEHOLDER "NONNUMERIC-ITEM" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "NONNUMERIC-ITEM" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "An alphabetic or nonnumeric literal or the identifier of"
    "an alphabetic or nonnumeric data item."

END DEFINE

DELETE PLACEHOLDER NOT -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER NOT -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "NOT"

END DEFINE

DELETE PLACEHOLDER "NOT AT END {STATEMENT}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "NOT AT END {STATEMENT}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "NOT AT END"
    "   {statement}..."

END DEFINE

DELETE PLACEHOLDER "NOT AT END-OF-PAGE {STATEMENT}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "NOT AT END-OF-PAGE {STATEMENT}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "NOT AT END-OF-PAGE"
    "	{statement}..."

END DEFINE

DELETE PLACEHOLDER "NOT INVALID KEY {STATEMENT}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "NOT INVALID KEY {STATEMENT}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "NOT INVALID KEY"
    "	{statement}..."

END DEFINE

DELETE PLACEHOLDER "NOT ON ERROR {STATEMENT}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "NOT ON ERROR {STATEMENT}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "NOT ON ERROR"
    "   {statement}..."

END DEFINE

DELETE PLACEHOLDER "NOT ON EXCEPTION {STATEMENT}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "NOT ON EXCEPTION {STATEMENT}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "NOT ON EXCEPTION"
    "	{statement}..."

END DEFINE

DELETE PLACEHOLDER "NOT ON OVERFLOW {STATEMENT}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "NOT ON OVERFLOW {STATEMENT}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "NOT ON OVERFLOW"
    "   {statement}..."

END DEFINE

DELETE PLACEHOLDER "NOT ON SIZE ERROR {STATEMENT}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "NOT ON SIZE ERROR {STATEMENT}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "NOT ON SIZE ERROR"
    "   {statement}..."

END DEFINE

DELETE PLACEHOLDER NUM -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER NUM -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "is a numeric literal or the identifier of an elementary numeric item."

END DEFINE

DELETE PLACEHOLDER "NUM-ARG1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "NUM-ARG1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "A numeric literal, the identifier of a numeric "
    "elementary item or an arithmetic expression."

END DEFINE

DELETE PLACEHOLDER "NUM-ARG2" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "NUM-ARG2" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "A numeric literal, the identifier of a numeric "
    "elementary item, or an arithmetic expression.  If a"
    "table is specified, the table may be subscripted"
    "with ALL."

END DEFINE

DELETE PLACEHOLDER "NUM-OR-FUNC" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "NUM-OR-FUNC" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "NUM"/PLACEHOLDER
    "FUNCTION"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "NUMERIC-ARG1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "NUMERIC-ARG1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "NUM-ARG1"/PLACEHOLDER
    "FUNCTION"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "NUMERIC-ARG2" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "NUMERIC-ARG2" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "NUM-ARG2"/PLACEHOLDER
    "FUNCTION"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "NUMERIC|ALPHABETIC|ALPHABETIC-LOWER|ALPHABETIC-UPPER|{CLASS-NAME}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "NUMERIC|ALPHABETIC|ALPHABETIC-LOWER|ALPHABETIC-UPPER|{CLASS-NAME}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "NUMERIC"
    "ALPHABETIC"
    "ALPHABETIC-LOWER"
    "ALPHABETIC-UPPER"
    "{class-name}"

END DEFINE

DELETE PLACEHOLDER "OBJ-ITEM" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "OBJ-ITEM" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "OBJ-ITM"/PLACEHOLDER
    "FUNCTION"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "OBJ-ITM" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "OBJ-ITM" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a literal, an identifier, or an arithmetic expression."

END DEFINE

DELETE PLACEHOLDER "OBJECT-COMPUTER .." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "OBJECT-COMPUTER .." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "OBJECT-COMPUTER."
    "	[{AXP|VAX} [PROGRAM COLLATING SEQUENCE IS {alphabet-name1}].]"

END DEFINE

DELETE PLACEHOLDER "OBJECT-ITEM" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "OBJECT-ITEM" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=MENU -

    "ANY"
    "CONDITIONAL-EXPRESSION"/PLACEHOLDER
    "TRUE"
    "FALSE"
    "[NOT] {obj-item} [THROUGH {obj-item}]"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "OCCURS {{TABLE-SIZE} TIMES|{MIN-TIMES} TO {MAX-TIMES} DEPENDING ..} .." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "OCCURS {{TABLE-SIZE} TIMES|{MIN-TIMES} TO {MAX-TIMES} DEPENDING ..} .." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "OCCURS {{table-size} TIMES|{min-times} TO {max-times} DEPENDING ..}"
    "	[{ASCENDING|DESCENDING} KEY IS {key-name1}...]..."
    "	[INDEXED BY {ind-name}...]"

END DEFINE

DELETE PLACEHOLDER "OF {DATA-NAME}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "OF {DATA-NAME}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "OF {data-name}"

END DEFINE

DELETE PLACEHOLDER "OF {LIBRARY-NAME}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "OF {LIBRARY-NAME}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "OF {library-name}"

END DEFINE

DELETE PLACEHOLDER "OFF STATUS IS {COND-NAME}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "OFF STATUS IS {COND-NAME}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "OFF STATUS IS {cond-name}"

END DEFINE

DELETE PLACEHOLDER "OFFSET {INTEGER-EXP}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "OFFSET {INTEGER-EXP}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "OFFSET {integer-exp}"

END DEFINE

DELETE PLACEHOLDER "OFFSET {INTEGER-EXP}|FIRST|LAST" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "OFFSET {INTEGER-EXP}|FIRST|LAST" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "OFFSET {integer-exp}"/PLACEHOLDER
    "FIRST"
    "LAST"

END DEFINE

DELETE PLACEHOLDER "OLD-ROUTINE-LEVEL-COMMENTS" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "OLD-ROUTINE-LEVEL-COMMENTS" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "*++"
    "*"
    "* PROGRAM ABSTRACT:"
    "*"
    "*       [pa-description]"
    "*"
    "* CALLING PROTOCOL:"
    "*"
    "*       [cp-description]"
    "*"
    "* FORMAL PARAMETERS:"
    "*"
    "*       [fp-description]"
    "*"
    "* IMPLICIT INPUTS:"
    "*"
    "*       [ii-description]"
    "*"
    "* IMPLICIT OUTPUTS:"
    "*"
    "*       [io-description]"
    "*"
    "* SIDE EFFECTS:"
    "*"
    "*       [se-description]"
    "*"
    "* MODIFICATION HISTORY:"
    "*"
    "*       [chg-date-author-desc]"
    "*"
    "*"
    "*--"
    ""

END DEFINE

DELETE PLACEHOLDER "ON ERROR {STATEMENT}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ON ERROR {STATEMENT}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "ON ERROR"
    "   {statement}..."

END DEFINE

DELETE PLACEHOLDER "ON EXCEPTION {STATEMENT}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ON EXCEPTION {STATEMENT}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "ON EXCEPTION"
    "	{statement}..."

END DEFINE

DELETE PLACEHOLDER "ON NEXT PAGE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ON NEXT PAGE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "ON NEXT PAGE"

END DEFINE

DELETE PLACEHOLDER "ON OVERFLOW {STATEMENT}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ON OVERFLOW {STATEMENT}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "ON OVERFLOW"
    "   {statement}..."

END DEFINE

DELETE PLACEHOLDER "ON SIZE ERROR {STATEMENT}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ON SIZE ERROR {STATEMENT}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "ON SIZE ERROR"
    "   {statement}..."

END DEFINE

DELETE PLACEHOLDER "ON STATUS IS {COND-NAME}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ON STATUS IS {COND-NAME}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "ON STATUS IS {cond-name}"

END DEFINE

DELETE PLACEHOLDER "ON {ASCENDING|DESCENDING} KEY {MERGEKEY}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ON {ASCENDING|DESCENDING} KEY {MERGEKEY}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "ON {ASCENDING|DESCENDING} KEY {mergekey}..."

END DEFINE

DELETE PLACEHOLDER "ON {ASCENDING|DESCENDING} KEY {SORTKEY}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ON {ASCENDING|DESCENDING} KEY {SORTKEY}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "ON {ASCENDING|DESCENDING} KEY {sortkey}..."

END DEFINE

DELETE PLACEHOLDER "ON {{DBM$_EXCEPTION-CONDITION}...|OTHER}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ON {{DBM$_EXCEPTION-CONDITION}...|OTHER}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "ON {{DBM$_exception-condition}...|OTHER}"

END DEFINE

DELETE PLACEHOLDER "ON-ERROR-PHRASE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ON-ERROR-PHRASE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[ON ERROR {statement}...]"
    "[NOT ON ERROR {statement}...]"

END DEFINE

DELETE PLACEHOLDER "ON-EXCEPTION-PHRASE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ON-EXCEPTION-PHRASE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[ON EXCEPTION {statement}...]"
    "[NOT ON EXCEPTION {statement}...]"

END DEFINE

DELETE PLACEHOLDER "ON-EXCEPTION-PHRASE|AT-END-PHRASE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ON-EXCEPTION-PHRASE|AT-END-PHRASE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "ON-EXCEPTION-PHRASE"/PLACEHOLDER
    "AT-END-PHRASE"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "ON-OVERFLOW-PHRASE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ON-OVERFLOW-PHRASE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[ON OVERFLOW {statement}...]"
    "[NOT ON OVERFLOW {statement}...]"

END DEFINE

DELETE PLACEHOLDER "ON-SIZE-ERROR-CLAUSE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ON-SIZE-ERROR-CLAUSE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[ON SIZE ERROR {statement}...]"
    "[NOT ON SIZE ERROR {statement}...]"

END DEFINE

DELETE PLACEHOLDER "ON|OFF" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ON|OFF" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "ON"
    "OFF"

END DEFINE

DELETE PLACEHOLDER "OPEN-LOCKING-OPTIONS" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "OPEN-LOCKING-OPTIONS" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=MENU -

    "WITH LOCK"
    "{allowing-file-sharing-options}"

END DEFINE

DELETE PLACEHOLDER OPTIONAL -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER OPTIONAL -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "OPTIONAL"

END DEFINE

DELETE PLACEHOLDER "OR [ALL] {DELIM2}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "OR [ALL] {DELIM2}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "OR [ALL] {delim2}"

END DEFINE

DELETE PLACEHOLDER "OTHER FILES REQUIRED" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "OTHER FILES REQUIRED" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR="" -
    /TYPE=MENU -

    "INCLUDED FILES" /TOKEN
    "CDD PATHNAMES" /TOKEN
    "TEXT LIBRARY MODULES INCLUDED" /TOKEN

END DEFINE

DELETE PLACEHOLDER "OTHER TAGS" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "OTHER TAGS" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR="" -
    /TYPE=MENU -

    "ABSTRACT" /TOKEN
    "ARGUMENTS" /TOKEN
    "ARITHMETIC EXCEPTIONS HANDLED" /TOKEN
    "CDD PATHNAMES" /TOKEN
    "CLIENT OBLIGATIONS" /TOKEN
    "COMPILATION QUALIFIERS" /TOKEN
    "COMPLETION CODE" /TOKEN
    "COMPONENT" /TOKEN
    "DUMMY ARGUMENTS" /TOKEN
    "ENVIRONMENT" /TOKEN
    "ERROR CODES" /TOKEN
    "EXCEPTIONS" /TOKEN
    "FACILITY" /TOKEN
    "FILES USED" /TOKEN
    "FORMAL ARGUMENTS" /TOKEN
    "FUNCTION VALUE" /TOKEN
    "IMPLICIT INPUTS" /TOKEN
    "IMPLICIT OUTPUTS" /TOKEN
    "IMPLICIT PARAMETERS" /TOKEN
    "INCLUDED FILES" /TOKEN
    "INPUT PARAMETERS" /TOKEN
    "INPUT/OUTPUT PARAMETERS" /TOKEN
    "INVARIANTS" /TOKEN
    "KEYWORDS" /TOKEN
    "NON-STANDARD FEATURES USED" /TOKEN
    "OBLIGATIONS" /TOKEN
    "OPTIONAL PARAMETERS" /TOKEN
    "OUTPUT PARAMETERS" /TOKEN
    "PARAMETERS" /TOKEN
    "PORTABILITY ISSUES" /TOKEN
    "POSTCONDITIONS" /TOKEN
    "PRECONDITIONS" /TOKEN
    "PROGRAM ABSTRACT" /TOKEN
    "RESULT" /TOKEN
    "ROUTINE VALUE" /TOKEN
    "SUBSYSTEM" /TOKEN
    "SYSTEM" /TOKEN
    "TEXT LIBRARY MODULES INCLUDED" /TOKEN
    "TITLE" /TOKEN
    "VERSION" /TOKEN

END DEFINE

DELETE PLACEHOLDER "OTHER-ARGS" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "OTHER-ARGS" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=MENU -

    "BY REFERENCE {arg1}..."/PLACEHOLDER
    "BY CONTENT {arg1}..."/PLACEHOLDER
    "BY DESCRIPTOR {arg1}..."/PLACEHOLDER
    "BY VALUE {arg1}..."/PLACEHOLDER
    "OMITTED"

END DEFINE

DELETE PLACEHOLDER "OTHER-DATA-ITEM" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "OTHER-DATA-ITEM" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a data-name.  It identifies the data description entry that first"
    "defines the storage area."

END DEFINE

DELETE PLACEHOLDER OUTFILE -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER OUTFILE -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "is the file-name of the output file.  It must be described in a file"
    "description (FD) entry in the Data Division."

END DEFINE

DELETE PLACEHOLDER "OUTPUT PROCEDURE ..|GIVING .." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "OUTPUT PROCEDURE ..|GIVING .." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "OUTPUT PROCEDURE IS {first-proc3} [THROUGH {end-proc3}]"/PLACEHOLDER
    "GIVING {outfile}..."/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "OUTPUT PROCEDURE IS ..|GIVING .." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "OUTPUT PROCEDURE IS ..|GIVING .." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "OUTPUT PROCEDURE IS {first-proc1} [THROUGH {end-proc1}]"/PLACEHOLDER
    "GIVING {outfile}..."/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "OUTPUT PROCEDURE IS {FIRST-PROC1} [THROUGH {END-PROC1}]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "OUTPUT PROCEDURE IS {FIRST-PROC1} [THROUGH {END-PROC1}]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "OUTPUT PROCEDURE IS {first-proc1} [THROUGH {end-proc1}]"

END DEFINE

DELETE PLACEHOLDER "OUTPUT PROCEDURE IS {FIRST-PROC3} [THROUGH {END-PROC3}]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "OUTPUT PROCEDURE IS {FIRST-PROC3} [THROUGH {END-PROC3}]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "OUTPUT PROCEDURE IS {first-proc3} [THROUGH {end-proc3}]"

END DEFINE

DELETE PLACEHOLDER "OUTPUT-DEST" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "OUTPUT-DEST" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a mnemonic-name defined in the SPECIAL-NAMES paragraph of the"
    "Environment Division."

END DEFINE

DELETE PLACEHOLDER "OWNER WITHIN {SET-NAME}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "OWNER WITHIN {SET-NAME}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "OWNER WITHIN {set-name}"

END DEFINE

DELETE PLACEHOLDER "OWNER|MEMBER|TENANT" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "OWNER|MEMBER|TENANT" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "OWNER"
    "MEMBER"
    "TENANT"

END DEFINE

DELETE PLACEHOLDER "PA-DESCRIPTION" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "PA-DESCRIPTION" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a short abstract of the function of the program."

END DEFINE

DELETE PLACEHOLDER "PAD-CHAR" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "PAD-CHAR" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a one-character nonnumeric literal or the data-name of a"
    "one-character data item.  The data-name can be qualified."

END DEFINE

DELETE PLACEHOLDER "PADDING CHARACTER IS {PAD-CHAR}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "PADDING CHARACTER IS {PAD-CHAR}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "PADDING CHARACTER IS {pad-char}"

END DEFINE

DELETE PLACEHOLDER "PAGE LIMIT IS {PAGE-SIZE} LINES .." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "PAGE LIMIT IS {PAGE-SIZE} LINES .." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "PAGE LIMIT IS {page-size} LINES"
    "	[HEADING {heading-line}]"
    "	[FIRST DETAIL {first-detail-line}]"
    "	[LAST DETAIL {last-detail-line}]"
    "	[FOOTING {footing-line2}]"

END DEFINE

DELETE PLACEHOLDER "PAGE-LINES" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "PAGE-LINES" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a positive integer or the data-name of an elementary unsigned integer"
    "numeric data item.  Its value must be greater than zero.  It specifies the"
    "number of lines that can be written or spaced on the logical page.  If"
    "page-lines is a data-name, it can be qualified."

END DEFINE

DELETE PLACEHOLDER "PAGE-SIZE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "PAGE-SIZE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a one- to three-digit integer.  It defines the number of lines"
    "available on a logical page."

END DEFINE

DELETE PLACEHOLDER PARAGRAPH -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER PARAGRAPH -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{paragraph-name}."
    "	[sentence]..."

END DEFINE

DELETE PLACEHOLDER "PARAGRAPH-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "PARAGRAPH-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "A user-defined word that identifies and begins a paragraph in the"
    "Procedure Division."

END DEFINE

DELETE PLACEHOLDER PATHNAME -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER PATHNAME -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a partial or full AXP CDD/Plus pathname. It specifies a"
    "CDD/Plus dictionary entity stored in CDO format."

END DEFINE

DELETE PLACEHOLDER "PICTURE IS {CHARACTER-STRING}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "PICTURE IS {CHARACTER-STRING}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "PICTURE IS {character-string}"

END DEFINE

DELETE PLACEHOLDER "PICTURE IS {CHARACTER-STRING} {SCREEN-USING-FROM-TO-SPEC}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "PICTURE IS {CHARACTER-STRING} {SCREEN-USING-FROM-TO-SPEC}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "PICTURE IS {character-string} {screen-using-from-to-spec}"

END DEFINE

DELETE PLACEHOLDER PLUS -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER PLUS -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "PLUS"

END DEFINE

DELETE PLACEHOLDER "PLUS [PLUS-NUM1]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "PLUS [PLUS-NUM1]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "PLUS [plus-num1]"

END DEFINE

DELETE PLACEHOLDER "PLUS [PLUS-NUM2]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "PLUS [PLUS-NUM2]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "PLUS [plus-num2]"

END DEFINE

DELETE PLACEHOLDER "PLUS {LINE-NUM-PLUS}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "PLUS {LINE-NUM-PLUS}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "PLUS {line-num-plus}"

END DEFINE

DELETE PLACEHOLDER "PLUS {NEXT-GROUP-LINE-NUM-PLUS}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "PLUS {NEXT-GROUP-LINE-NUM-PLUS}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "PLUS {next-group-line-num-plus}"

END DEFINE

DELETE PLACEHOLDER "PLUS-NUM1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "PLUS-NUM1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a numeric literal that increments the current value for line or"
    "column position, or that increments the value of line-id or column-id."
    "Plus-num can be zero or a positive integer."

END DEFINE

DELETE PLACEHOLDER "PLUS-NUM2" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "PLUS-NUM2" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a numeric literal that increments the current value for line or"
    "column position, or that increments the value of line-id or column-id."
    "Plus-num can be zero or a positive integer."

END DEFINE

DELETE PLACEHOLDER "POINTER-ID" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "POINTER-ID" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a data-name whose data description entry must contain the USAGE IS"
    "POINTER clause."

END DEFINE

DELETE PLACEHOLDER POINTR1 -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER POINTR1 -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is an index-name or the identifier of a data item described as USAGE"
    "INDEX, or an elementary numeric data item with no positions to the right"
    "of the assumed decimal point."

END DEFINE

DELETE PLACEHOLDER POINTR2 -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER POINTR2 -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is an elementary numeric data item described as an integer.  It points to"
    "the position in dest-string to contain the next character moved."

END DEFINE

DELETE PLACEHOLDER POINTR3 -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER POINTR3 -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the identifier of an elementary numeric data item described as an"
    "integer.  It points to the current character position in src-string."

END DEFINE

DELETE PLACEHOLDER "POS-NUM" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "POS-NUM" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is an integer that specifies the relative position of the file on the tape."

END DEFINE

DELETE PLACEHOLDER "POSITION {POS-NUM}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "POSITION {POS-NUM}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "POSITION {pos-num}"

END DEFINE

DELETE PLACEHOLDER "POSITION-SELECTION" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "POSITION-SELECTION" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "FIRST"
    "LAST"
    "NEXT"
    "PRIOR"
    "ANY"
    "DUPLICATE"
    "INT-EXP"/PLACEHOLDER
    "RELATIVE {int-exp}"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "POSITIVE|NEGATIVE|ZERO" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "POSITIVE|NEGATIVE|ZERO" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "POSITIVE"
    "NEGATIVE"
    "ZERO"

END DEFINE

DELETE PLACEHOLDER "PREALL-AMT" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "PREALL-AMT" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is an integer from 0 through 4,294,967,295.  It specifies the number"
    "of blocks to allocate when the program creates a disk file."

END DEFINE

DELETE PLACEHOLDER "PRINT-CONTROL" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "PRINT-CONTROL" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "PRINT-CONTROL"

END DEFINE

DELETE PLACEHOLDER PROC -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER PROC -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the name of a paragraph that contains one sentence: a GO TO statement"
    "without the DEPENDING phrase."

END DEFINE

DELETE PLACEHOLDER "PROC-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "PROC-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "is a procedure-name."

END DEFINE

DELETE PLACEHOLDER "PROCEDURE DIVISION .." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "PROCEDURE DIVISION .." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    ""
    "PROCEDURE DIVISION [USING {data-name}...] [GIVING {identifier}]."
    "[DECLARATIVES ..]"
    "[section]..."

END DEFINE

DELETE PLACEHOLDER "PROG-NAME1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "PROG-NAME1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a nonnumeric literal or the identifier of an alphanumeric data item."
    "It is the name of the program to which control transfers."

END DEFINE

DELETE PLACEHOLDER "PROG-NAME2" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "PROG-NAME2" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "is a nonumeric literal or the identifier of an alphanumeric data item."
    "It contains the program-name of the program to be canceled."

END DEFINE

DELETE PLACEHOLDER PROGRAM -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER PROGRAM -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{IDENTIFICATION DIVISION ..}"
    "[ENVIRONMENT DIVISION ..]"
    "[DATA DIVISION ..]"
    "[PROCEDURE DIVISION ..]"
    "[contained-program]..."
    "END PROGRAM {program-name}."

END DEFINE

DELETE PLACEHOLDER "PROGRAM COLLATING SEQUENCE IS {ALPHABET-NAME1}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "PROGRAM COLLATING SEQUENCE IS {ALPHABET-NAME1}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "PROGRAM COLLATING SEQUENCE IS {alphabet-name1}"

END DEFINE

DELETE PLACEHOLDER "PROGRAM MODULE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "PROGRAM MODULE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[Module level comments]"
    "{program}..."

END DEFINE

DELETE PLACEHOLDER "PROGRAM-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "PROGRAM-NAME" -
    /LANGUAGE="cobol" -
    /AUTO_SUBSTITUTE  -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "A user-defined word that identifies a COBOL program."

END DEFINE

DELETE PLACEHOLDER "PROT-FILL-LIT" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "PROT-FILL-LIT" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a single character alphanumeric literal that is used to initialize"
    "each character position of a protected video screen field into which"
    "data can be typed."

END DEFINE

DELETE PLACEHOLDER "PROT-SIZE-ITEM" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "PROT-SIZE-ITEM" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the identifier of a numeric integer data item that specifies the maximum"
    "length of the video screen field into which data can be typed.  It must be a"
    "positive integer; it cannot be zero."

END DEFINE

DELETE PLACEHOLDER "PROT-SIZE-LIT" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "PROT-SIZE-LIT" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a numeric literal that specifies the maximum length of the video screen"
    "field into which data can be typed.  Prot-size-lit must be a positive"
    "integer.  It cannot be zero."

END DEFINE

DELETE PLACEHOLDER "PROTECTED [SIZE {{PROT-SIZE-LIT}|{PROT-SIZE-ITEM}}] [WITH-OPTIONS]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "PROTECTED [SIZE {{PROT-SIZE-LIT}|{PROT-SIZE-ITEM}}] [WITH-OPTIONS]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "PROTECTED [SIZE {{prot-size-lit}|{prot-size-item}}] [with-options]"

END DEFINE

DELETE PLACEHOLDER "PSEUDO-TEXT-1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "PSEUDO-TEXT-1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a text-matching argument that the compiler compares against text-words"
    "in the library or source text."

END DEFINE

DELETE PLACEHOLDER "PSEUDO-TEXT-2" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "PSEUDO-TEXT-2" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a replacement item that the compiler inserts into the source program."

END DEFINE

DELETE PLACEHOLDER "RANDOM RELATIVE KEY IS {REL-KEY}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "RANDOM RELATIVE KEY IS {REL-KEY}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "RANDOM RELATIVE KEY IS {rel-key}"

END DEFINE

DELETE PLACEHOLDER "RD {REPORT-NAME} .." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "RD {REPORT-NAME} .." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "RD {report-name}"
    "	[IS GLOBAL]"
    "	[CODE {report-code}]"
    "	[CONTROL IS {{control-name}|FINAL [control-name]...}]"
    "	[PAGE LIMIT IS {page-size} LINES ..]."

END DEFINE

DELETE PLACEHOLDER "READ-DIRECTION" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "READ-DIRECTION" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "NEXT"
    "PREVIOUS"
    "PRIOR"

END DEFINE

DELETE PLACEHOLDER "READ-PERMISSION" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "READ-PERMISSION" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "WITH LOCK"
    "WITH NO LOCK"
    "REGARDLESS OF LOCK"
    "ALLOWING {UPDATERS|READERS|NO OTHERS}"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER READERS -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER READERS -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "READERS"

END DEFINE

DELETE PLACEHOLDER REALM -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER REALM -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "REALM"

END DEFINE

DELETE PLACEHOLDER "REALM-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "REALM-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "is a DBMS subschema realm name."

END DEFINE

DELETE PLACEHOLDER REC -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER REC -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the name of a logical record in a sort-merge file description (SD)"
    "entry.  It can be qualified."

END DEFINE

DELETE PLACEHOLDER "REC-KEY" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "REC-KEY" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the data-name of a data item in a Record Description entry for the"
    "file.  It can be qualified, but it cannot be a group item that contains"
    "a variable-occurrence data item.  The data item must be described as:"
    "(1) alphanumeric or alphabetic category, (2) a group item, (3) unsigned"
    "numeric display, (4) a COMP-3 integer, or (5) a COMP integer with no"
    "more than eighteen digits."

END DEFINE

DELETE PLACEHOLDER "REC-KEY1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "REC-KEY1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "rec-key"/PLACEHOLDER
    "{seg-key = {seg}...}"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "REC-KEY2" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "REC-KEY2" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "is a key data item within the DBMS subschema record occurrence.  The"
    "same rec-key can appear only once in a given USING phrase."

END DEFINE

DELETE PLACEHOLDER "REC-NAME1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "REC-NAME1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the name of a logical record in the Data Division File Section.  It"
    "can be qualified."

END DEFINE

DELETE PLACEHOLDER "REC-NAME2" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "REC-NAME2" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the name of a logical record described in the Data Division File"
    "Section.  It cannot be qualified.  The logical record cannot be in"
    "a sort-merge file description entry."

END DEFINE

DELETE PLACEHOLDER "REC-NAME3" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "REC-NAME3" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "is the name of a data record.  It must be defined by a level 01"
    "data description entry subordinate to the file description entry."

END DEFINE

DELETE PLACEHOLDER RECORD -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER RECORD -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "RECORD"

END DEFINE

DELETE PLACEHOLDER "RECORD DELIMITER IS STANDARD-1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "RECORD DELIMITER IS STANDARD-1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "RECORD DELIMITER IS STANDARD-1"

END DEFINE

DELETE PLACEHOLDER "RECORD KEY IS {REC-KEY1} [WITH DUPLICATES] [ASCENDING|DESCENDING]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "RECORD KEY IS {REC-KEY1} [WITH DUPLICATES] [ASCENDING|DESCENDING]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "RECORD KEY IS {rec-key1} [WITH DUPLICATES] [ASCENDING|DESCENDING]"

END DEFINE

DELETE PLACEHOLDER "RECORD {CONTAINS .. CHARACTERS|IS VARYING ..}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "RECORD {CONTAINS .. CHARACTERS|IS VARYING ..}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "RECORD {CONTAINS .. CHARACTERS|IS VARYING ..}"

END DEFINE

DELETE PLACEHOLDER "RECORD-DESCRIPTION-ENTRY" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "RECORD-DESCRIPTION-ENTRY" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{level-number} [{data-name}|FILLER]"
    "	[REDEFINES {other-data-item}]"
    "	[IS EXTERNAL]"
    "	[IS GLOBAL]"
    "	[PICTURE IS {character-string}]"
    "	[USAGE IS {COMP|COMP-1|COMP-2|COMP-3|COMP-5|COMP-X|DISPLAY|INDEX|POINTER}]"
    "	[SIGN IS {LEADING|TRAILING} [SEPARATE CHARACTER]]"
    "	[OCCURS {{table-size} TIMES|{min-times} TO {max-times} DEPENDING ..} ..]"
    "	[SYNCHRONIZED [LEFT|RIGHT]]"
    "	[JUSTIFIED RIGHT]"
    "	[BLANK WHEN ZERO]"
    "	[VALUE IS {value-option}]."
    "[{record-description-entry}|{66}|{88}]"

END DEFINE

DELETE PLACEHOLDER "RECORD-ITEM" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "RECORD-ITEM" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "is a group or elementary data item in a DBMS subschema record type."
    "Record-item can be qualified."

END DEFINE

DELETE PLACEHOLDER "RECORD-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "RECORD-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a DBMS subschema record name."

END DEFINE

DELETE PLACEHOLDER "RECORD-NAME1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "RECORD-NAME1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a partial or complete AXP Common Data Dictionary (CDD) pathname.  It"
    "specifies the CDD record description to be copied into the source program."

END DEFINE

DELETE PLACEHOLDER "RECORD-SELECTION-EXPRESSION" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "RECORD-SELECTION-EXPRESSION" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "DBKEY"/PLACEHOLDER
    "CURRENT [WITHIN {{record-name}|{set-name}|{realm-name}}]"/PLACEHOLDER
    "{OFFSET {integer-exp}|FIRST|LAST} {WITHIN {keeplist-name}}"/PLACEHOLDER
    "OWNER WITHIN {set-name}"/PLACEHOLDER
    "{position-selection} [record-name] [WITHIN {{realm-name}|{set-name}}] [USING {rec-key2}...|WHERE {bool-exp}]"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "RECORDS|CHARACTERS" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "RECORDS|CHARACTERS" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "RECORDS"
    "CHARACTERS"

END DEFINE

DELETE PLACEHOLDER "RECORD|ALL RECORDS" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "RECORD|ALL RECORDS" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "RECORD"
    "RECORDS"
    "ALL RECORDS"

END DEFINE

DELETE PLACEHOLDER "RECORD|SORT|SORT-MERGE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "RECORD|SORT|SORT-MERGE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "RECORD"
    "SORT"
    "SORT-MERGE"

END DEFINE

DELETE PLACEHOLDER "REDEFINES {OTHER-DATA-ITEM}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "REDEFINES {OTHER-DATA-ITEM}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "REDEFINES {other-data-item}"

END DEFINE

DELETE PLACEHOLDER "REEL [FOR REMOVAL|WITH NO REWIND]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "REEL [FOR REMOVAL|WITH NO REWIND]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "REEL [FOR REMOVAL|WITH NO REWIND]"

END DEFINE

DELETE PLACEHOLDER "REEL|UNIT" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "REEL|UNIT" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "REEL"
    "UNIT"

END DEFINE

DELETE PLACEHOLDER "REFERENCE {DATA-NAME}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "REFERENCE {DATA-NAME}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "REFERENCE {data-name}"

END DEFINE

DELETE PLACEHOLDER "REL-IND-LOCK-MODE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "REL-IND-LOCK-MODE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION=" to specify X/Open relative/indexed file-locking technique for DEC COBOL." -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "MANUAL WITH LOCK ON MULTIPLE RECORDS"
    "AUTOMATIC"
    "AUTOMATIC WITH LOCK ON RECORD"
    "EXCLUSIVE"

END DEFINE

DELETE PLACEHOLDER "REL-KEY" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "REL-KEY" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the file's RELATIVE KEY data item."

END DEFINE

DELETE PLACEHOLDER "REL-TYPE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "REL-TYPE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a valid CDD/Plus protocol. It specifies the type of relationship"
    "to be created between the AXP COBOL program and the CDO dictionary"
    "entity specified in the pathname. The default is CDD$COMPILED_DEPENDS_ON."

END DEFINE

DELETE PLACEHOLDER "RELATION-CONDITION" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "RELATION-CONDITION" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{relation-subject} IS {relational-operator} {relation-object}"

END DEFINE

DELETE PLACEHOLDER "RELATION-OBJECT" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "RELATION-OBJECT" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "IDENTIFIER"/PLACEHOLDER
    "LITERAL"/PLACEHOLDER
    "ARITHMETIC-EXPRESSION"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "RELATION-SUBJECT" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "RELATION-SUBJECT" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "IDENTIFIER"/PLACEHOLDER
    "LITERAL"/PLACEHOLDER
    "ARITHMETIC-EXPRESSION"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "RELATIONAL-OPERATOR" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "RELATIONAL-OPERATOR" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "[NOT] GREATER THAN"
    "[NOT] >"
    "[NOT] LESS THAN"
    "[NOT] <"
    "[NOT] EQUAL TO"
    "[NOT] ="
    "GREATER THAN OR EQUAL TO"
    ">="
    "LESS THAN OR EQUAL TO"
    "<="

END DEFINE

DELETE PLACEHOLDER "RELATIVE {INT-EXP}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "RELATIVE {INT-EXP}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "RELATIVE {int-exp}"

END DEFINE

DELETE PLACEHOLDER REMAINDER -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER REMAINDER -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the identifier of an elementary numeric item or an elementary numeric"
    "edited item."

END DEFINE

DELETE PLACEHOLDER "RENAME-END" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "RENAME-END" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the data-name of the rightmost data item in the area.  It can be"
    "qualified."

END DEFINE

DELETE PLACEHOLDER "RENAME-START" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "RENAME-START" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the data-name of the leftmost data item in the area.  It can be"
    "qualified."

END DEFINE

DELETE PLACEHOLDER "REPEAT-COUNT" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "REPEAT-COUNT" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a numeric integer literal or the identifier of a numeric integer"
    "elementary item.  It controls how many times the statement set (or"
    "sets) executes."

END DEFINE

DELETE PLACEHOLDER "REPLACE-CHAR" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "REPLACE-CHAR" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the one-character item that replaces all characters.  Its"
    "content restrictions are the same as those for compare-val."

END DEFINE

DELETE PLACEHOLDER "REPLACE-VAL" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "REPLACE-VAL" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the character-string that replaces occurrences of compare-val."
    "Its content restrictions are the same as those for compare-val."

END DEFINE

DELETE PLACEHOLDER "REPLACING {{LEFT-PART} BY {RIGHT-PART}}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "REPLACING {{LEFT-PART} BY {RIGHT-PART}}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "REPLACING"
    "	{{left-part} BY {right-part}}..."

END DEFINE

DELETE PLACEHOLDER "REPLACING {{REPLACING-TYPE} DATA BY {VAL1}}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "REPLACING {{REPLACING-TYPE} DATA BY {VAL1}}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "REPLACING"
    "	{{replacing-type} DATA BY {val1}}..."

END DEFINE

DELETE PLACEHOLDER "REPLACING-CLAUSE1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "REPLACING-CLAUSE1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=MENU -

    "CHARACTERS BY {replace-char} [{BEFORE|AFTER} INITIAL {delim-val}]..."/PLACEHOLDER
    "{ALL|LEADING|FIRST} {{compare-val} BY {replace-val} [{BEFORE|AFTER} INITIAL {delim-val}]...}..."/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "REPLACING-TYPE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "REPLACING-TYPE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "ALPHABETIC"
    "ALPHANUMERIC"
    "NUMERIC"
    "ALPHANUMERIC-EDITED"
    "NUMERIC-EDITED"

END DEFINE

DELETE PLACEHOLDER "REPORT SECTION .." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "REPORT SECTION .." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "REPORT SECTION."
    "[report-description]..."

END DEFINE

DELETE PLACEHOLDER "REPORT-CODE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "REPORT-CODE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "must be a two-character nonnumeric literal."

END DEFINE

DELETE PLACEHOLDER "REPORT-DESCRIPTION" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "REPORT-DESCRIPTION" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{RD {report-name} ..}"
    "{01 [group-data-name] ..}..."

END DEFINE

DELETE PLACEHOLDER "REPORT-ELEMENTARY-ENTRY" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "REPORT-ELEMENTARY-ENTRY" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{level-number} [group-data-name]"
    "	[BLANK WHEN ZERO]"
    "	[COLUMN NUMBER IS {column-num1}]"
    "	[GROUP INDICATE]"
    "	[JUSTIFIED RIGHT]"
    "	[LINE NUMBER IS {{line-num1} [ON NEXT PAGE]|PLUS {line-num-plus}}]"
    "	PICTURE IS {character-string}"
    "	[SIGN IS {LEADING|TRAILING} SEPARATE CHARACTER]"
    "	{SOURCE IS ..|VALUE IS ..|SUM {sum-name} ..}"
    "	[USAGE IS DISPLAY]."

END DEFINE

DELETE PLACEHOLDER "REPORT-FILE-DESCRIPTION" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "REPORT-FILE-DESCRIPTION" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "FD {file-name}"
    "	[IS EXTERNAL]"
    "	[IS GLOBAL]"
    "	[BLOCK CONTAINS [{smallest-block} TO] {blocksize} {RECORDS|CHARACTERS}]"
    "	[RECORD {CONTAINS .. CHARACTERS|IS VARYING ..}]"
    "	[LABEL RECORDS ARE {STANDARD|OMITTED}]"
    "	[VALUE OF ID IS {file-spec2}]"
    "	[ACCESS MODE IS SEQUENTIAL]"
    "	REPORTS ARE {report-name}..."
    "	[CODE-SET IS {alphabet-name3}]"
    "	[FILE STATUS IS {file-stat}]."

END DEFINE

DELETE PLACEHOLDER "REPORT-ITEM" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "REPORT-ITEM" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "names either a report-name in a Report Description entry, or the"
    "group-data-name of a TYPE IS DETAIL report group."

END DEFINE

DELETE PLACEHOLDER "REPORT-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "REPORT-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "names a report defined by a Report Description entry (RD) in the"
    "Report Section of the Data Division."

END DEFINE

DELETE PLACEHOLDER "REPORT-SUBORDINATE-ENTRY" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "REPORT-SUBORDINATE-ENTRY" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{level-number} [group-data-name]"
    "	[LINE NUMBER IS {{line-num1} [ON NEXT PAGE]|PLUS {line-num-plus}}]"
    "	[USAGE IS DISPLAY]."
    "	[report-elementary-entry]..."

END DEFINE

DELETE PLACEHOLDER REQUIRED -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER REQUIRED -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "REQUIRED"

END DEFINE

DELETE PLACEHOLDER "RESERVE {RESERVE-NUM} AREAS" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "RESERVE {RESERVE-NUM} AREAS" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "RESERVE {reserve-num} AREAS"

END DEFINE

DELETE PLACEHOLDER "RESERVE-NUM" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "RESERVE-NUM" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is an integer literal from 1 through 127.  It specifies the number of"
    "input/output areas for the file."

END DEFINE

DELETE PLACEHOLDER "RESET ON {{CONTROL-FOOT-NAME}|FINAL}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "RESET ON {{CONTROL-FOOT-NAME}|FINAL}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "RESET ON {{control-foot-name}|FINAL}"

END DEFINE

DELETE PLACEHOLDER RESULT -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER RESULT -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "is an index-name, the identifier of an index data item, or an elementary"
    "numeric data item described as an integer."

END DEFINE

DELETE PLACEHOLDER "RESULT-N" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "RESULT-N" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the identifier of an elementary numeric item.  It is the resultant"
    "identifier."

END DEFINE

DELETE PLACEHOLDER "RESULT-N-OR-NE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "RESULT-N-OR-NE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the identifier of an elementary numeric item or an elementary numeric"
    "edited item.  It is the resultant identifier."

END DEFINE

DELETE PLACEHOLDER RETAINING -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER RETAINING -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "RETAINING"

END DEFINE

DELETE PLACEHOLDER "RETAINING [CURRENCY-INDICATORS] CURRENCY" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "RETAINING [CURRENCY-INDICATORS] CURRENCY" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "RETAINING [currency-indicators] CURRENCY"

END DEFINE

DELETE PLACEHOLDER "RETRIEVAL|UPDATE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "RETRIEVAL|UPDATE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "RETRIEVAL"
    "UPDATE"

END DEFINE

DELETE PLACEHOLDER "REVERSE-VIDEO" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "REVERSE-VIDEO" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "REVERSE-VIDEO"

END DEFINE

DELETE PLACEHOLDER REVERSED -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER REVERSED -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "REVERSED"

END DEFINE

DELETE PLACEHOLDER "RIGHT-PART" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "RIGHT-PART" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "=={pseudo-text-2}=="/PLACEHOLDER
    "IDENTIFIER-2"/PLACEHOLDER
    "LITERAL-2"/PLACEHOLDER
    "WORD-2"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER ROUNDED -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER ROUNDED -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "ROUNDED"

END DEFINE

DELETE PLACEHOLDER "ROUTINE LEVEL COMMENTS" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "ROUTINE LEVEL COMMENTS" -
    /LANGUAGE="cobol" -
    /PLACEHOLDER=STANDARD_ROUTINE_LEVEL_COMMENTS

END DEFINE
DELETE PLACEHOLDER "RUN|{DISP}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "RUN|{DISP}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "RUN"
    "DISP"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "SAME [RECORD|SORT|SORT-MERGE] AREA FOR {SAME-AREA-FILE} {SAME-AREA-FILE}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SAME [RECORD|SORT|SORT-MERGE] AREA FOR {SAME-AREA-FILE} {SAME-AREA-FILE}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "SAME [RECORD|SORT|SORT-MERGE] AREA FOR {same-area-file} {same-area-file}..."

END DEFINE

DELETE PLACEHOLDER "SAME-AREA-FILE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SAME-AREA-FILE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "names a file described in a Data Division file description"
    "entry to share storage areas with every other same-area-file."

END DEFINE

DELETE PLACEHOLDER "SCHEMA-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SCHEMA-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "references a DBMS schema name in the Common Data Dictionary."

END DEFINE

DELETE PLACEHOLDER "SCREEN SECTION .." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SCREEN SECTION .." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "SCREEN SECTION."
    "[screen-description-entry]..."

END DEFINE

DELETE PLACEHOLDER "SCREEN-COLUMN-NUM-OPTIONS" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SCREEN-COLUMN-NUM-OPTIONS" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "COLUMN-NUM2"/PLACEHOLDER
    "COLUMN-ID"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "SCREEN-DESCRIPTION-ENTRY" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SCREEN-DESCRIPTION-ENTRY" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION=" to specify X/Open Data Division Screen Section for DEC COBOL." -
    /DUPLICATION=VERTICAL -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{level-number} [{screen-name}|FILLER]"
    "	{screen-formats}"

END DEFINE

DELETE PLACEHOLDER "SCREEN-DISPLAY-PARAMS" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SCREEN-DISPLAY-PARAMS" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "	[AT LINE NUMBER {screen-line-num-options}]"
    "	[AT COLUMN NUMBER {screen-column-num-options}]"

END DEFINE

DELETE PLACEHOLDER "SCREEN-FORMAT-1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SCREEN-FORMAT-1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION=" to specify X/Open Data Division Screen Section format 1 group description for DEC COBOL." -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "   [BLANK SCREEN]"
    "   [FOREGROUND COLOR IS {color-num}]"
    "   [BACKGROUND COLOR IS {color-num}]"
    "   [AUTO]"
    "   [SECURE]"
    "   [REQUIRED]"
    "   [USAGE IS DISPLAY]"
    "   [SIGN IS {LEADING|TRAILING} [SEPARATE CHARACTER]]"
    "   [FULL]."

END DEFINE

DELETE PLACEHOLDER "SCREEN-FORMAT-2" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SCREEN-FORMAT-2" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION=" to specify X/Open Data Division Screen Section format 2 literal screen element for DEC COBOL." -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "   [BLANK {LINE|SCREEN}]"
    "   [BELL]"
    "   [BLINK]"
    "   [ERASE {EOL|EOS}]"
    "   [{HIGHLIGHT|LOWLIGHT}]"
    "   [REVERSE-VIDEO]"
    "   [UNDERLINE]"
    "   [LINE NUMBER IS {[PLUS] {screen-position-spec}}]"
    "   [COLUMN NUMBER IS {[PLUS] {screen-position-spec}}]"
    "   [FOREGROUND COLOR IS {color-num}]"
    "   [BACKGROUND COLOR IS {color-num}]"
    "   [VALUE IS {screen-literal-1}]."

END DEFINE

DELETE PLACEHOLDER "SCREEN-FORMAT-3" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SCREEN-FORMAT-3" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION=" to specify X/Open Data Division Screen Section format 3 data item screen elements for DEC COBOL." -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "   [BLANK {LINE|SCREEN}]"
    "   [BELL]"
    "   [BLINK]"
    "   [ERASE {EOL|EOS}]"
    "   [{HIGHLIGHT|LOWLIGHT}]"
    "   [REVERSE-VIDEO]"
    "   [UNDERLINE]"
    "   [LINE NUMBER IS {[PLUS] {screen-position-spec}}]"
    "   [COLUMN NUMBER IS {[PLUS] {screen-position-spec}}]"
    "   [FOREGROUND COLOR IS {color-num}]"
    "   [BACKGROUND COLOR IS {color-num}]"
    "   [PICTURE IS {character-string} {screen-using-from-to-spec}]"
    "   [USAGE IS DISPLAY]"
    "   [BLANK WHEN ZERO]"
    "   [JUSTIFIED RIGHT]"
    "   [SIGN IS {LEADING|TRAILING} [SEPARATE CHARACTER]]"
    "   [AUTO]"
    "   [SECURE]"
    "   [REQUIRED]"
    "   [FULL]."

END DEFINE

DELETE PLACEHOLDER "SCREEN-FORMATS" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SCREEN-FORMATS" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION=" to specify X/Open Data Division Screen Section formats for DEC COBOL." -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "SCREEN-FORMAT-1"/PLACEHOLDER
    "SCREEN-FORMAT-2"/PLACEHOLDER
    "SCREEN-FORMAT-3"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "SCREEN-FROM-TO-SPEC" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SCREEN-FROM-TO-SPEC" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{[{screen-from-spec}] [{screen-to-spec}]}"

END DEFINE

DELETE PLACEHOLDER "SCREEN-IDENTIFIER1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SCREEN-IDENTIFIER1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    " for X/Open for DEC COBOL DISPLAY an unsigned source field giving the line or column number of screen."

END DEFINE

DELETE PLACEHOLDER "SCREEN-IDENTIFIER4" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SCREEN-IDENTIFIER4" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    " for X/Open for DEC COBOL DISPLAY a source field on the screen."

END DEFINE

DELETE PLACEHOLDER "SCREEN-IDENTIFIER5" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SCREEN-IDENTIFIER5" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    " for X/Open for DEC COBOL DISPLAY a destination field on the screen."

END DEFINE

DELETE PLACEHOLDER "SCREEN-INTEGER1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SCREEN-INTEGER1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    " for X/Open for DEC COBOL an unsigned integer which specifies the line or column position on the screen."

END DEFINE

DELETE PLACEHOLDER "SCREEN-LINE-NUM-OPTIONS" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SCREEN-LINE-NUM-OPTIONS" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "LINE-NUM2"/PLACEHOLDER
    "LINE-ID"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "SCREEN-LITERAL-1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SCREEN-LITERAL-1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    " for X/Open for DEC COBOL a literal to be placed within a field on the screen."

END DEFINE

DELETE PLACEHOLDER "SCREEN-LITERAL2" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SCREEN-LITERAL2" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    " for X/Open for DEC COBOL a literal to be placed within a field on the screen."

END DEFINE

DELETE PLACEHOLDER "SCREEN-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SCREEN-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "names an X/Open screen item in the Screen Section of the program for DEC COBOL."

END DEFINE

DELETE PLACEHOLDER "SCREEN-NAME3" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SCREEN-NAME3" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a screen name which is defined in the SCREEN SECTION of the DATA DIVISION."

END DEFINE

DELETE PLACEHOLDER "SCREEN-POSITION-SPEC" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SCREEN-POSITION-SPEC" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{{screen-identifier1}|{screen-integer1}}"

END DEFINE

DELETE PLACEHOLDER "SCREEN-USING-FROM-TO-SPEC" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SCREEN-USING-FROM-TO-SPEC" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "USING {screen-using-spec}"/PLACEHOLDER
    "SCREEN-FROM-TO-SPEC"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "SCREEN-USING-SPEC" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SCREEN-USING-SPEC" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    " for X/Open for DEC COBOL the data name of a screen field which is to be used by the ACCEPT and DISPLAY verbs."

END DEFINE

DELETE PLACEHOLDER "SCREEN|LINE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SCREEN|LINE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "SCREEN"
    "LINE"

END DEFINE

DELETE PLACEHOLDER "SD {FILE-NAME} [RECORD {CONTAINS .. CHARACTERS|IS VARYING ..}]." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SD {FILE-NAME} [RECORD {CONTAINS .. CHARACTERS|IS VARYING ..}]." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "SD {file-name}"
    "	[RECORD {CONTAINS .. CHARACTERS|IS VARYING ..}]"
    "	[DATA RECORDS ARE {rec-name3}...]."

END DEFINE

DELETE PLACEHOLDER "SE-DESCRIPTION" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SE-DESCRIPTION" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "describes all functional side effects that are not evident from"
    "the invocation interface.  This includes changes in storage"
    "allocation, process status, file operations, errors signaled, etc."

END DEFINE

DELETE PLACEHOLDER "SEARCH-ACTION" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SEARCH-ACTION" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "sr-statement END-SEARCH"/PLACEHOLDER
    "NEXT SENTENCE"

END DEFINE

DELETE PLACEHOLDER "SEARCH-SELECTOR" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SEARCH-SELECTOR" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "{elemnt} IS EQUAL TO {arg2-or-func}"/PLACEHOLDER
    "CONDITION-NAME"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "SEARCH-WHEN" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SEARCH-WHEN" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "{WHEN {conditional-expression} {statement}...}... END-SEARCH"/PLACEHOLDER
    "WHEN {conditional-expression} {{statement}... | NEXT SENTENCE}"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER SECTION -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER SECTION -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{section-name} SECTION [segment-number]."
    "{paragraph}..."

END DEFINE

DELETE PLACEHOLDER "SECTION-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SECTION-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "A user-defined word that names a section in the Procedure Division."

END DEFINE

DELETE PLACEHOLDER SECURE -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER SECURE -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "SECURE"

END DEFINE

DELETE PLACEHOLDER "SECURITY. [COMMENT-ENTRY]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SECURITY. [COMMENT-ENTRY]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "SECURITY. [comment-entry]"

END DEFINE

DELETE PLACEHOLDER SEG -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER SEG -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "is the data-name of a data item in a record description entry  for the"
    "file. It can be qualified, but it cannot be a group item that contains"
    "a  variable-occurrence data item. The data item must be described  as:"
    "(1)  alphanumeric  or   alphabetic  category,  (2)  a  group  item  or"
    "(3) an unsigned numeric display item."

END DEFINE

DELETE PLACEHOLDER "SEG-KEY" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SEG-KEY" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is  the  Record Key  for the file.  It is  a  segmented-key  name that"
    "represents the concatenation of one or more (up to eight)  occurences "
    "of seg."

END DEFINE

DELETE PLACEHOLDER "SEGMENT-NUMBER" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SEGMENT-NUMBER" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "A user-defined word that classifies sections in the Procedure Division"
    "to enable segmentation.  Segment-numbers can contain only the characters"
    "0 through 9.  They can be one- or two-digit numbers."

END DEFINE

DELETE PLACEHOLDER SENTENCE -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER SENTENCE -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{statement}...."

END DEFINE

DELETE PLACEHOLDER "SEPARATE CHARACTER" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SEPARATE CHARACTER" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "SEPARATE CHARACTER"

END DEFINE

DELETE PLACEHOLDER "SEQ-FILE-EXPR" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SEQ-FILE-EXPR" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "{disk-seq-file-expr}"
    "{tape-seq-file-expr}"

END DEFINE

DELETE PLACEHOLDER "SEQ-LOCK-MODE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SEQ-LOCK-MODE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION=" to specify X/Open line/sequential file-locking technique for DEC COBOL." -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "AUTOMATIC"
    "AUTOMATIC WITH LOCK ON RECORD"
    "EXCLUSIVE"

END DEFINE

DELETE PLACEHOLDER "SEQUENTIAL RELATIVE KEY IS {REL-KEY}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SEQUENTIAL RELATIVE KEY IS {REL-KEY}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "SEQUENTIAL RELATIVE KEY IS {rel-key}"

END DEFINE

DELETE PLACEHOLDER "SEQUENTIAL|RANDOM|DYNAMIC" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SEQUENTIAL|RANDOM|DYNAMIC" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "SEQUENTIAL"
    "RANDOM"
    "DYNAMIC"

END DEFINE

DELETE PLACEHOLDER SET -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER SET -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "SET"

END DEFINE

DELETE PLACEHOLDER "SET-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SET-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "is a DBMS subschema set name."

END DEFINE

DELETE PLACEHOLDER "SHORTEST-REC" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SHORTEST-REC" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is an integer that specifies the minimum number of character positions"
    "in a variable length record."

END DEFINE

DELETE PLACEHOLDER "SIGN IS {LEADING|TRAILING} SEPARATE CHARACTER" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SIGN IS {LEADING|TRAILING} SEPARATE CHARACTER" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "SIGN IS {LEADING|TRAILING} SEPARATE CHARACTER"

END DEFINE

DELETE PLACEHOLDER "SIGN IS {LEADING|TRAILING} [SEPARATE CHARACTER]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SIGN IS {LEADING|TRAILING} [SEPARATE CHARACTER]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "SIGN IS {LEADING|TRAILING} [SEPARATE CHARACTER]"

END DEFINE

DELETE PLACEHOLDER SIMPLE -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER SIMPLE -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{first-proc2} [THROUGH {end-proc2}]"

END DEFINE

DELETE PLACEHOLDER "SIMPLE (IN-LINE)" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SIMPLE (IN-LINE)" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{statement}..."
    "END-PERFORM"

END DEFINE

DELETE PLACEHOLDER "SIMPLE|SIMPLE (IN-LINE)" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SIMPLE|SIMPLE (IN-LINE)" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "simple"/PLACEHOLDER
    "simple (in-line)"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "SIZE {{PROT-SIZE-LIT}|{PROT-SIZE-ITEM}}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SIZE {{PROT-SIZE-LIT}|{PROT-SIZE-ITEM}}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "SIZE {{prot-size-lit}|{prot-size-item}}"

END DEFINE

DELETE PLACEHOLDER "SMALLEST-BLOCK" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SMALLEST-BLOCK" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is an integer literal.  It specifies the minimum physical record size."

END DEFINE

DELETE PLACEHOLDER "SMRG-FILE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SMRG-FILE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the name of a file described in a sort-merge file description (SD)"
    "entry."

END DEFINE

DELETE PLACEHOLDER "SORT-MERGE-FILE-DESCRIPTION" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SORT-MERGE-FILE-DESCRIPTION" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{SD {file-name} [RECORD {CONTAINS .. CHARACTERS|IS VARYING ..}].}"
    "{record-description-entry}..."

END DEFINE

DELETE PLACEHOLDER SORTFILE -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER SORTFILE -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a file-name described in a sort-merge file description (SD) entry in the"
    "Data Division."

END DEFINE

DELETE PLACEHOLDER SORTKEY -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER SORTKEY -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "is the data-name of a data item in a record associated with sortfile."

END DEFINE

DELETE PLACEHOLDER "SOURCE IS ..|VALUE IS ..|SUM {SUM-NAME} .." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SOURCE IS ..|VALUE IS ..|SUM {SUM-NAME} .." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "SOURCE IS {source-id}"/PLACEHOLDER
    "VALUE IS {lit2}"/PLACEHOLDER
    "{SUM {sum-name}... [UPON {detail-report-group-name}...]}... [RESET ON {{control-foot-name}|FINAL}]"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "SOURCE IS {SOURCE-ID}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SOURCE IS {SOURCE-ID}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "SOURCE IS {source-id}"

END DEFINE

DELETE PLACEHOLDER "SOURCE-COMPUTER .." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SOURCE-COMPUTER .." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "SOURCE-COMPUTER."
    "	[{AXP|VAX} [WITH DEBUGGING MODE].]"

END DEFINE

DELETE PLACEHOLDER "SOURCE-ID" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SOURCE-ID" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "names an elementary item in the Data Division."

END DEFINE

DELETE PLACEHOLDER "SOURCE-ITEM-WITH-CONVERSION" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SOURCE-ITEM-WITH-CONVERSION" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{{src-item3-or-func}|{lit3}} [WITH CONVERSION]"

END DEFINE

DELETE PLACEHOLDER "SPECIAL-NAMES .." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SPECIAL-NAMES .." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "SPECIAL-NAMES."
    "	[special-names-entry]"

END DEFINE

DELETE PLACEHOLDER "SPECIAL-NAMES-ENTRY" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SPECIAL-NAMES-ENTRY" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[{CARD-READER ..} IS {device-name}]..."
    "[{X/Open-special-name ..} IS {xmnem-name}]..."
    "[SWITCH {switch-num} {switch-def}]..."
    "[{SWITCH-n ..} {switch-defn}]..."
    "[ALPHABET {alphabet-name2} IS {alphabet-selector}]..."
    "[SYMBOLIC CHARACTERS {symbolic-in-alphabet}...]..."
    "[CLASS {class-name} IS {class-def}...]..."
    "[CURRENCY SIGN IS {char}]"
    "[DECIMAL-POINT IS COMMA]"
    "[CURSOR IS {cursor-name}]"
    "[CRT STATUS IS {crt-sts-name}]."

END DEFINE

DELETE PLACEHOLDER "SR-STATEMENT END-SEARCH" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SR-STATEMENT END-SEARCH" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "    {statement}..."
    "END-SEARCH"

END DEFINE

DELETE PLACEHOLDER "SRC-AREA" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SRC-AREA" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the identifier of the data item that contains the data."

END DEFINE

DELETE PLACEHOLDER "SRC-ITEM1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SRC-ITEM1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "At least one operand in every relation condition of a WHERE boolean"
    "expression must be an elementary item in the record being found or "
    "fetched."

END DEFINE

DELETE PLACEHOLDER "SRC-ITEM2" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SRC-ITEM2" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "is a literal or the identifier of a data item.  The literal can be any"
    "figurative constant."

END DEFINE

DELETE PLACEHOLDER "SRC-ITEM3" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SRC-ITEM3" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is an identifier that represents the sending area."

END DEFINE

DELETE PLACEHOLDER "SRC-ITEM3-OR-FUNC" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SRC-ITEM3-OR-FUNC" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "SRC-ITEM3"/PLACEHOLDER
    "FUNCTION"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "SRC-ITEM4" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SRC-ITEM4" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the identifier of the data item that contains the data."

END DEFINE

DELETE PLACEHOLDER "SRC-ITEMS-WITH-EXTENSIONS" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SRC-ITEMS-WITH-EXTENSIONS" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{src-item2}"
    "	[AT LINE NUMBER {line-num-options2}]"
    "	[AT COLUMN NUMBER {column-num-options2}]"
    "	[ERASE [TO END OF] {SCREEN|LINE}]"
    "	[WITH BELL]"
    "	[UNDERLINED]"
    "	[BOLD]"
    "	[WITH BLINKING]"
    "	[REVERSED]"
    "	[WITH CONVERSION]"

END DEFINE

DELETE PLACEHOLDER "SRC-STRING1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SRC-STRING1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the identifier of a group item or an elementary data item with"
    "DISPLAY usage.  INSPECT operates on the contents of this data item."

END DEFINE

DELETE PLACEHOLDER "SRC-STRING2" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SRC-STRING2" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "is a nonnumeric literal or identifier of a DISPLAY data item.  It is the"
    "sending area."

END DEFINE

DELETE PLACEHOLDER "SRC-STRING3" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SRC-STRING3" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the identifier of an alphanumeric class data item.  It cannot be"
    "reference modified.  Src-string is the sending field."

END DEFINE

DELETE PLACEHOLDER "SRC-TABLE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SRC-TABLE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a table identifier."

END DEFINE

DELETE PLACEHOLDER SRCNUM -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER SRCNUM -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a numeric literal or the identifier of an elementary numeric item."

END DEFINE

DELETE PLACEHOLDER "SRCNUM-OR-FUNC" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SRCNUM-OR-FUNC" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "SRCNUM"/PLACEHOLDER
    "FUNCTION"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "STANDARD-MODULE-LEVEL-COMMENTS" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "STANDARD-MODULE-LEVEL-COMMENTS" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "*+"
    "* PROGRAM : [tbs]"
    "* "
    "* PROGRAM DESCRIPTION:"
    "* "
    "*       {tbs}"
    "* "
    "* AUTHORS:"
    "* "
    "*       {tbs}"
    "* "
    "* CREATION DATE: {tbs}"
    "* "
    "* "
    "* DESIGN ISSUES:"
    "* "
    "*       [tbs]"
    "* "
    "* MODIFICATION HISTORY:"
    "* "
    "*       [chg-date-author-desc]"
    "* "
    "*-"

END DEFINE

DELETE PLACEHOLDER STANDARD_ROUTINE_LEVEL_COMMENTS -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER STANDARD_ROUTINE_LEVEL_COMMENTS -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "*+"
    "* FUNCTIONAL DESCRIPTION:"
    "* "
    "*   {tbs}"
    "* "
    "* FORMAL PARAMETERS:"
    "* "
    "*   {subtags}"
    "* "
    "* IMPLICIT INPUT PARAMETERS:"
    "* "
    "*   {subtags}"
    "* "
    "* IMPLICIT OUTPUT PARAMETERS:"
    "* "
    "*   {subtags}"
    "* "
    "* RETURN VALUE:"
    "* "
    "*   [DESCRIPTION OR NONE]"
    "* "
    "* SIDE EFFECTS:"
    "* "
    "*   [DESCRIPTION OR NONE]"
    "* "
    "* DESIGN:"
    "* "
    "*	 [tbs]"
    "* "
    "* [logical properties]..."
    "* "
    "* [other files required]..."
    "* "
    "* [other tags]..."
    "*-"

END DEFINE

DELETE PLACEHOLDER "STANDARD|OMITTED" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "STANDARD|OMITTED" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "STANDARD"
    "OMITTED"

END DEFINE

DELETE PLACEHOLDER "START-KEY-OPTIONS" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "START-KEY-OPTIONS" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "IS EQUAL TO"
    "IS ="
    "IS GREATER THAN"
    "IS >"
    "IS NOT LESS THAN"
    "IS NOT <"
    "IS GREATER THAN OR EQUAL TO"
    "IS >="
    "IS LESS THAN"
    "IS <"
    "IS NOT GREATER THAN"
    "IS NOT >"
    "IS LESS THAN OR EQUAL TO"
    "IS <="

END DEFINE

DELETE PLACEHOLDER STATEMENT -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER STATEMENT -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR="" -
    /TYPE=MENU -

    "ACCEPT1" /TOKEN
    "ACCEPT2" /TOKEN
    "ACCEPT3" /TOKEN
    "ACCEPT4" /TOKEN
    "ACCEPT5" /TOKEN
    "ADD1" /TOKEN
    "ADD2" /TOKEN
    "ADD3" /TOKEN
    "ALTER" /TOKEN
    "CALL" /TOKEN
    "CANCEL" /TOKEN
    "CLOSE" /TOKEN
    "COMMIT" /TOKEN
    "COMPUTE" /TOKEN
    "CONNECT" /TOKEN
    "CONTINUE" /TOKEN
    "DELETE" /TOKEN
    "DISCONNECT" /TOKEN
    "DISPLAY1" /TOKEN
    "DISPLAY2" /TOKEN
    "DISPLAY3" /TOKEN
    "DIVIDE1" /TOKEN
    "DIVIDE2" /TOKEN
    "DIVIDE3" /TOKEN
    "DIVIDE4" /TOKEN
    "DIVIDE5" /TOKEN
    "ERASE" /TOKEN
    "EVALUATE" /TOKEN
    "EXIT1" /TOKEN
    "EXIT2" /TOKEN
    "FETCH" /TOKEN
    "FIND1" /TOKEN
    "FIND2" /TOKEN
    "FREE" /TOKEN
    "GENERATE" /TOKEN
    "GET" /TOKEN
    "GO1" /TOKEN
    "GO2" /TOKEN
    "IF" /TOKEN
    "INITIALIZE" /TOKEN
    "INITIATE" /TOKEN
    "INSPECT1" /TOKEN
    "INSPECT2" /TOKEN
    "INSPECT3" /TOKEN
    "INSPECT4" /TOKEN
    "KEEP" /TOKEN
    "MERGE" /TOKEN
    "MODIFY" /TOKEN
    "MOVE1" /TOKEN
    "MOVE2" /TOKEN
    "MULTIPLY1" /TOKEN
    "MULTIPLY2" /TOKEN
    "OPEN1" /TOKEN
    "OPEN2" /TOKEN
    "PERFORM1" /TOKEN
    "PERFORM2" /TOKEN
    "PERFORM3" /TOKEN
    "PERFORM4" /TOKEN
    "READ1" /TOKEN
    "READ2" /TOKEN
    "READY" /TOKEN
    "RECONNECT" /TOKEN
    "RECORD" /TOKEN
    "RELEASE" /TOKEN
    "RETURN" /TOKEN
    "REWRITE" /TOKEN
    "ROLLBACK" /TOKEN
    "SEARCH1" /TOKEN
    "SEARCH2" /TOKEN
    "SET1" /TOKEN
    "SET2" /TOKEN
    "SET3" /TOKEN
    "SET4" /TOKEN
    "SET5" /TOKEN
    "SET6" /TOKEN
    "SORT" /TOKEN
    "START" /TOKEN
    "STOP" /TOKEN
    "STORE" /TOKEN
    "STRING" /TOKEN
    "SUBTRACT1" /TOKEN
    "SUBTRACT2" /TOKEN
    "SUBTRACT3" /TOKEN
    "SUPPRESS" /TOKEN
    "TERMINATE" /TOKEN
    "UNLOCK" /TOKEN
    "UNSTRING" /TOKEN
    "WRITE1" /TOKEN
    "WRITE2" /TOKEN

END DEFINE

DELETE PLACEHOLDER "STATUS-CODE-ID" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "STATUS-CODE-ID" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "must be a word or longword COMP integer as represented by"
    "PIC S9(1 to 9) COMP."

END DEFINE

DELETE PLACEHOLDER STREAM -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER STREAM -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "STREAM"

END DEFINE

DELETE PLACEHOLDER "STREAM-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "STREAM-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "represents the name of a DBMS stream. Signals the Data Base Control"
    "System (DBCS) that your run unit uses a stream, which allows access"
    "to multiple DBMS databases or subschemas."

END DEFINE

DELETE PLACEHOLDER "SUB-SCHEMA SECTION .." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SUB-SCHEMA SECTION .." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "SUB-SCHEMA SECTION."
    "[DB {subschema-name} .. [LD {keeplist-name}.]...]"

END DEFINE

DELETE PLACEHOLDER "SUBJ-ITEM" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SUBJ-ITEM" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is an identifier, an arithmetic or conditional expression, or a"
    "literal other than the figurative constant ZERO."

END DEFINE

DELETE PLACEHOLDER "SUBSCHEMA-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SUBSCHEMA-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "references a DBMS subschema name in the Common Data Dictionary (CDD)"
    "under the DBMS schema name."

END DEFINE

DELETE PLACEHOLDER SUBTAGS -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER SUBTAGS -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="Subtags under tag" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{identifier}:"
    "             {tbs}"
    "[more_subtags]..."

END DEFINE

DELETE PLACEHOLDER "SUCCESS|FAILURE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SUCCESS|FAILURE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "SUCCESS"
    "FAILURE"

END DEFINE

DELETE PLACEHOLDER "SUM {SUM-NAME}... [UPON {DETAIL-REPORT-GROUP-NAME}...]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SUM {SUM-NAME}... [UPON {DETAIL-REPORT-GROUP-NAME}...]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "SUM {sum-name}... [UPON {detail-report-group-name}...]"

END DEFINE

DELETE PLACEHOLDER "SUM-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SUM-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "names a numeric data item with an optional sign in the Sub-Schema, File,"
    "Working-Storage, and Linkage Sections, or another sum counter in the"
    "Report Section."

END DEFINE

DELETE PLACEHOLDER "SWITCH {SWITCH-NUM} {SWITCH-DEF}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SWITCH {SWITCH-NUM} {SWITCH-DEF}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "SWITCH {switch-num} [IS {switch-name1}] [ON STATUS IS {cond-name}] [OFF STATUS IS {cond-name}]"

END DEFINE

DELETE PLACEHOLDER "SWITCH-DEFN" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SWITCH-DEFN" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[IS {switch-name1}] [ON STATUS IS {cond-name}] [OFF STATUS IS {cond-name}]"

END DEFINE

DELETE PLACEHOLDER "SWITCH-N .." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SWITCH-N .." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "SWITCH-1"
    "SWITCH-2"
    "SWITCH-3"
    "SWITCH-4"
    "SWITCH-5"
    "SWITCH-6"
    "SWITCH-7"
    "SWITCH-8"

END DEFINE

DELETE PLACEHOLDER "SWITCH-NAME1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SWITCH-NAME1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a mnemonic-name for the program switch."

END DEFINE

DELETE PLACEHOLDER "SWITCH-NAME2" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SWITCH-NAME2" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=TERMINAL -

    "is the name of an external switch defined in the SPECIAL-NAMES paragraph."

END DEFINE

DELETE PLACEHOLDER "SWITCH-NUM" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SWITCH-NUM" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the number of a program switch.  Its value can range from 1 through 16."

END DEFINE

DELETE PLACEHOLDER "SWITCH-STATUS" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SWITCH-STATUS" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "tests the ON or OFF setting of an external logical program switch.  The"
    "SWITCH clause of the SPECIAL-NAMES paragraph must associate a condition-name"
    "with the logical switch setting."

END DEFINE

DELETE PLACEHOLDER "SYMBOLIC CHARACTERS {SYMBOLIC-IN-ALPHABET}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SYMBOLIC CHARACTERS {SYMBOLIC-IN-ALPHABET}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "SYMBOLIC CHARACTERS {symbolic-in-alphabet}..."

END DEFINE

DELETE PLACEHOLDER "SYMBOLIC-CHAR" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SYMBOLIC-CHAR" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a user-defined word that names the symbolic-character.  It always"
    "possesses the global attribute.  The same symbolic-char cannot appear"
    "more than once in the SYMBOLIC CHARACTERS clause."

END DEFINE

DELETE PLACEHOLDER "SYMBOLIC-IN-ALPHABET" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SYMBOLIC-IN-ALPHABET" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{{symbolic-char}... IS {char-val}...}... [IN {alphabet-name2}]"

END DEFINE

DELETE PLACEHOLDER "SYNCHRONIZED [LEFT|RIGHT]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "SYNCHRONIZED [LEFT|RIGHT]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "SYNCHRONIZED [LEFT|RIGHT]"

END DEFINE

DELETE PLACEHOLDER "TABLE-SIZE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "TABLE-SIZE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is an integer that specifies a table element's exact number of"
    "occurrences."

END DEFINE

DELETE PLACEHOLDER "TALLY-CTR-CLAUSE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "TALLY-CTR-CLAUSE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{tally-ctr1} FOR"
    "	{compare-val-clause}..."

END DEFINE

DELETE PLACEHOLDER "TALLY-CTR1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "TALLY-CTR1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the identifier of an elementary numeric data item."

END DEFINE

DELETE PLACEHOLDER "TALLY-CTR2" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "TALLY-CTR2" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the identifier of an elementary numeric data item described as an"
    "integer.  It counts the number of dest-string fields accessed during"
    "the UNSTRING operation."

END DEFINE

DELETE PLACEHOLDER "TALLYING IN {TALLY-CTR2}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "TALLYING IN {TALLY-CTR2}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "TALLYING IN {tally-ctr2}"

END DEFINE

DELETE PLACEHOLDER "TAPE-SEQ-FILE-EXPR" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "TAPE-SEQ-FILE-EXPR" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "MULTIPLE {REEL|UNIT} FILE"

END DEFINE

DELETE PLACEHOLDER TBS -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER TBS -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "- To be specified."

END DEFINE

DELETE PLACEHOLDER "TEXT-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "TEXT-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the name of a COBOL library file available during compilation."

END DEFINE

DELETE PLACEHOLDER "THEN-CLAUSE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "THEN-CLAUSE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "STATEMENT"/PLACEHOLDER
    "NEXT SENTENCE"

END DEFINE

DELETE PLACEHOLDER "THROUGH {END-PROC1}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "THROUGH {END-PROC1}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "THROUGH {end-proc1}"

END DEFINE

DELETE PLACEHOLDER "THROUGH {END-PROC2}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "THROUGH {END-PROC2}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "THROUGH {end-proc2}"

END DEFINE

DELETE PLACEHOLDER "THROUGH {END-PROC3}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "THROUGH {END-PROC3}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "THROUGH {end-proc3}"

END DEFINE

DELETE PLACEHOLDER "THROUGH {HIGH-VALUE}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "THROUGH {HIGH-VALUE}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "THROUGH {high-value}"

END DEFINE

DELETE PLACEHOLDER "THROUGH {LAST-LITERAL}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "THROUGH {LAST-LITERAL}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "THROUGH {last-literal}"

END DEFINE

DELETE PLACEHOLDER "THROUGH {LAST-LITERAL}|ALSO {LIT1}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "THROUGH {LAST-LITERAL}|ALSO {LIT1}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "THROUGH {last-literal}"/PLACEHOLDER
    "ALSO {lit1}"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "THROUGH {OBJ-ITEM}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "THROUGH {OBJ-ITEM}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "THROUGH {obj-item}"

END DEFINE

DELETE PLACEHOLDER "THROUGH {RENAME-END}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "THROUGH {RENAME-END}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "THROUGH {rename-end}"

END DEFINE

DELETE PLACEHOLDER "THRU {STREAM-NAME}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "THRU {STREAM-NAME}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "THRU {stream-name}"

END DEFINE

DELETE PLACEHOLDER "TO END OF" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "TO END OF" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "TO END OF"

END DEFINE

DELETE PLACEHOLDER "TO POSITION {CHANNEL-NUM}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "TO POSITION {CHANNEL-NUM}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "TO POSITION {channel-num}"

END DEFINE

DELETE PLACEHOLDER "TO {LONGEST-REC}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "TO {LONGEST-REC}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "TO {longest-rec}"

END DEFINE

DELETE PLACEHOLDER "TOP-LINES" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "TOP-LINES" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is an integer or the data-name of an elementary unsigned integer numeric"
    "data item.  Its value can be zero.  Top-lines specifies the number of"
    "lines in the top margin of the logical page.  If top-lines is a"
    "data-name, it can be qualified."

END DEFINE

DELETE PLACEHOLDER "TOP-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "TOP-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a mnemonic-name equated to C01 in the SPECIAL-NAMES paragraph"
    "of the Environment Division.  It represents top-of-page and is"
    "equivalent to the PAGE phrase."

END DEFINE

DELETE PLACEHOLDER "TYPE IS {REL-TYPE}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "TYPE IS {REL-TYPE}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "TYPE IS {rel-type}"

END DEFINE

DELETE PLACEHOLDER "TYPE IS {{REPORT|PAGE|CONTROL} HEADING|DETAIL|{CONTROL|PAGE|REPORT} FOOTING}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "TYPE IS {{REPORT|PAGE|CONTROL} HEADING|DETAIL|{CONTROL|PAGE|REPORT} FOOTING}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "TYPE IS {{REPORT|PAGE|CONTROL} HEADING|DETAIL|{CONTROL|PAGE|REPORT} FOOTING}"

END DEFINE

DELETE PLACEHOLDER UNDERLINE -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER UNDERLINE -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "UNDERLINE"

END DEFINE

DELETE PLACEHOLDER UNDERLINED -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER UNDERLINED -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "UNDERLINED"

END DEFINE

DELETE PLACEHOLDER "UNIT [FOR REMOVAL|WITH NO REWIND]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "UNIT [FOR REMOVAL|WITH NO REWIND]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "UNIT [FOR REMOVAL|WITH NO REWIND]"

END DEFINE

DELETE PLACEHOLDER UNTIL -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER UNTIL -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{first-proc2} [THROUGH {end-proc2}] [WITH TEST {BEFORE|AFTER}] UNTIL {conditional-expression}"

END DEFINE

DELETE PLACEHOLDER "UNTIL (IN-LINE)" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "UNTIL (IN-LINE)" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[WITH TEST {BEFORE|AFTER}] UNTIL {conditional-expression}"
    "{statement}..."
    "END-PERFORM"

END DEFINE

DELETE PLACEHOLDER "UNTIL|UNTIL (IN-LINE)" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "UNTIL|UNTIL (IN-LINE)" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "UNTIL"/PLACEHOLDER
    "UNTIL (in-line)"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "UP BY|DOWN BY" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "UP BY|DOWN BY" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "UP BY"
    "DOWN BY"

END DEFINE

DELETE PLACEHOLDER UPDATERS -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER UPDATERS -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "UPDATERS"

END DEFINE

DELETE PLACEHOLDER "UPDATERS|READERS|NO OTHERS" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "UPDATERS|READERS|NO OTHERS" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "UPDATERS"
    "READERS"
    "NO OTHERS"

END DEFINE

DELETE PLACEHOLDER "UPON {DETAIL-REPORT-GROUP-NAME}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "UPON {DETAIL-REPORT-GROUP-NAME}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "UPON {detail-report-group-name}..."

END DEFINE

DELETE PLACEHOLDER "UPON {OUTPUT-DEST}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "UPON {OUTPUT-DEST}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "UPON {output-dest}"

END DEFINE

DELETE PLACEHOLDER "USAGE IS DISPLAY" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "USAGE IS DISPLAY" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "USAGE IS DISPLAY"

END DEFINE

DELETE PLACEHOLDER "USAGE IS {COMP|COMP-1|COMP-2|COMP-3|COMP-5|COMP-X|DISPLAY|INDEX|POINTER|POINTER-64}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "USAGE IS {COMP|COMP-1|COMP-2|COMP-3|COMP-5|COMP-X|DISPLAY|INDEX|POINTER|POINTER-64}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "USAGE IS {COMP|COMP-1|COMP-2|COMP-3|COMP-5|COMP-X|DISPLAY|INDEX|POINTER|POINTER-64}"

END DEFINE

DELETE PLACEHOLDER "USAGE IS {COMP|COMP-1|COMP-2|COMP-3|COMP-5|COMP-X|DISPLAY|INDEX|POINTER}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "USAGE IS {COMP|COMP-1|COMP-2|COMP-3|COMP-5|COMP-X|DISPLAY|INDEX|POINTER}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "USAGE IS {COMP|COMP-1|COMP-2|COMP-3|COMP-5|COMP-X|DISPLAY|INDEX|POINTER}"

END DEFINE

DELETE PLACEHOLDER "USAGE-MODE IS [CONCURRENT|EXCLUSIVE|PROTECTED|BATCH] [RETRIEVAL|UPDATE]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "USAGE-MODE IS [CONCURRENT|EXCLUSIVE|PROTECTED|BATCH] [RETRIEVAL|UPDATE]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "USAGE-MODE IS [CONCURRENT|EXCLUSIVE|PROTECTED|BATCH] [RETRIEVAL|UPDATE]"

END DEFINE

DELETE PLACEHOLDER "USE-STATEMENT" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "USE-STATEMENT" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "USE1" /TOKEN
    "USE2" /TOKEN
    "USE3" /TOKEN

END DEFINE

DELETE PLACEHOLDER "USING {DATA-NAME}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "USING {DATA-NAME}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "USING {data-name}..."

END DEFINE

DELETE PLACEHOLDER "USING {FIRST-ARGS} [OTHER-ARGS]..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "USING {FIRST-ARGS} [OTHER-ARGS]..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "USING {first-args} [other-args]..."

END DEFINE

DELETE PLACEHOLDER "USING {INFILE}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "USING {INFILE}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "USING {infile}..."

END DEFINE

DELETE PLACEHOLDER "USING {REC-KEY2}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "USING {REC-KEY2}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "USING {rec-key2}..."

END DEFINE

DELETE PLACEHOLDER "USING {REC-KEY2}...|WHERE {BOOL-EXP}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "USING {REC-KEY2}...|WHERE {BOOL-EXP}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "USING {rec-key2}..."/PLACEHOLDER
    "WHERE {bool-exp}"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "USING {SCREEN-USING-SPEC}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "USING {SCREEN-USING-SPEC}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "USING {screen-using-spec}"

END DEFINE

DELETE PLACEHOLDER VAL1 -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER VAL1 -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is the sending area.  It can be a literal or the identifier of a data"
    "item."

END DEFINE

DELETE PLACEHOLDER VAL2 -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER VAL2 -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a positive integer, which may be signed.  It can also be an index-name"
    "(or the identifier of an index data item) or an elementary numeric data"
    "item described as an integer."

END DEFINE

DELETE PLACEHOLDER "VALUE IS {LIT2}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "VALUE IS {LIT2}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "VALUE IS {lit2}"

END DEFINE

DELETE PLACEHOLDER "VALUE IS {SCREEN-LITERAL-1}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "VALUE IS {SCREEN-LITERAL-1}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "VALUE IS {screen-literal-1}"

END DEFINE

DELETE PLACEHOLDER "VALUE IS {VALUE-OPTION}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "VALUE IS {VALUE-OPTION}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "VALUE IS {value-option}"

END DEFINE

DELETE PLACEHOLDER "VALUE OF ID IS {FILE-SPEC2}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "VALUE OF ID IS {FILE-SPEC2}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "VALUE OF ID IS {file-spec2}"

END DEFINE

DELETE PLACEHOLDER "VALUE-OPTION" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "VALUE-OPTION" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "LIT2"/PLACEHOLDER
    "EXTERNAL {external-name}"/PLACEHOLDER
    "REFERENCE {data-name}"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER VAR -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER VAR -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is an index-name or the identifier of a numeric elementary data"
    "item.  Its value is changed by increm each time all statements"
    "in the PERFORM range execute."

END DEFINE

DELETE PLACEHOLDER VARYING -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER VARYING -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{first-proc2} [THROUGH {end-proc2}] [WITH TEST {BEFORE|AFTER}]"
    "VARYING {var} FROM {init} BY {increm1} UNTIL {conditional-expression}"
    "[AFTER {var} FROM {init} BY {increm1} UNTIL {conditional-expression}]..."

END DEFINE

DELETE PLACEHOLDER "VARYING (IN-LINE)" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "VARYING (IN-LINE)" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[WITH TEST {BEFORE|AFTER}]"
    "VARYING {var} FROM {init} BY {increm1} UNTIL {conditional-expression}"
    "[AFTER {var} FROM {init} BY {increm1} UNTIL {conditional-expression}]..."
    "{statement}..."
    "END-PERFORM"

END DEFINE

DELETE PLACEHOLDER "VARYING {POINTR1}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "VARYING {POINTR1}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "VARYING {pointr1}"

END DEFINE

DELETE PLACEHOLDER "VARYING|VARYING (IN-LINE)" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "VARYING|VARYING (IN-LINE)" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "VARYING"/PLACEHOLDER
    "VARYING (in-line)"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "WHEN OTHER {STATEMENT}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "WHEN OTHER {STATEMENT}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "WHEN OTHER {statement}..."

END DEFINE

DELETE PLACEHOLDER "WHEN {CONDITIONAL-EXPRESSION} {STATEMENT}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "WHEN {CONDITIONAL-EXPRESSION} {STATEMENT}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "WHEN {conditional-expression}"
    "   {statement}..."

END DEFINE

DELETE PLACEHOLDER "WHEN {CONDITIONAL-EXPRESSION} {{STATEMENT}... | NEXT SENTENCE}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "WHEN {CONDITIONAL-EXPRESSION} {{STATEMENT}... | NEXT SENTENCE}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "WHEN {conditional-expression}"
    "   {{statement}... | NEXT SENTENCE}"

END DEFINE

DELETE PLACEHOLDER "WHEN {OBJECT-ITEM} [ALSO {OBJECT-ITEM}]..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "WHEN {OBJECT-ITEM} [ALSO {OBJECT-ITEM}]..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "WHEN {object-item} [ALSO {object-item}]..."

END DEFINE

DELETE PLACEHOLDER "WHERE {BOOL-EXP}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "WHERE {BOOL-EXP}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "WHERE {bool-exp}"

END DEFINE

DELETE PLACEHOLDER "WINDOW {WINDOW-PTRS}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "WINDOW {WINDOW-PTRS}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "WINDOW {window-ptrs}"

END DEFINE

DELETE PLACEHOLDER "WINDOW-PTRS" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "WINDOW-PTRS" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is an integer from 0 through 127.  Its value can also be 255.  It"
    "specifies the number of retrieval pointers in the window that maps"
    "the disk file."

END DEFINE

DELETE PLACEHOLDER "WITH AUTOTERMINATE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "WITH AUTOTERMINATE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "WITH AUTOTERMINATE"

END DEFINE

DELETE PLACEHOLDER "WITH BELL" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "WITH BELL" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "WITH BELL"

END DEFINE

DELETE PLACEHOLDER "WITH BLINKING" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "WITH BLINKING" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "WITH BLINKING"

END DEFINE

DELETE PLACEHOLDER "WITH CONVERSION" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "WITH CONVERSION" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "WITH CONVERSION"

END DEFINE

DELETE PLACEHOLDER "WITH DEBUGGING MODE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "WITH DEBUGGING MODE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "WITH DEBUGGING MODE"

END DEFINE

DELETE PLACEHOLDER "WITH DUPLICATES" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "WITH DUPLICATES" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "WITH DUPLICATES"

END DEFINE

DELETE PLACEHOLDER "WITH DUPLICATES IN ORDER" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "WITH DUPLICATES IN ORDER" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "WITH DUPLICATES IN ORDER"

END DEFINE

DELETE PLACEHOLDER "WITH EDITING" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "WITH EDITING" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "WITH EDITING"

END DEFINE

DELETE PLACEHOLDER "WITH FILLER {PROT-FILL-LIT}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "WITH FILLER {PROT-FILL-LIT}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "WITH FILLER {prot-fill-lit}"

END DEFINE

DELETE PLACEHOLDER "WITH FOOTING AT {FOOTING-LINE1}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "WITH FOOTING AT {FOOTING-LINE1}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "WITH FOOTING AT {footing-line1}"

END DEFINE

DELETE PLACEHOLDER "WITH IDENT {MODULE-VERS-STRING}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "WITH IDENT {MODULE-VERS-STRING}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "WITH IDENT {module-vers-string}"

END DEFINE

DELETE PLACEHOLDER "WITH NO ADVANCING" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "WITH NO ADVANCING" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "WITH NO ADVANCING"

END DEFINE

DELETE PLACEHOLDER "WITH NO BLANK" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "WITH NO BLANK" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "WITH NO BLANK"

END DEFINE

DELETE PLACEHOLDER "WITH NO ECHO" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "WITH NO ECHO" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "WITH NO ECHO"

END DEFINE

DELETE PLACEHOLDER "WITH NO REWIND" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "WITH NO REWIND" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "WITH NO REWIND"

END DEFINE

DELETE PLACEHOLDER "WITH POINTER {POINTR2}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "WITH POINTER {POINTR2}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "WITH POINTER {pointr2}"

END DEFINE

DELETE PLACEHOLDER "WITH POINTER {POINTR3}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "WITH POINTER {POINTR3}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "WITH POINTER {pointr3}"

END DEFINE

DELETE PLACEHOLDER "WITH TEST {BEFORE|AFTER}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "WITH TEST {BEFORE|AFTER}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "WITH TEST {BEFORE|AFTER}"

END DEFINE

DELETE PLACEHOLDER "WITH WAIT" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "WITH WAIT" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "WITH WAIT"

END DEFINE

DELETE PLACEHOLDER "WITH-OPTIONS" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "WITH-OPTIONS" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[WITH AUTOTERMINATE] [WITH EDITING] [WITH NO BLANK] [WITH FILLER {prot-fill-lit}]"

END DEFINE

DELETE PLACEHOLDER "WITHIN {KEEPLIST-NAME}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "WITHIN {KEEPLIST-NAME}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "WITHIN {keeplist-name}"

END DEFINE

DELETE PLACEHOLDER "WITHIN {REALM-NAME}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "WITHIN {REALM-NAME}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "WITHIN {realm-name}..."

END DEFINE

DELETE PLACEHOLDER "WITHIN {{REALM-NAME}|{SET-NAME}}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "WITHIN {{REALM-NAME}|{SET-NAME}}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "WITHIN {{realm-name}|{set-name}}"

END DEFINE

DELETE PLACEHOLDER "WITHIN {{RECORD-NAME}|{SET-NAME}|{REALM-NAME}}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "WITHIN {{RECORD-NAME}|{SET-NAME}|{REALM-NAME}}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "WITHIN {{record-name}|{set-name}|{realm-name}}"

END DEFINE

DELETE PLACEHOLDER "WORD-1" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "WORD-1" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a text-matching argument that the compiler compares against text-words"
    "in the library text."

END DEFINE

DELETE PLACEHOLDER "WORD-2" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "WORD-2" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a replacement item that the compiler inserts into the source program."

END DEFINE

DELETE PLACEHOLDER "WORKING-STORAGE SECTION .." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "WORKING-STORAGE SECTION .." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "WORKING-STORAGE SECTION."
    "[record-description-entry]..."

END DEFINE

DELETE PLACEHOLDER WRITERS -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER WRITERS -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "WRITERS"

END DEFINE

DELETE PLACEHOLDER "X/OPEN-SPECIAL-NAME .." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "X/OPEN-SPECIAL-NAME .." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "SYSIN"
    "SYSOUT"
    "SYSERR"
    "ARGUMENT-NUMBER"
    "ARGUMENT-VALUE"
    "ENVIRONMENT-NAME"
    "ENVIRONMENT-VALUE"

END DEFINE

DELETE PLACEHOLDER "XMNEM-NAME" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "XMNEM-NAME" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "is a mnemonic-name for an X/Open SYSdevice, command-line argument"
    "or environment variable for DEC COBOL."

END DEFINE

DELETE PLACEHOLDER YYYYDDD -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER YYYYDDD -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "YYYYDDD"

END DEFINE

DELETE PLACEHOLDER YYYYMMDD -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER YYYYMMDD -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "YYYYMMDD"

END DEFINE

DELETE PLACEHOLDER "[CONTIGUOUS|CONTIGUOUS-BEST-TRY] PREALLOCATION {PREALL-AMT}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "[CONTIGUOUS|CONTIGUOUS-BEST-TRY] PREALLOCATION {PREALL-AMT}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[CONTIGUOUS|CONTIGUOUS-BEST-TRY] PREALLOCATION {preall-amt}"

END DEFINE

DELETE PLACEHOLDER "[NEXT TO] DBKEY" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "[NEXT TO] DBKEY" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[NEXT TO] DBKEY"

END DEFINE

DELETE PLACEHOLDER "[NOT] [SET-NAME] {OWNER|MEMBER|TENANT}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "[NOT] [SET-NAME] {OWNER|MEMBER|TENANT}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="OWNER, MEMBER and TENANT are DBMS test conditionals" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[NOT] [set-name] {OWNER|MEMBER|TENANT}"

END DEFINE

DELETE PLACEHOLDER "[NOT] {CONDITIONAL-EXPRESSION} {{AND|OR} [NOT] {CONDITIONAL-EXPRESSION}}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "[NOT] {CONDITIONAL-EXPRESSION} {{AND|OR} [NOT] {CONDITIONAL-EXPRESSION}}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[NOT] {conditional-expression} {{AND|OR} [NOT] {conditional-expression}}..."

END DEFINE

DELETE PLACEHOLDER "[NOT] {OBJ-ITEM} [THROUGH {OBJ-ITEM}]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "[NOT] {OBJ-ITEM} [THROUGH {OBJ-ITEM}]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[NOT] {obj-item} [THROUGH {obj-item}]"

END DEFINE

DELETE PLACEHOLDER "[PLUS] {SCREEN-POSITION-SPEC}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "[PLUS] {SCREEN-POSITION-SPEC}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[PLUS] {screen-position-spec}"

END DEFINE

DELETE PLACEHOLDER "[READERS] [WRITERS] [UPDATERS]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "[READERS] [WRITERS] [UPDATERS]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "[READERS] [WRITERS] [UPDATERS]"

END DEFINE

DELETE PLACEHOLDER "[SET] [SET-NAME]..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "[SET] [SET-NAME]..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[SET] [set-name]..."

END DEFINE

DELETE PLACEHOLDER "[WITH NO REWIND] [{OPEN-LOCKING-OPTIONS}]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "[WITH NO REWIND] [{OPEN-LOCKING-OPTIONS}]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "[WITH NO REWIND] [{open-locking-options}]"

END DEFINE

DELETE PLACEHOLDER "[{OPEN-LOCKING-OPTIONS}]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "[{OPEN-LOCKING-OPTIONS}]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{open-locking-options}"

END DEFINE

DELETE PLACEHOLDER "[{SCREEN-FROM-SPEC}] [{SCREEN-TO-SPEC}]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "[{SCREEN-FROM-SPEC}] [{SCREEN-TO-SPEC}]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "[{screen-from-spec}] [{screen-to-spec}]"

END DEFINE

DELETE PLACEHOLDER "[{SET-NAME} IS] [NOT] EMPTY" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "[{SET-NAME} IS] [NOT] EMPTY" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="EMPTY is a DBMS test conditional" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[{set-name} IS] [NOT] EMPTY"

END DEFINE

DELETE PLACEHOLDER "{=={PSEUDO-TEXT-1}== BY =={PSEUDO-TEXT-2}==}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{=={PSEUDO-TEXT-1}== BY =={PSEUDO-TEXT-2}==}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{=={pseudo-text-1}== BY =={pseudo-text-2}==}..."

END DEFINE

DELETE PLACEHOLDER "{ADVANCE-NUM} LINES" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{ADVANCE-NUM} LINES" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{advance-num} LINES"

END DEFINE

DELETE PLACEHOLDER "{ADVANCE-NUM} LINES|{TOP-NAME}|PAGE|TO POSITION {CHANNEL-NUM}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{ADVANCE-NUM} LINES|{TOP-NAME}|PAGE|TO POSITION {CHANNEL-NUM}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "{advance-num} LINES"/PLACEHOLDER
    "TOP-NAME"/PLACEHOLDER
    "PAGE"
    "TO POSITION {channel-num}"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "{ALL|LEADING|FIRST} {{COMPARE-VAL} BY {REPLACE-VAL} [{BEFORE|AFTER} INITIAL {DELIM-VAL}]...}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{ALL|LEADING|FIRST} {{COMPARE-VAL} BY {REPLACE-VAL} [{BEFORE|AFTER} INITIAL {DELIM-VAL}]...}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{ALL|LEADING|FIRST} {{compare-val} BY {replace-val} [{BEFORE|AFTER} INITIAL {delim-val}]...}..."

END DEFINE

DELETE PLACEHOLDER "{ALPHA|VAX} [PROGRAM COLLATING SEQUENCE IS {ALPHABET-NAME1}]." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{ALPHA|VAX} [PROGRAM COLLATING SEQUENCE IS {ALPHABET-NAME1}]." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{ALPHA|VAX} [PROGRAM COLLATING SEQUENCE IS {alphabet-name1}]."

END DEFINE

DELETE PLACEHOLDER "{ALPHA|VAX} [WITH DEBUGGING MODE]." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{ALPHA|VAX} [WITH DEBUGGING MODE]." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{ALPHA|VAX} [WITH DEBUGGING MODE]."

END DEFINE

DELETE PLACEHOLDER "{ALT-SEG-KEY = {SEG}...}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{ALT-SEG-KEY = {SEG}...}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{alt-seg-key} = {seg}..."

END DEFINE

DELETE PLACEHOLDER "{AND|OR} [NOT] {CONDITIONAL-EXPRESSION}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{AND|OR} [NOT] {CONDITIONAL-EXPRESSION}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{AND|OR} [NOT] {conditional-expression}"

END DEFINE

DELETE PLACEHOLDER "{AND|OR} [RELATIONAL-OPERATOR] {RELATION-OBJECT}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{AND|OR} [RELATIONAL-OPERATOR] {RELATION-OBJECT}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{AND|OR} [relational-operator] {relation-object}"

END DEFINE

DELETE PLACEHOLDER "{ARITHMETIC-EXPRESSION} IS [NOT] {POSITIVE|NEGATIVE|ZERO}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{ARITHMETIC-EXPRESSION} IS [NOT] {POSITIVE|NEGATIVE|ZERO}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{arithmetic-expression} IS [NOT] {POSITIVE|NEGATIVE|ZERO}"

END DEFINE

DELETE PLACEHOLDER "{ASCENDING|DESCENDING} KEY IS {KEY-NAME1}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{ASCENDING|DESCENDING} KEY IS {KEY-NAME1}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{ASCENDING|DESCENDING} KEY IS {key-name1}..."

END DEFINE

DELETE PLACEHOLDER "{AXP|VAX} [PROGRAM COLLATING SEQUENCE IS {ALPHABET-NAME1}]." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{AXP|VAX} [PROGRAM COLLATING SEQUENCE IS {ALPHABET-NAME1}]." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{AXP|VAX} [PROGRAM COLLATING SEQUENCE IS {alphabet-name1}]."

END DEFINE

DELETE PLACEHOLDER "{AXP|VAX} [WITH DEBUGGING MODE]." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{AXP|VAX} [WITH DEBUGGING MODE]." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{AXP|VAX} [WITH DEBUGGING MODE]."

END DEFINE

DELETE PLACEHOLDER "{BEFORE|AFTER} ADVANCING {{ADVANCE-NUM} LINES|{TOP-NAME}|PAGE|TO POSITION {CHANNEL-NUM}}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{BEFORE|AFTER} ADVANCING {{ADVANCE-NUM} LINES|{TOP-NAME}|PAGE|TO POSITION {CHANNEL-NUM}}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{BEFORE|AFTER} ADVANCING {{advance-num} LINES|{top-name}|PAGE|TO POSITION {channel-num}}"

END DEFINE

DELETE PLACEHOLDER "{BEFORE|AFTER} INITIAL {DELIM-VAL}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{BEFORE|AFTER} INITIAL {DELIM-VAL}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=MENU -

    "BEFORE INITIAL {delim-val}"/PLACEHOLDER
    "AFTER INITIAL {delim-val}"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "{CARD-READER ..} IS {DEVICE-NAME}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{CARD-READER ..} IS {DEVICE-NAME}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{CARD-READER ..} IS {device-name}"

END DEFINE

DELETE PLACEHOLDER "{COLUMN-ID} [PLUS [PLUS-NUM1]]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{COLUMN-ID} [PLUS [PLUS-NUM1]]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{column-id} [PLUS [plus-num1]]"

END DEFINE

DELETE PLACEHOLDER "{COLUMN-ID} [PLUS [PLUS-NUM2]]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{COLUMN-ID} [PLUS [PLUS-NUM2]]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{column-id} [PLUS [plus-num2]]"

END DEFINE

DELETE PLACEHOLDER "{COMPARE-VAL} BY {REPLACE-VAL} [{BEFORE|AFTER} INITIAL {DELIM-VAL}]..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{COMPARE-VAL} BY {REPLACE-VAL} [{BEFORE|AFTER} INITIAL {DELIM-VAL}]..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{compare-val} BY {replace-val} [{BEFORE|AFTER} INITIAL {delim-val}]..."

END DEFINE

DELETE PLACEHOLDER "{CONTROL-FOOT-NAME}|FINAL" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{CONTROL-FOOT-NAME}|FINAL" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "CONTROL-FOOT-NAME"/PLACEHOLDER
    "FINAL"

END DEFINE

DELETE PLACEHOLDER "{CONTROL-HEAD-NAME}|FINAL" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{CONTROL-HEAD-NAME}|FINAL" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "CONTROL-HEAD-NAME"/PLACEHOLDER
    "FINAL"

END DEFINE

DELETE PLACEHOLDER "{CONTROL-NAME}|FINAL [CONTROL-NAME]..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{CONTROL-NAME}|FINAL [CONTROL-NAME]..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "CONTROL-NAME"/PLACEHOLDER
    "FINAL [control-name]..."/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "{DATA-NAME}|FILLER" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{DATA-NAME}|FILLER" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "DATA-NAME"/PLACEHOLDER
    "FILLER"

END DEFINE

DELETE PLACEHOLDER "{DATABASE-KEY} IS [NOT] {ALSO {DATABASE-KEY}|NULL|WITHIN {KEEPLIST-NAME}}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{DATABASE-KEY} IS [NOT] {ALSO {DATABASE-KEY}|NULL|WITHIN {KEEPLIST-NAME}}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="ALSO, NULL and WITHIN are DBMS test conditionals in this context" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{database-key} IS [NOT] {ALSO {database-key}|NULL|WITHIN {keeplist-name}}"

END DEFINE

DELETE PLACEHOLDER "{DBM$_EXCEPTION-CONDITION}...|OTHER" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{DBM$_EXCEPTION-CONDITION}...|OTHER" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "DBM$_EXCEPTION-CONDITION"/PLACEHOLDER
    "OTHER"

END DEFINE

DELETE PLACEHOLDER "{DELIM1}|SIZE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{DELIM1}|SIZE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "DELIM1"/PLACEHOLDER
    "SIZE"

END DEFINE

DELETE PLACEHOLDER "{DEST-STRING} [DELIMITER IN {DELIM-DEST}] [COUNT IN {COUNTR}]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{DEST-STRING} [DELIMITER IN {DELIM-DEST}] [COUNT IN {COUNTR}]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{dest-string} [DELIMITER IN {delim-dest}] [COUNT IN {countr}]"

END DEFINE

DELETE PLACEHOLDER "{ELEMNT} IS EQUAL TO {ARG2-OR-FUNC}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{ELEMNT} IS EQUAL TO {ARG2-OR-FUNC}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{elemnt} IS EQUAL TO {arg2-or-func}"

END DEFINE

DELETE PLACEHOLDER "{FILE-NAME1} [CLOSE-OPTION]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{FILE-NAME1} [CLOSE-OPTION]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{file-name1} [close-option]"

END DEFINE

DELETE PLACEHOLDER "{FILE-NAME1} [WITH NO REWIND]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{FILE-NAME1} [WITH NO REWIND]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{file-name1} [WITH NO REWIND]"

END DEFINE

DELETE PLACEHOLDER "{FILE-NAME1} {[WITH NO REWIND] [{OPEN-LOCKING-OPTIONS}]}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{FILE-NAME1} {[WITH NO REWIND] [{OPEN-LOCKING-OPTIONS}]}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{file-name1} {[WITH NO REWIND] [{open-locking-options}]}"

END DEFINE

DELETE PLACEHOLDER "{FILE-NAME1} {[{OPEN-LOCKING-OPTIONS}]}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{FILE-NAME1} {[{OPEN-LOCKING-OPTIONS}]}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{file-name1} {[{open-locking-options}]}"

END DEFINE

DELETE PLACEHOLDER "{FILE-NAME1}...|INPUT|OUTPUT|I-O|EXTEND" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{FILE-NAME1}...|INPUT|OUTPUT|I-O|EXTEND" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "FILE-NAME1"/PLACEHOLDER
    "INPUT"
    "OUTPUT"
    "I-O"
    "EXTEND"

END DEFINE

DELETE PLACEHOLDER "{FILE-NAME} [POSITION {POS-NUM}]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{FILE-NAME} [POSITION {POS-NUM}]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{file-name} [POSITION {pos-num}]"

END DEFINE

DELETE PLACEHOLDER "{FIRST-LITERAL} [THROUGH {LAST-LITERAL}|ALSO {LIT1}]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{FIRST-LITERAL} [THROUGH {LAST-LITERAL}|ALSO {LIT1}]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{first-literal} [THROUGH {last-literal}|ALSO {lit1}]"

END DEFINE

DELETE PLACEHOLDER "{HIGHLIGHT|LOWLIGHT}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{HIGHLIGHT|LOWLIGHT}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{HIGHLIGHT|LOWLIGHT}"

END DEFINE

DELETE PLACEHOLDER "{IDENTIFIER} IS [NOT] {NUMERIC|ALPHABETIC|ALPHABETIC-LOWER|ALPHABETIC-UPPER|{CLASS-NAME}}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{IDENTIFIER} IS [NOT] {NUMERIC|ALPHABETIC|ALPHABETIC-LOWER|ALPHABETIC-UPPER|{CLASS-NAME}}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{identifier} IS [NOT] {NUMERIC|ALPHABETIC|ALPHABETIC-LOWER|ALPHABETIC-UPPER|{class-name}}"

END DEFINE

DELETE PLACEHOLDER "{INTEGER-ARG2}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{INTEGER-ARG2}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "INTGR-ARG2"/PLACEHOLDER
    "FUNCTION"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "{INTEGER-ARG4}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{INTEGER-ARG4}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "INTGR-ARG4"/PLACEHOLDER
    "FUNCTION"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "{LEFT-PART} BY {RIGHT-PART}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{LEFT-PART} BY {RIGHT-PART}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{left-part} BY {right-part}"

END DEFINE

DELETE PLACEHOLDER "{LENGTH}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{LENGTH}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{length}"

END DEFINE

DELETE PLACEHOLDER "{LINE-ID} [PLUS [PLUS-NUM1]]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{LINE-ID} [PLUS [PLUS-NUM1]]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{line-id} [PLUS [plus-num1]]"

END DEFINE

DELETE PLACEHOLDER "{LINE-ID} [PLUS [PLUS-NUM2]]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{LINE-ID} [PLUS [PLUS-NUM2]]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{line-id} [PLUS [plus-num2]]"

END DEFINE

DELETE PLACEHOLDER "{LINE-NUM1} [ON NEXT PAGE]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{LINE-NUM1} [ON NEXT PAGE]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{line-num1} [ON NEXT PAGE]"

END DEFINE

DELETE PLACEHOLDER "{LINE-NUM1} [ON NEXT PAGE]|PLUS {LINE-NUM-PLUS}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{LINE-NUM1} [ON NEXT PAGE]|PLUS {LINE-NUM-PLUS}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "{line-num1} [ON NEXT PAGE]"/PLACEHOLDER
    "PLUS {line-num-plus}"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "{LOW-VALUE} [THROUGH {HIGH-VALUE}]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{LOW-VALUE} [THROUGH {HIGH-VALUE}]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{low-value} [THROUGH {high-value}]"

END DEFINE

DELETE PLACEHOLDER "{MIN-TIMES} TO {MAX-TIMES} TIMES DEPENDING ON {DEPENDING-ITEM1}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{MIN-TIMES} TO {MAX-TIMES} TIMES DEPENDING ON {DEPENDING-ITEM1}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{min-times} TO {max-times} TIMES DEPENDING ON {depending-item1}"

END DEFINE

DELETE PLACEHOLDER "{NEXT-GROUP-LINE-NUM}|PLUS {NEXT-GROUP-LINE-NUM-PLUS}|NEXT PAGE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{NEXT-GROUP-LINE-NUM}|PLUS {NEXT-GROUP-LINE-NUM-PLUS}|NEXT PAGE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "NEXT-GROUP-LINE-NUM"/PLACEHOLDER
    "PLUS {next-group-line-num-plus}"/PLACEHOLDER
    "NEXT PAGE"

END DEFINE

DELETE PLACEHOLDER "{NUM-OR-FUNC}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{NUM-OR-FUNC}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{num-or-func}"

END DEFINE

DELETE PLACEHOLDER "{OFFSET {INTEGER-EXP}|FIRST|LAST} {WITHIN {KEEPLIST-NAME}}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{OFFSET {INTEGER-EXP}|FIRST|LAST} {WITHIN {KEEPLIST-NAME}}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{OFFSET {integer-exp}|FIRST|LAST} {WITHIN {keeplist-name}}"

END DEFINE

DELETE PLACEHOLDER "{OPEN-LOCKING-OPTIONS}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{OPEN-LOCKING-OPTIONS}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{open-locking-options}"

END DEFINE

DELETE PLACEHOLDER "{POSITION-SELECTION} [RECORD-NAME] [WITHIN {{REALM-NAME}|{SET-NAME}}] [USING {REC-KEY2}...|WHERE {BOOL-EXP}]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{POSITION-SELECTION} [RECORD-NAME] [WITHIN {{REALM-NAME}|{SET-NAME}}] [USING {REC-KEY2}...|WHERE {BOOL-EXP}]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{position-selection} [record-name] [WITHIN {{realm-name}|{set-name}}] [USING {rec-key2}...|WHERE {bool-exp}]"

END DEFINE

DELETE PLACEHOLDER "{PROC} TO PROCEED TO {NEW-PROC}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{PROC} TO PROCEED TO {NEW-PROC}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{proc} TO PROCEED TO {new-proc}"

END DEFINE

DELETE PLACEHOLDER "{PROT-SIZE-LIT}|{PROT-SIZE-ITEM}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{PROT-SIZE-LIT}|{PROT-SIZE-ITEM}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "PROT-SIZE-LIT"/PLACEHOLDER
    "PROT-SIZE-ITEM"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "{RAN-ARG}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{RAN-ARG}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "({integer-arg})"

END DEFINE

DELETE PLACEHOLDER "{REALM-NAME}|{SET-NAME}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{REALM-NAME}|{SET-NAME}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "REALM-NAME"/PLACEHOLDER
    "SET-NAME"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "{RECORD-DESCRIPTION-ENTRY}|{66}|{88}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{RECORD-DESCRIPTION-ENTRY}|{66}|{88}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "RECORD-DESCRIPTION-ENTRY"/PLACEHOLDER
    "66 {new-name} RENAMES {rename-start} [THROUGH {rename-end}]."/PLACEHOLDER
    "88 {condition-name} VALUE IS {{low-value} [THROUGH {high-value}]}...."/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "{RECORD-NAME1} FROM DICTIONARY" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{RECORD-NAME1} FROM DICTIONARY" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{record-name1} FROM DICTIONARY"

END DEFINE

DELETE PLACEHOLDER "{RECORD-NAME}|{RECORD-ITEM}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{RECORD-NAME}|{RECORD-ITEM}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "RECORD-NAME"/PLACEHOLDER
    "RECORD-ITEM"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "{RECORD-NAME}|{SET-NAME}|{REALM-NAME}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{RECORD-NAME}|{SET-NAME}|{REALM-NAME}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "RECORD-NAME"/PLACEHOLDER
    "SET-NAME"/PLACEHOLDER
    "REALM-NAME"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "{RELATION-CONDITION} [{AND|OR} [RELATIONAL-OPERATOR] {RELATION-OBJECT}]..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{RELATION-CONDITION} [{AND|OR} [RELATIONAL-OPERATOR] {RELATION-OBJECT}]..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{relation-condition} [{AND|OR} [relational-operator] {relation-object}]..."

END DEFINE

DELETE PLACEHOLDER "{REPLACING-TYPE} DATA BY {VAL1}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{REPLACING-TYPE} DATA BY {VAL1}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{replacing-type} DATA BY {val1} "

END DEFINE

DELETE PLACEHOLDER "{REPORT|PAGE|CONTROL} HEADING|DETAIL|{CONTROL|PAGE|REPORT} FOOTING" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{REPORT|PAGE|CONTROL} HEADING|DETAIL|{CONTROL|PAGE|REPORT} FOOTING" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "REPORT HEADING"
    "PAGE HEADING"
    "CONTROL HEADING {{control-head-name}|FINAL}"/PLACEHOLDER
    "DETAIL"
    "CONTROL FOOTING {{control-foot-name}|FINAL}"/PLACEHOLDER
    "PAGE FOOTING"
    "REPORT FOOTING"

END DEFINE

DELETE PLACEHOLDER "{RESULT-N-OR-NE} [ROUNDED]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{RESULT-N-OR-NE} [ROUNDED]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{result-n-or-ne} [ROUNDED]"

END DEFINE

DELETE PLACEHOLDER "{RESULT-N} [ROUNDED]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{RESULT-N} [ROUNDED]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{result-n} [ROUNDED]"

END DEFINE

DELETE PLACEHOLDER "{SCREEN-FROM-SPEC}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{SCREEN-FROM-SPEC}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "FROM {{screen-identifier4}|{screen-literal2}}"

END DEFINE

DELETE PLACEHOLDER "{SCREEN-IDENTIFIER1}|{SCREEN-INTEGER1}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{SCREEN-IDENTIFIER1}|{SCREEN-INTEGER1}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "{SCREEN-IDENTIFIER1}"
    "{SCREEN-INTEGER1}"

END DEFINE

DELETE PLACEHOLDER "{SCREEN-IDENTIFIER4}|{SCREEN-LITERAL2}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{SCREEN-IDENTIFIER4}|{SCREEN-LITERAL2}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "{SCREEN-IDENTIFIER4}"
    "{SCREEN-LITERAL2}"

END DEFINE

DELETE PLACEHOLDER "{SCREEN-NAME}|FILLER" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{SCREEN-NAME}|FILLER" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "SCREEN-NAME"/PLACEHOLDER
    "FILLER"

END DEFINE

DELETE PLACEHOLDER "{SCREEN-TO-SPEC}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{SCREEN-TO-SPEC}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "TO {screen-identifier5}"

END DEFINE

DELETE PLACEHOLDER "{SEG-KEY = {SEG}...}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{SEG-KEY = {SEG}...}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{seg-key} = {seg}..."

END DEFINE

DELETE PLACEHOLDER "{SEQUENTIAL|RANDOM|DYNAMIC} RELATIVE KEY IS {REL-KEY}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{SEQUENTIAL|RANDOM|DYNAMIC} RELATIVE KEY IS {REL-KEY}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "SEQUENTIAL"
    "SEQUENTIAL RELATIVE KEY IS {rel-key}"/PLACEHOLDER
    "RANDOM RELATIVE KEY IS {rel-key}"/PLACEHOLDER
    "DYNAMIC RELATIVE KEY IS {rel-key}"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "{SET-NAME} IS" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{SET-NAME} IS" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{set-name} IS"

END DEFINE

DELETE PLACEHOLDER "{SET-NAME}...|ALL" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{SET-NAME}...|ALL" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "SET-NAME"/PLACEHOLDER
    "ALL"

END DEFINE

DELETE PLACEHOLDER "{SHORTEST-REC} TO" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{SHORTEST-REC} TO" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{shortest-rec} TO"

END DEFINE

DELETE PLACEHOLDER "{SMALLEST-BLOCK} TO" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{SMALLEST-BLOCK} TO" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{smallest-block} TO"

END DEFINE

DELETE PLACEHOLDER "{SRC-ITEM3-OR-FUNC}|{LIT3}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{SRC-ITEM3-OR-FUNC}|{LIT3}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "SRC-ITEM3-OR-FUNC"/PLACEHOLDER
    "LIT3"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "{SRC-STRING2}... DELIMITED BY {{DELIM1}|SIZE}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{SRC-STRING2}... DELIMITED BY {{DELIM1}|SIZE}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{src-string2}... DELIMITED BY {{delim1}|SIZE}"

END DEFINE

DELETE PLACEHOLDER "{STATEMENT}... | NEXT SENTENCE" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{STATEMENT}... | NEXT SENTENCE" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "statement"/PLACEHOLDER
    "NEXT SENTENCE"

END DEFINE

DELETE PLACEHOLDER "{STATUS-CODE-ID} IS {SUCCESS|FAILURE}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{STATUS-CODE-ID} IS {SUCCESS|FAILURE}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{status-code-id} IS {SUCCESS|FAILURE}"

END DEFINE

DELETE PLACEHOLDER "{SUM {SUM-NAME}... [UPON {DETAIL-REPORT-GROUP-NAME}...]}... [RESET ON {{CONTROL-FOOT-NAME}|FINAL}]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{SUM {SUM-NAME}... [UPON {DETAIL-REPORT-GROUP-NAME}...]}... [RESET ON {{CONTROL-FOOT-NAME}|FINAL}]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{SUM {sum-name}... [UPON {detail-report-group-name}...]}... [RESET ON {{control-foot-name}|FINAL}]"

END DEFINE

DELETE PLACEHOLDER "{SWITCH-N ..} {SWITCH-DEFN}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{SWITCH-N ..} {SWITCH-DEFN}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION=" For X/OPEN on DEC COBOL - switches 1 thru 8" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{SWITCH-n ..} {switch-defn}"

END DEFINE

DELETE PLACEHOLDER "{SWITCH-NAME2}... TO {ON|OFF}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{SWITCH-NAME2}... TO {ON|OFF}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{switch-name2}... TO {ON|OFF}"

END DEFINE

DELETE PLACEHOLDER "{SYMBOLIC-CHAR}... IS {CHAR-VAL}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{SYMBOLIC-CHAR}... IS {CHAR-VAL}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{symbolic-char}... IS {char-val}..."

END DEFINE

DELETE PLACEHOLDER "{TABLE-SIZE} TIMES" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{TABLE-SIZE} TIMES" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{table-size} TIMES"

END DEFINE

DELETE PLACEHOLDER "{TABLE-SIZE} TIMES|{MIN-TIMES} TO {MAX-TIMES} DEPENDING .." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{TABLE-SIZE} TIMES|{MIN-TIMES} TO {MAX-TIMES} DEPENDING .." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "{table-size} TIMES"/PLACEHOLDER
    "{min-times} TO {max-times} TIMES DEPENDING ON {depending-item1}"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "{TEXT-NAME} [OF {LIBRARY-NAME}]" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{TEXT-NAME} [OF {LIBRARY-NAME}]" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{text-name} [OF {library-name}]"

END DEFINE

DELETE PLACEHOLDER "{TEXT-NAME} [OF {LIBRARY-NAME}]|{RECORD-NAME1} FROM DICTIONARY" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{TEXT-NAME} [OF {LIBRARY-NAME}]|{RECORD-NAME1} FROM DICTIONARY" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "{text-name} [OF {library-name}]"/PLACEHOLDER
    "{record-name1} FROM DICTIONARY"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "{WHEN {CONDITIONAL-EXPRESSION} {STATEMENT}...}... END-SEARCH" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{WHEN {CONDITIONAL-EXPRESSION} {STATEMENT}...}... END-SEARCH" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{WHEN {conditional-expression} {statement}...}..."
    "END SEARCH"

END DEFINE

DELETE PLACEHOLDER "{WHEN {OBJECT-ITEM} [ALSO {OBJECT-ITEM}]...}... {STATEMENT}..." -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{WHEN {OBJECT-ITEM} [ALSO {OBJECT-ITEM}]...}... {STATEMENT}..." -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{WHEN {object-item} [ALSO {object-item}]...}... {statement}..."

END DEFINE

DELETE PLACEHOLDER "{X/OPEN-SPECIAL-NAME ..} IS {XMNEM-NAME}" -
    /LANGUAGE="cobol"
DEFINE PLACEHOLDER "{X/OPEN-SPECIAL-NAME ..} IS {XMNEM-NAME}" -
    /LANGUAGE="cobol" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{X/Open-special-name ..} IS {xmnem-name}"

END DEFINE

DELETE TOKEN 01 -
    /LANGUAGE="cobol"
DEFINE TOKEN 01 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="data-description-entry" -

    "01  [{data-name}|FILLER]"
    "	[REDEFINES {other-data-item}]"
    "	[IS EXTERNAL]"
    "	[IS GLOBAL]"
    "	[PICTURE IS {character-string}]"
    "	[USAGE IS {COMP|COMP-1|COMP-2|COMP-3|COMP-5|COMP-X|DISPLAY|INDEX|POINTER}]"
    "	[SIGN IS {LEADING|TRAILING} [SEPARATE CHARACTER]]"
    "	[SYNCHRONIZED [LEFT|RIGHT]]"
    "	[JUSTIFIED RIGHT]"
    "	[BLANK WHEN ZERO]"
    "	[VALUE IS {value-option}]."

END DEFINE

DELETE TOKEN 02 -
    /LANGUAGE="cobol"
DEFINE TOKEN 02 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="data-description-entry" -

    "02  [{data-name}|FILLER]"
    "	[REDEFINES {other-data-item}]"
    "	[IS EXTERNAL]"
    "	[PICTURE IS {character-string}]"
    "	[USAGE IS {COMP|COMP-1|COMP-2|COMP-3|COMP-5|COMP-X|DISPLAY|INDEX|POINTER}]"
    "	[SIGN IS {LEADING|TRAILING} [SEPARATE CHARACTER]]"
    "	[OCCURS {{table-size} TIMES|{min-times} TO {max-times} DEPENDING ..} ..]"
    "	[SYNCHRONIZED [LEFT|RIGHT]]"
    "	[JUSTIFIED RIGHT]"
    "	[BLANK WHEN ZERO]"
    "	[VALUE IS {value-option}]."

END DEFINE

DELETE TOKEN 03 -
    /LANGUAGE="cobol"
DEFINE TOKEN 03 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="data-description-entry" -

    "03  [{data-name}|FILLER]"
    "	[REDEFINES {other-data-item}]"
    "	[IS EXTERNAL]"
    "	[PICTURE IS {character-string}]"
    "	[USAGE IS {COMP|COMP-1|COMP-2|COMP-3|COMP-5|COMP-X|DISPLAY|INDEX|POINTER}]"
    "	[SIGN IS {LEADING|TRAILING} [SEPARATE CHARACTER]]"
    "	[OCCURS {{table-size} TIMES|{min-times} TO {max-times} DEPENDING ..} ..]"
    "	[SYNCHRONIZED [LEFT|RIGHT]]"
    "	[JUSTIFIED RIGHT]"
    "	[BLANK WHEN ZERO]"
    "	[VALUE IS {value-option}]."

END DEFINE

DELETE TOKEN 04 -
    /LANGUAGE="cobol"
DEFINE TOKEN 04 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="data-description-entry" -

    "04  [{data-name}|FILLER]"
    "	[REDEFINES {other-data-item}]"
    "	[IS EXTERNAL]"
    "	[PICTURE IS {character-string}]"
    "	[USAGE IS {COMP|COMP-1|COMP-2|COMP-3|COMP-5|COMP-X|DISPLAY|INDEX|POINTER}]"
    "	[SIGN IS {LEADING|TRAILING} [SEPARATE CHARACTER]]"
    "	[OCCURS {{table-size} TIMES|{min-times} TO {max-times} DEPENDING ..} ..]"
    "	[SYNCHRONIZED [LEFT|RIGHT]]"
    "	[JUSTIFIED RIGHT]"
    "	[BLANK WHEN ZERO]"
    "	[VALUE IS {value-option}]."

END DEFINE

DELETE TOKEN 05 -
    /LANGUAGE="cobol"
DEFINE TOKEN 05 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="data-description-entry" -

    "05  [{data-name}|FILLER]"
    "	[REDEFINES {other-data-item}]"
    "	[IS EXTERNAL]"
    "	[PICTURE IS {character-string}]"
    "	[USAGE IS {COMP|COMP-1|COMP-2|COMP-3|COMP-5|COMP-X|DISPLAY|INDEX|POINTER}]"
    "	[SIGN IS {LEADING|TRAILING} [SEPARATE CHARACTER]]"
    "	[OCCURS {{table-size} TIMES|{min-times} TO {max-times} DEPENDING ..} ..]"
    "	[SYNCHRONIZED [LEFT|RIGHT]]"
    "	[JUSTIFIED RIGHT]"
    "	[BLANK WHEN ZERO]"
    "	[VALUE IS {value-option}]."

END DEFINE

DELETE TOKEN 06 -
    /LANGUAGE="cobol"
DEFINE TOKEN 06 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="data-description-entry" -

    "06  [{data-name}|FILLER]"
    "	[REDEFINES {other-data-item}]"
    "	[IS EXTERNAL]"
    "	[PICTURE IS {character-string}]"
    "	[USAGE IS {COMP|COMP-1|COMP-2|COMP-3|COMP-5|COMP-X|DISPLAY|INDEX|POINTER}]"
    "	[SIGN IS {LEADING|TRAILING} [SEPARATE CHARACTER]]"
    "	[OCCURS {{table-size} TIMES|{min-times} TO {max-times} DEPENDING ..} ..]"
    "	[SYNCHRONIZED [LEFT|RIGHT]]"
    "	[JUSTIFIED RIGHT]"
    "	[BLANK WHEN ZERO]"
    "	[VALUE IS {value-option}]."

END DEFINE

DELETE TOKEN 07 -
    /LANGUAGE="cobol"
DEFINE TOKEN 07 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="data-description-entry" -

    "07  [{data-name}|FILLER]"
    "	[REDEFINES {other-data-item}]"
    "	[IS EXTERNAL]"
    "	[PICTURE IS {character-string}]"
    "	[USAGE IS {COMP|COMP-1|COMP-2|COMP-3|COMP-5|COMP-X|DISPLAY|INDEX|POINTER}]"
    "	[SIGN IS {LEADING|TRAILING} [SEPARATE CHARACTER]]"
    "	[OCCURS {{table-size} TIMES|{min-times} TO {max-times} DEPENDING ..} ..]"
    "	[SYNCHRONIZED [LEFT|RIGHT]]"
    "	[JUSTIFIED RIGHT]"
    "	[BLANK WHEN ZERO]"
    "	[VALUE IS {value-option}]."

END DEFINE

DELETE TOKEN 08 -
    /LANGUAGE="cobol"
DEFINE TOKEN 08 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="data-description-entry" -

    "08  [{data-name}|FILLER]"
    "	[REDEFINES {other-data-item}]"
    "	[IS EXTERNAL]"
    "	[PICTURE IS {character-string}]"
    "	[USAGE IS {COMP|COMP-1|COMP-2|COMP-3|COMP-5|COMP-X|DISPLAY|INDEX|POINTER}]"
    "	[SIGN IS {LEADING|TRAILING} [SEPARATE CHARACTER]]"
    "	[OCCURS {{table-size} TIMES|{min-times} TO {max-times} DEPENDING ..} ..]"
    "	[SYNCHRONIZED [LEFT|RIGHT]]"
    "	[JUSTIFIED RIGHT]"
    "	[BLANK WHEN ZERO]"
    "	[VALUE IS {value-option}]."

END DEFINE

DELETE TOKEN 09 -
    /LANGUAGE="cobol"
DEFINE TOKEN 09 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="data-description-entry" -

    "09  [{data-name}|FILLER]"
    "	[REDEFINES {other-data-item}]"
    "	[IS EXTERNAL]"
    "	[PICTURE IS {character-string}]"
    "	[USAGE IS {COMP|COMP-1|COMP-2|COMP-3|COMP-5|COMP-X|DISPLAY|INDEX|POINTER}]"
    "	[SIGN IS {LEADING|TRAILING} [SEPARATE CHARACTER]]"
    "	[OCCURS {{table-size} TIMES|{min-times} TO {max-times} DEPENDING ..} ..]"
    "	[SYNCHRONIZED [LEFT|RIGHT]]"
    "	[JUSTIFIED RIGHT]"
    "	[BLANK WHEN ZERO]"
    "	[VALUE IS {value-option}]."

END DEFINE

DELETE TOKEN 66 -
    /LANGUAGE="cobol"
DEFINE TOKEN 66 -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="66 {new-name} RENAMES {rename-start} [THROUGH {rename-end}]."

END DEFINE
DELETE TOKEN 77 -
    /LANGUAGE="cobol"
DEFINE TOKEN 77 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="data-description-entry" -

    "77  [{data-name}|FILLER]"
    "	[REDEFINES {other-data-item}]"
    "	[IS EXTERNAL]"
    "	[IS GLOBAL]"
    "	[PICTURE IS {character-string}]"
    "	[USAGE IS {COMP|COMP-1|COMP-2|COMP-3|COMP-5|COMP-X|DISPLAY|INDEX|POINTER}]"
    "	[SIGN IS {LEADING|TRAILING} [SEPARATE CHARACTER]]"
    "	[SYNCHRONIZED [LEFT|RIGHT]]"
    "	[JUSTIFIED RIGHT]"
    "	[BLANK WHEN ZERO]"
    "	[VALUE IS {value-option}]."

END DEFINE

DELETE TOKEN 88 -
    /LANGUAGE="cobol"
DEFINE TOKEN 88 -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="88 {condition-name} VALUE IS {{low-value} [THROUGH {high-value}]}...."

END DEFINE
DELETE TOKEN ABSTRACT -
    /LANGUAGE="cobol"
DEFINE TOKEN ABSTRACT -
    /LANGUAGE="cobol" -
    /DESCRIPTION="A high-level description of the module." -

    "ABSTRACT:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN ACCEPT1 -
    /LANGUAGE="cobol"
DEFINE TOKEN ACCEPT1 -
    /LANGUAGE="cobol" -
    /PLACEHOLDER=ACCEPT1

END DEFINE
DELETE TOKEN ACCEPT2 -
    /LANGUAGE="cobol"
DEFINE TOKEN ACCEPT2 -
    /LANGUAGE="cobol" -
    /PLACEHOLDER=ACCEPT2

END DEFINE
DELETE TOKEN ACCEPT3 -
    /LANGUAGE="cobol"
DEFINE TOKEN ACCEPT3 -
    /LANGUAGE="cobol" -
    /PLACEHOLDER=ACCEPT3

END DEFINE
DELETE TOKEN ACCEPT4 -
    /LANGUAGE="cobol"
DEFINE TOKEN ACCEPT4 -
    /LANGUAGE="cobol" -
    /PLACEHOLDER=ACCEPT4

END DEFINE
DELETE TOKEN ACCEPT5 -
    /LANGUAGE="cobol"
DEFINE TOKEN ACCEPT5 -
    /LANGUAGE="cobol" -
    /PLACEHOLDER=ACCEPT5

END DEFINE
DELETE TOKEN ADD1 -
    /LANGUAGE="cobol"
DEFINE TOKEN ADD1 -
    /LANGUAGE="cobol" -
    /PLACEHOLDER=ADD1

END DEFINE
DELETE TOKEN ADD2 -
    /LANGUAGE="cobol"
DEFINE TOKEN ADD2 -
    /LANGUAGE="cobol" -
    /PLACEHOLDER=ADD2

END DEFINE
DELETE TOKEN ADD3 -
    /LANGUAGE="cobol"
DEFINE TOKEN ADD3 -
    /LANGUAGE="cobol" -
    /PLACEHOLDER=ADD3

END DEFINE
DELETE TOKEN ALTER -
    /LANGUAGE="cobol"
DEFINE TOKEN ALTER -
    /LANGUAGE="cobol" -
    /PLACEHOLDER=ALTER

END DEFINE
DELETE TOKEN ARGUMENTS -
    /LANGUAGE="cobol"
DEFINE TOKEN ARGUMENTS -
    /LANGUAGE="cobol" -
    /DESCRIPTION="For each argument: its name, punctuation (tag terminator), description." -

    "ARGUMENTS:"
    " "
    "	{subtags}"
    " "

END DEFINE

DELETE TOKEN "ARITHMETIC EXCEPTIONS HANDLED" -
    /LANGUAGE="cobol"
DEFINE TOKEN "ARITHMETIC EXCEPTIONS HANDLED" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="A description of any arithmetic exceptions handled." -

    "ARITHMETIC EXCEPTIONS HANDLED:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN AUTHOR -
    /LANGUAGE="cobol"
DEFINE TOKEN AUTHOR -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="AUTHOR. [comment-entry]"

END DEFINE
DELETE TOKEN AUTHORS -
    /LANGUAGE="cobol"
DEFINE TOKEN AUTHORS -
    /LANGUAGE="cobol" -
    /DESCRIPTION="The authors of the program" -

    "AUTHORS:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN CALL -
    /LANGUAGE="cobol"
DEFINE TOKEN CALL -
    /LANGUAGE="cobol" -
    /PLACEHOLDER=CALL

END DEFINE
DELETE TOKEN CANCEL -
    /LANGUAGE="cobol"
DEFINE TOKEN CANCEL -
    /LANGUAGE="cobol" -
    /PLACEHOLDER=CANCEL

END DEFINE
DELETE TOKEN "CDD PATHNAMES" -
    /LANGUAGE="cobol"
DEFINE TOKEN "CDD PATHNAMES" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="Pathnames of any objects copied from the Common Data Dictionary" -

    "CDD PATHNAMES:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN "CLIENT OBLIGATIONS" -
    /LANGUAGE="cobol"
DEFINE TOKEN "CLIENT OBLIGATIONS" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="Subsequent obligations imposed on the client, such as freeing memory" -

    "CLIENT OBLIGATIONS:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN CLOSE -
    /LANGUAGE="cobol"
DEFINE TOKEN CLOSE -
    /LANGUAGE="cobol" -
    /DESCRIPTION="CLOSE statement" -

    "CLOSE {{file-name1} [close-option]}..."

END DEFINE

DELETE TOKEN COMMIT -
    /LANGUAGE="cobol"
DEFINE TOKEN COMMIT -
    /LANGUAGE="cobol" -
    /DESCRIPTION="COMMIT statement for DBMS" -

    "COMMIT [STREAM] [RETAINING]"
    "	[on-error-phrase]"
    "END-COMMIT"

END DEFINE

DELETE TOKEN "COMPILATION QUALIFIERS" -
    /LANGUAGE="cobol"
DEFINE TOKEN "COMPILATION QUALIFIERS" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="Qualifiers to use to successfully compile this module." -

    "COMPILATION QUALIFIERS:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN "COMPLETION CODE" -
    /LANGUAGE="cobol"
DEFINE TOKEN "COMPLETION CODE" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="Any completion code returned by this procedure." -

    "COMPLETION CODE:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN COMPONENT -
    /LANGUAGE="cobol"
DEFINE TOKEN COMPONENT -
    /LANGUAGE="cobol" -
    /DESCRIPTION="The component to which this module belongs." -

    "COMPONENT:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN COMPUTE -
    /LANGUAGE="cobol"
DEFINE TOKEN COMPUTE -
    /LANGUAGE="cobol" -
    /DESCRIPTION="COMPUTE statement" -

    "COMPUTE {{result-n-or-ne} [ROUNDED]}... = {arithmetic-expression}"
    "	[on-size-error-clause]"
    "END-COMPUTE"

END DEFINE

DELETE TOKEN "CONFIGURATION-SECTION" -
    /LANGUAGE="cobol"
DEFINE TOKEN "CONFIGURATION-SECTION" -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="CONFIGURATION SECTION .."

END DEFINE
DELETE TOKEN CONNECT -
    /LANGUAGE="cobol"
DEFINE TOKEN CONNECT -
    /LANGUAGE="cobol" -
    /DESCRIPTION="CONNECT statement for DBMS" -

    "CONNECT [record-name] TO {{set-name}...|ALL}"
    "	[RETAINING [currency-indicators] CURRENCY]"
    "	[on-error-phrase]"
    "END-CONNECT"

END DEFINE

DELETE TOKEN "CONTAINED-PROGRAM" -
    /LANGUAGE="cobol"
DEFINE TOKEN "CONTAINED-PROGRAM" -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="CONTAINED-PROGRAM"

END DEFINE
DELETE TOKEN CONTINUE -
    /LANGUAGE="cobol"
DEFINE TOKEN CONTINUE -
    /LANGUAGE="cobol" -
    /DESCRIPTION="CONTINUE statement" -

    "CONTINUE"

END DEFINE

DELETE TOKEN COPY -
    /LANGUAGE="cobol"
DEFINE TOKEN COPY -
    /LANGUAGE="cobol" -
    /DESCRIPTION="COPY statement" -

    "COPY {{text-name} [OF {library-name}]|{record-name1} FROM DICTIONARY}"
    "	[REPLACING {{left-part} BY {right-part}}...]."

END DEFINE

DELETE TOKEN "CREATION DATE" -
    /LANGUAGE="cobol"
DEFINE TOKEN "CREATION DATE" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="The creation date of this module." -

    "CREATION DATE:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN "DATA-DIVISION" -
    /LANGUAGE="cobol"
DEFINE TOKEN "DATA-DIVISION" -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="DATA DIVISION .."

END DEFINE
DELETE TOKEN "DATE-COMPILED" -
    /LANGUAGE="cobol"
DEFINE TOKEN "DATE-COMPILED" -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="DATE-COMPILED. [comment-entry]"

END DEFINE
DELETE TOKEN "DATE-WRITTEN" -
    /LANGUAGE="cobol"
DEFINE TOKEN "DATE-WRITTEN" -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="DATE-WRITTEN. [comment-entry]"

END DEFINE
DELETE TOKEN DB -
    /LANGUAGE="cobol"
DEFINE TOKEN DB -
    /LANGUAGE="cobol" -
    /DESCRIPTION="subschema-entry" -

    "DB {subschema-name} WITHIN {schema-name} "
    "	[FOR {database-name}] [THRU {stream-name}]."

END DEFINE

DELETE TOKEN DELETE -
    /LANGUAGE="cobol"
DEFINE TOKEN DELETE -
    /LANGUAGE="cobol" -
    /DESCRIPTION="DELETE statement" -

    "DELETE {file-name2} RECORD"
    "	[invalid-key-phrase]"
    "END-DELETE"

END DEFINE

DELETE TOKEN DESIGN -
    /LANGUAGE="cobol"
DEFINE TOKEN DESIGN -
    /LANGUAGE="cobol" -
    /DESCRIPTION="" -

    "DESIGN:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN "DESIGN ISSUES" -
    /LANGUAGE="cobol"
DEFINE TOKEN "DESIGN ISSUES" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="" -

    "DESIGN ISSUES:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN DISCONNECT -
    /LANGUAGE="cobol"
DEFINE TOKEN DISCONNECT -
    /LANGUAGE="cobol" -
    /DESCRIPTION="DISCONNECT statement for DBMS" -

    "DISCONNECT [record-name] FROM {{set-name}...|ALL}"
    "	[on-error-phrase]"
    "END-DISCONNECT"

END DEFINE

DELETE TOKEN DISPLAY1 -
    /LANGUAGE="cobol"
DEFINE TOKEN DISPLAY1 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="DISPLAY statement" -

    "DISPLAY {src-item2}... [UPON {output-dest}] [WITH NO ADVANCING]"

END DEFINE

DELETE TOKEN DISPLAY2 -
    /LANGUAGE="cobol"
DEFINE TOKEN DISPLAY2 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="DISPLAY screen extensions" -

    "DISPLAY"
    "	{src-items-with-extensions}..."
    "		[WITH NO ADVANCING]"

END DEFINE

DELETE TOKEN DISPLAY3 -
    /LANGUAGE="cobol"
DEFINE TOKEN DISPLAY3 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="DISPLAY X/Open screen extensions for DEC COBOL" -

    "DISPLAY {screen-name3}"
    "	{screen-display-params}"
    "END-DISPLAY"

END DEFINE

DELETE TOKEN DIVIDE1 -
    /LANGUAGE="cobol"
DEFINE TOKEN DIVIDE1 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="DIVIDE INTO" -

    "DIVIDE {srcnum-or-func} INTO {{result-n} [ROUNDED]}..."
    "	[on-size-error-clause]"
    "END-DIVIDE"

END DEFINE

DELETE TOKEN DIVIDE2 -
    /LANGUAGE="cobol"
DEFINE TOKEN DIVIDE2 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="DIVIDE INTO GIVING" -

    "DIVIDE {srcnum-or-func} INTO {srcnum-or-func} GIVING {{result-n-or-ne} [ROUNDED]}..."
    "	[on-size-error-clause]"
    "END-DIVIDE"

END DEFINE

DELETE TOKEN DIVIDE3 -
    /LANGUAGE="cobol"
DEFINE TOKEN DIVIDE3 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="DIVIDE BY GIVING" -

    "DIVIDE {srcnum-or-func} BY {srcnum-or-func} GIVING {{result-n-or-ne} [ROUNDED]}..."
    "	[on-size-error-clause]"
    "END-DIVIDE"

END DEFINE

DELETE TOKEN DIVIDE4 -
    /LANGUAGE="cobol"
DEFINE TOKEN DIVIDE4 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="DIVIDE INTO with REMAINDER" -

    "DIVIDE {srcnum-or-func} INTO {srcnum-or-func} GIVING {result-n-or-ne} [ROUNDED] REMAINDER {remainder}"
    "	[on-size-error-clause]"
    "END-DIVIDE"

END DEFINE

DELETE TOKEN DIVIDE5 -
    /LANGUAGE="cobol"
DEFINE TOKEN DIVIDE5 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="DIVIDE BY with REMAINDER" -

    "DIVIDE {srcnum-or-func} BY {srcnum-or-func} GIVING {result-n-or-ne} [ROUNDED] REMAINDER {remainder}"
    "	[on-size-error-clause]"
    "END-DIVIDE"

END DEFINE

DELETE TOKEN "DUMMY ARGUMENTS" -
    /LANGUAGE="cobol"
DEFINE TOKEN "DUMMY ARGUMENTS" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="For each argument: its name, punctuation (tag terminator), description." -

    "DUMMY ARGUMENTS:"
    " "
    "	{subtags}"
    " "

END DEFINE

DELETE TOKEN END -
    /LANGUAGE="cobol"
DEFINE TOKEN END -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="END PROGRAM {program-name}."

END DEFINE
DELETE TOKEN ENVIRONMENT -
    /LANGUAGE="cobol"
DEFINE TOKEN ENVIRONMENT -
    /LANGUAGE="cobol" -
    /DESCRIPTION="Any relevant details about the environment in which this program will run." -

    "ENVIRONMENT:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN "ENVIRONMENT-DIVISION" -
    /LANGUAGE="cobol"
DEFINE TOKEN "ENVIRONMENT-DIVISION" -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="ENVIRONMENT DIVISION .."

END DEFINE
DELETE TOKEN ERASE -
    /LANGUAGE="cobol"
DEFINE TOKEN ERASE -
    /LANGUAGE="cobol" -
    /DESCRIPTION="ERASE statement for DBMS" -

    "ERASE [ALL] [record-name]"
    "	[on-error-phrase]"
    "END-ERASE"

END DEFINE

DELETE TOKEN "ERROR CODES" -
    /LANGUAGE="cobol"
DEFINE TOKEN "ERROR CODES" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="Any error codes returned by this procedure." -

    "ERROR CODES:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN EVALUATE -
    /LANGUAGE="cobol"
DEFINE TOKEN EVALUATE -
    /LANGUAGE="cobol" -
    /DESCRIPTION="EVALUATE statement" -

    "EVALUATE {eval-subject} [ALSO {eval-subject}]..."
    "	{{WHEN {object-item} [ALSO {object-item}]...}... {statement}...}..."
    "	[WHEN OTHER {statement}...]"
    "END-EVALUATE"

END DEFINE

DELETE TOKEN EXCEPTIONS -
    /LANGUAGE="cobol"
DEFINE TOKEN EXCEPTIONS -
    /LANGUAGE="cobol" -
    /DESCRIPTION="Any exceptions signaled by this procedure." -

    "EXCEPTIONS:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN EXIT1 -
    /LANGUAGE="cobol"
DEFINE TOKEN EXIT1 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="EXIT statement" -

    "EXIT"

END DEFINE

DELETE TOKEN EXIT2 -
    /LANGUAGE="cobol"
DEFINE TOKEN EXIT2 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="EXIT PROGRAM statement" -

    "EXIT PROGRAM"

END DEFINE

DELETE TOKEN FACILITY -
    /LANGUAGE="cobol"
DEFINE TOKEN FACILITY -
    /LANGUAGE="cobol" -
    /DESCRIPTION="The facility to which this module belongs." -

    "FACILITY:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN "FD-INDEXED" -
    /LANGUAGE="cobol"
DEFINE TOKEN "FD-INDEXED" -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="FD-INDEXED"

END DEFINE
DELETE TOKEN "FD-RELATIVE" -
    /LANGUAGE="cobol"
DEFINE TOKEN "FD-RELATIVE" -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="FD-RELATIVE"

END DEFINE
DELETE TOKEN "FD-REPORT" -
    /LANGUAGE="cobol"
DEFINE TOKEN "FD-REPORT" -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="FD-REPORT"

END DEFINE
DELETE TOKEN "FD-SEQUENTIAL" -
    /LANGUAGE="cobol"
DEFINE TOKEN "FD-SEQUENTIAL" -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="FD-SEQUENTIAL"

END DEFINE
DELETE TOKEN FETCH -
    /LANGUAGE="cobol"
DEFINE TOKEN FETCH -
    /LANGUAGE="cobol" -
    /DESCRIPTION="FETCH statement for DBMS" -

    "FETCH {record-selection-expression}"
    "	[FOR UPDATE]"
    "	[RETAINING [currency-indicators] CURRENCY]"
    "	[at-end-phrase|on-error-phrase]"
    "END-FETCH"

END DEFINE

DELETE TOKEN "FILE-CONTROL" -
    /LANGUAGE="cobol"
DEFINE TOKEN "FILE-CONTROL" -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="FILE-CONTROL .."

END DEFINE
DELETE TOKEN "FILE-SECTION" -
    /LANGUAGE="cobol"
DEFINE TOKEN "FILE-SECTION" -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="FILE SECTION .."

END DEFINE
DELETE TOKEN "FILES USED" -
    /LANGUAGE="cobol"
DEFINE TOKEN "FILES USED" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="Any files used by this procedure." -

    "FILES USED:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN FIND1 -
    /LANGUAGE="cobol"
DEFINE TOKEN FIND1 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="FIND statement for DBMS" -

    "FIND {record-selection-expression}"
    "	[FOR UPDATE]"
    "	[RETAINING [currency-indicators] CURRENCY]"
    "	[at-end-phrase|on-error-phrase]"
    "END-FIND"

END DEFINE

DELETE TOKEN FIND2 -
    /LANGUAGE="cobol"
DEFINE TOKEN FIND2 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="FIND ALL statement for DBMS" -

    "FIND ALL {keeplist-name} [record-name] [WITHIN {{realm-name}|{set-name}}] [USING {rec-key2}...|WHERE {bool-exp}]"
    "	[FOR UPDATE]"
    "	[at-end-phrase|on-error-phrase]"
    "END-FIND"

END DEFINE

DELETE TOKEN "FORMAL ARGUMENTS" -
    /LANGUAGE="cobol"
DEFINE TOKEN "FORMAL ARGUMENTS" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="For each argument: its name, punctuation (tag terminator), description." -

    "FORMAL ARGUMENTS:"
    " "
    "	{subtags}"
    " "

END DEFINE

DELETE TOKEN "FORMAL PARAMETERS" -
    /LANGUAGE="cobol"
DEFINE TOKEN "FORMAL PARAMETERS" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="For each argument: its name, punctuation (tag terminator), description." -

    "FORMAL PARAMETERS:"
    " "
    "  {subtags}"
    " "

END DEFINE

DELETE TOKEN FREE -
    /LANGUAGE="cobol"
DEFINE TOKEN FREE -
    /LANGUAGE="cobol" -
    /DESCRIPTION="FREE statement for DBMS" -

    "FREE {database-key-id|all-phrase}"
    "	[on-error-phrase]"
    "END-FREE"

END DEFINE

DELETE TOKEN FUNCTION -
    /LANGUAGE="cobol"
DEFINE TOKEN FUNCTION -
    /LANGUAGE="cobol" -
    /PLACEHOLDER=FUNCTION

END DEFINE
DELETE TOKEN "FUNCTION VALUE" -
    /LANGUAGE="cobol"
DEFINE TOKEN "FUNCTION VALUE" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="The value of the function." -

    "FUNCTION VALUE:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN "FUNCTIONAL DESCRIPTION" -
    /LANGUAGE="cobol"
DEFINE TOKEN "FUNCTIONAL DESCRIPTION" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="A description of the procedure." -

    "FUNCTIONAL DESCRIPTION:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN GENERATE -
    /LANGUAGE="cobol"
DEFINE TOKEN GENERATE -
    /LANGUAGE="cobol" -
    /DESCRIPTION="GENERATE statement" -

    "GENERATE {report-item}"

END DEFINE

DELETE TOKEN GET -
    /LANGUAGE="cobol"
DEFINE TOKEN GET -
    /LANGUAGE="cobol" -
    /DESCRIPTION="GET statement for DBMS" -

    "GET [{record-name}|{record-item}...]"
    "	[on-error-phrase]"
    "END-GET"

END DEFINE

DELETE TOKEN GO1 -
    /LANGUAGE="cobol"
DEFINE TOKEN GO1 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="simple GO" -

    "GO TO [proc-name]"

END DEFINE

DELETE TOKEN GO2 -
    /LANGUAGE="cobol"
DEFINE TOKEN GO2 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="GO DEPENDING" -

    "GO TO {proc-name}... DEPENDING ON {num}"

END DEFINE

DELETE TOKEN "I-O-CONTROL" -
    /LANGUAGE="cobol"
DEFINE TOKEN "I-O-CONTROL" -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="I-O-CONTROL .."

END DEFINE
DELETE TOKEN "IDENTIFICATION-DIVISION" -
    /LANGUAGE="cobol"
DEFINE TOKEN "IDENTIFICATION-DIVISION" -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="IDENTIFICATION DIVISION .."

END DEFINE
DELETE TOKEN IF -
    /LANGUAGE="cobol"
DEFINE TOKEN IF -
    /LANGUAGE="cobol" -
    /DESCRIPTION="IF statement" -

    "IF {conditional-expression}"
    "THEN"
    "	{then-clause}"
    "[ELSE {else-part}]"
    "[END-IF]"

END DEFINE

DELETE TOKEN "IMPLICIT INPUT PARAMETERS" -
    /LANGUAGE="cobol"
DEFINE TOKEN "IMPLICIT INPUT PARAMETERS" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="Any external data read, but not passed as an explicit parameter." -

    "IMPLICIT INPUT PARAMETERS:"
    " "
    "	{subtags}"
    " "

END DEFINE

DELETE TOKEN "IMPLICIT INPUTS" -
    /LANGUAGE="cobol"
DEFINE TOKEN "IMPLICIT INPUTS" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="Any external data read, but not passed as an explicit parameter." -

    "IMPLICIT INPUTS:"
    " "
    "	{subtags}"
    " "

END DEFINE

DELETE TOKEN "IMPLICIT OUTPUT PARAMETERS" -
    /LANGUAGE="cobol"
DEFINE TOKEN "IMPLICIT OUTPUT PARAMETERS" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="Any external data changed, but not passed as an explicit parameter." -

    "IMPLICIT OUTPUT PARAMETERS:"
    " "
    "	{subtags}"
    " "

END DEFINE

DELETE TOKEN "IMPLICIT OUTPUTS" -
    /LANGUAGE="cobol"
DEFINE TOKEN "IMPLICIT OUTPUTS" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="Any external data changed, but not passed as an explicit parameter." -

    "IMPLICIT OUTPUTS:"
    " "
    "	{subtags}"
    " "

END DEFINE

DELETE TOKEN "IMPLICIT PARAMETERS" -
    /LANGUAGE="cobol"
DEFINE TOKEN "IMPLICIT PARAMETERS" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="Any external data changed, but not passed as an explicit parameter." -

    "IMPLICIT PARAMETERS:"
    " "
    "	{subtags}"
    " "

END DEFINE

DELETE TOKEN "INCLUDED FILES" -
    /LANGUAGE="cobol"
DEFINE TOKEN "INCLUDED FILES" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="Any files that are included into this module." -

    "INCLUDED FILES:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN INITIALIZE -
    /LANGUAGE="cobol"
DEFINE TOKEN INITIALIZE -
    /LANGUAGE="cobol" -
    /DESCRIPTION="INITIALIZE statement" -

    "INITIALIZE {fld-name}..."
    "	[REPLACING {{replacing-type} DATA BY {val1}}...]"

END DEFINE

DELETE TOKEN INITIATE -
    /LANGUAGE="cobol"
DEFINE TOKEN INITIATE -
    /LANGUAGE="cobol" -
    /DESCRIPTION="INITIATE statement" -

    "INITIATE {report-name}..."

END DEFINE

DELETE TOKEN "INPUT PARAMETERS" -
    /LANGUAGE="cobol"
DEFINE TOKEN "INPUT PARAMETERS" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="Descriptions of formal parameters that are used but not modified." -

    "INPUT PARAMETERS:"
    " "
    "	{subtags}"
    " "

END DEFINE

DELETE TOKEN "INPUT-OUTPUT-SECTION" -
    /LANGUAGE="cobol"
DEFINE TOKEN "INPUT-OUTPUT-SECTION" -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="INPUT-OUTPUT SECTION .."

END DEFINE
DELETE TOKEN "INPUT/OUTPUT PARAMETERS" -
    /LANGUAGE="cobol"
DEFINE TOKEN "INPUT/OUTPUT PARAMETERS" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="Descriptions of formal parameters that are used and modified." -

    "INPUT/OUTPUT PARAMETERS:"
    " "
    "	{subtags}"
    " "

END DEFINE

DELETE TOKEN INSPECT1 -
    /LANGUAGE="cobol"
DEFINE TOKEN INSPECT1 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="INSPECT .. TALLYING" -

    "INSPECT {src-string1}"
    "	TALLYING"
    "		{tally-ctr-clause}..."

END DEFINE

DELETE TOKEN INSPECT2 -
    /LANGUAGE="cobol"
DEFINE TOKEN INSPECT2 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="INSPECT .. REPLACING" -

    "INSPECT {src-string1}"
    "	REPLACING"
    "		{replacing-clause1}..."

END DEFINE

DELETE TOKEN INSPECT3 -
    /LANGUAGE="cobol"
DEFINE TOKEN INSPECT3 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="INSPECT .. TALLYING .. REPLACING" -

    "INSPECT {src-string1}"
    "	TALLYING"
    "		{tally-ctr-clause}..."
    "	REPLACING"
    "		{replacing-clause1}..."

END DEFINE

DELETE TOKEN INSPECT4 -
    /LANGUAGE="cobol"
DEFINE TOKEN INSPECT4 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="INSPECT .. CONVERTING" -

    "INSPECT {src-string1}"
    "	CONVERTING"
    "		{compare-chars} TO {convert-chars} [{BEFORE|AFTER} INITIAL {delim-val}]..."

END DEFINE

DELETE TOKEN INSTALLATION -
    /LANGUAGE="cobol"
DEFINE TOKEN INSTALLATION -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="INSTALLATION. [comment-entry]"

END DEFINE
DELETE TOKEN INVARIANTS -
    /LANGUAGE="cobol"
DEFINE TOKEN INVARIANTS -
    /LANGUAGE="cobol" -
    /DESCRIPTION="Important conditions guaranteed to be preserved by this procedure." -

    "INVARIANTS:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN KEEP -
    /LANGUAGE="cobol"
DEFINE TOKEN KEEP -
    /LANGUAGE="cobol" -
    /DESCRIPTION="KEEP statement for DBMS" -

    "KEEP [database-key-id] USING {destination-keeplist}"
    "	[on-error-phrase]"
    "END-KEEP"

END DEFINE

DELETE TOKEN KEYWORDS -
    /LANGUAGE="cobol"
DEFINE TOKEN KEYWORDS -
    /LANGUAGE="cobol" -
    /DESCRIPTION="A list of keywords that characterize the procedure." -

    "KEYWORDS:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN LD -
    /LANGUAGE="cobol"
DEFINE TOKEN LD -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="LD {keeplist-name}."

END DEFINE
DELETE TOKEN "LINKAGE-SECTION" -
    /LANGUAGE="cobol"
DEFINE TOKEN "LINKAGE-SECTION" -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="LINKAGE SECTION .."

END DEFINE
DELETE TOKEN MERGE -
    /LANGUAGE="cobol"
DEFINE TOKEN MERGE -
    /LANGUAGE="cobol" -
    /DESCRIPTION="MERGE statement" -

    "MERGE {mergefile}"
    "	{ON {ASCENDING|DESCENDING} KEY {mergekey}...}..."
    "	[COLLATING SEQUENCE IS {alpha}]"
    "	USING {infile} {infile}..."
    "	{OUTPUT PROCEDURE IS ..|GIVING ..}"

END DEFINE

DELETE TOKEN "MODIFICATION HISTORY" -
    /LANGUAGE="cobol"
DEFINE TOKEN "MODIFICATION HISTORY" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="The modification history of the module." -

    "MODIFICATION HISTORY:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN MODIFY -
    /LANGUAGE="cobol"
DEFINE TOKEN MODIFY -
    /LANGUAGE="cobol" -
    /DESCRIPTION="MODIFY statement for DBMS" -

    "MODIFY [{record-name}|{record-item}...]"
    "	[RETAINING [currency-indicators] CURRENCY]"
    "	[on-error-phrase]"
    "END-MODIFY"

END DEFINE

DELETE TOKEN MOVE1 -
    /LANGUAGE="cobol"
DEFINE TOKEN MOVE1 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="simple MOVE statement" -

    "MOVE {{src-item3-or-func}|{lit3}} TO {dest-item2}..."

END DEFINE

DELETE TOKEN MOVE2 -
    /LANGUAGE="cobol"
DEFINE TOKEN MOVE2 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="MOVE CORRESPONDING statement" -

    "MOVE CORRESPONDING {src-item3} TO {dest-item2}"

END DEFINE

DELETE TOKEN MULTIPLY1 -
    /LANGUAGE="cobol"
DEFINE TOKEN MULTIPLY1 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="MULTIPLY BY" -

    "MULTIPLY {srcnum-or-func} BY {{result-n} [ROUNDED]}..."
    "	[on-size-error-clause]"
    "END-MULTIPLY"

END DEFINE

DELETE TOKEN MULTIPLY2 -
    /LANGUAGE="cobol"
DEFINE TOKEN MULTIPLY2 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="MULTIPLY BY GIVING" -

    "MULTIPLY {srcnum-or-func} BY {srcnum-or-func} GIVING {{result-n-or-ne} [ROUNDED]}..."
    "	[on-size-error-clause]"
    "END-MULTIPLY"

END DEFINE

DELETE TOKEN "NON-STANDARD FEATURES USED" -
    /LANGUAGE="cobol"
DEFINE TOKEN "NON-STANDARD FEATURES USED" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="Any non-standard features used by this procedure." -

    "NON-STANDARD FEATURES USED:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN "OBJECT-COMPUTER" -
    /LANGUAGE="cobol"
DEFINE TOKEN "OBJECT-COMPUTER" -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="OBJECT-COMPUTER .."

END DEFINE
DELETE TOKEN OBLIGATIONS -
    /LANGUAGE="cobol"
DEFINE TOKEN OBLIGATIONS -
    /LANGUAGE="cobol" -
    /DESCRIPTION="Anything the caller must do after using this procedure, e. g. release memory." -

    "OBLIGATIONS:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN "OLD-ROUTINE-LEVEL-COMMENTS" -
    /LANGUAGE="cobol"
DEFINE TOKEN "OLD-ROUTINE-LEVEL-COMMENTS" -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="OLD-ROUTINE-LEVEL-COMMENTS"

END DEFINE
DELETE TOKEN OPEN1 -
    /LANGUAGE="cobol"
DEFINE TOKEN OPEN1 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="OPEN for sequential, relative, and indexed files" -

    "OPEN {INPUT|OUTPUT|I-O|EXTEND}..."

END DEFINE

DELETE TOKEN OPEN2 -
    /LANGUAGE="cobol"
DEFINE TOKEN OPEN2 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="OPEN for report writer files" -

    "OPEN {EXTEND|OUTPUT}..."

END DEFINE

DELETE TOKEN "OPTIONAL PARAMETERS" -
    /LANGUAGE="cobol"
DEFINE TOKEN "OPTIONAL PARAMETERS" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="Descriptions of parameters that are optional." -

    "OPTIONAL PARAMETERS:"
    " "
    "	{subtags}"
    " "

END DEFINE

DELETE TOKEN "OUTPUT PARAMETERS" -
    /LANGUAGE="cobol"
DEFINE TOKEN "OUTPUT PARAMETERS" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="Descriptions of parameters whose values are set by this procedure." -

    "OUTPUT PARAMETERS:"
    " "
    "	{subtags}"
    " "

END DEFINE

DELETE TOKEN PARAMETERS -
    /LANGUAGE="cobol"
DEFINE TOKEN PARAMETERS -
    /LANGUAGE="cobol" -
    /DESCRIPTION="Descriptions of parameters for this procedure." -

    "PARAMETERS:"
    " "
    "	{subtags}"
    " "

END DEFINE

DELETE TOKEN PERFORM1 -
    /LANGUAGE="cobol"
DEFINE TOKEN PERFORM1 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="simple PERFORM" -

    "PERFORM {simple|simple (in-line)}"

END DEFINE

DELETE TOKEN PERFORM2 -
    /LANGUAGE="cobol"
DEFINE TOKEN PERFORM2 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="PERFORM n TIMES" -

    "PERFORM {n TIMES|n TIMES (in-line)}"

END DEFINE

DELETE TOKEN PERFORM3 -
    /LANGUAGE="cobol"
DEFINE TOKEN PERFORM3 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="PERFORM UNTIL" -

    "PERFORM {UNTIL|UNTIL (in-line)}"

END DEFINE

DELETE TOKEN PERFORM4 -
    /LANGUAGE="cobol"
DEFINE TOKEN PERFORM4 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="PERFORM VARYING" -

    "PERFORM {VARYING|VARYING (in-line)}"

END DEFINE

DELETE TOKEN "PORTABILITY ISSUES" -
    /LANGUAGE="cobol"
DEFINE TOKEN "PORTABILITY ISSUES" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="Any issues that relate to the portability of this module." -

    "PORTABILITY ISSUES:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN POSTCONDITIONS -
    /LANGUAGE="cobol"
DEFINE TOKEN POSTCONDITIONS -
    /LANGUAGE="cobol" -
    /DESCRIPTION="Conditions guaranteed to be true after calling this procedure." -

    "POSTCONDITIONS:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN PRECONDITIONS -
    /LANGUAGE="cobol"
DEFINE TOKEN PRECONDITIONS -
    /LANGUAGE="cobol" -
    /DESCRIPTION="Conditions that must be true before calling this procedure." -

    "PRECONDITIONS:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN "PROCEDURE-DIVISION" -
    /LANGUAGE="cobol"
DEFINE TOKEN "PROCEDURE-DIVISION" -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="PROCEDURE DIVISION .."

END DEFINE
DELETE TOKEN PROGRAM -
    /LANGUAGE="cobol"
DEFINE TOKEN PROGRAM -
    /LANGUAGE="cobol" -
    /PLACEHOLDER=PROGRAM

END DEFINE
DELETE TOKEN "PROGRAM ABSTRACT" -
    /LANGUAGE="cobol"
DEFINE TOKEN "PROGRAM ABSTRACT" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="An abstract description of this program or module." -

    "PROGRAM ABSTRACT:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN "PROGRAM DESCRIPTION" -
    /LANGUAGE="cobol"
DEFINE TOKEN "PROGRAM DESCRIPTION" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="A description of this program or module." -

    "PROGRAM DESCRIPTION:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN "PROGRAM MODULE" -
    /LANGUAGE="cobol"
DEFINE TOKEN "PROGRAM MODULE" -
    /LANGUAGE="cobol" -
    /PLACEHOLDER=PROGRAM

END DEFINE
DELETE TOKEN "PROGRAM-ID" -
    /LANGUAGE="cobol"
DEFINE TOKEN "PROGRAM-ID" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="PROGRAM-ID paragraph" -

    "PROGRAM-ID. {program-name} [IS [INITIAL] [COMMON] PROGRAM] [WITH IDENT {module-vers-string}]."

END DEFINE

DELETE TOKEN RD -
    /LANGUAGE="cobol"
DEFINE TOKEN RD -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="RD {report-name} .."

END DEFINE
DELETE TOKEN READ1 -
    /LANGUAGE="cobol"
DEFINE TOKEN READ1 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="READ for sequential or dynamic access" -

    "READ {file-name1} [read-direction] RECORD [INTO {dest-item3}] [read-permission]"
    "	[at-end-phrase]"
    "END-READ"

END DEFINE

DELETE TOKEN READ2 -
    /LANGUAGE="cobol"
DEFINE TOKEN READ2 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="READ for random or dynamic access" -

    "READ {file-name1} RECORD [INTO {dest-item3}] [read-permission]"
    "	[KEY IS {key-name2}]"
    "	[invalid-key-phrase]"
    "END-READ"

END DEFINE

DELETE TOKEN READY -
    /LANGUAGE="cobol"
DEFINE TOKEN READY -
    /LANGUAGE="cobol" -
    /DESCRIPTION="READY statement for DBMS" -

    "READY [realm-name]..."
    "	[USAGE-MODE IS [CONCURRENT|EXCLUSIVE|PROTECTED|BATCH] [RETRIEVAL|UPDATE]]"
    "	[WITH WAIT]"
    "	[on-error-phrase]"
    "END-READY"

END DEFINE

DELETE TOKEN RECONNECT -
    /LANGUAGE="cobol"
DEFINE TOKEN RECONNECT -
    /LANGUAGE="cobol" -
    /DESCRIPTION="RECONNECT statement for DBMS" -

    "RECONNECT [record-name] WITHIN {{set-name}...|ALL}"
    "	[RETAINING [currency-indicators] CURRENCY]"
    "	[on-error-phrase]"
    "END-RECONNECT"

END DEFINE

DELETE TOKEN RECORD -
    /LANGUAGE="cobol"
DEFINE TOKEN RECORD -
    /LANGUAGE="cobol" -
    /DESCRIPTION="RECORD statement" -

    "RECORD DEPENDENCY {pathname} [TYPE IS {rel-type}] [IN DICTIONARY]"

END DEFINE

DELETE TOKEN RELEASE -
    /LANGUAGE="cobol"
DEFINE TOKEN RELEASE -
    /LANGUAGE="cobol" -
    /DESCRIPTION="RELEASE statement" -

    "RELEASE {rec} [FROM {src-area}]"

END DEFINE

DELETE TOKEN REPLACE1 -
    /LANGUAGE="cobol"
DEFINE TOKEN REPLACE1 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="REPLACE pseudo-text" -

    "REPLACE {{=={pseudo-text-1}== BY =={pseudo-text-2}==}...}."

END DEFINE

DELETE TOKEN REPLACE2 -
    /LANGUAGE="cobol"
DEFINE TOKEN REPLACE2 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="REPLACE OFF" -

    "REPLACE OFF."

END DEFINE

DELETE TOKEN "REPORT-SECTION" -
    /LANGUAGE="cobol"
DEFINE TOKEN "REPORT-SECTION" -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="REPORT SECTION .."

END DEFINE
DELETE TOKEN RESULT -
    /LANGUAGE="cobol"
DEFINE TOKEN RESULT -
    /LANGUAGE="cobol" -
    /DESCRIPTION="The value returned by this procedure." -

    "RESULT:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN RETURN -
    /LANGUAGE="cobol"
DEFINE TOKEN RETURN -
    /LANGUAGE="cobol" -
    /DESCRIPTION="RETURN statement" -

    "RETURN {smrg-file} RECORD [INTO {dest-area}]"
    "	[at-end-phrase]"
    "END-RETURN"

END DEFINE

DELETE TOKEN "RETURN VALUE" -
    /LANGUAGE="cobol"
DEFINE TOKEN "RETURN VALUE" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="The value returned by this procedure." -

    "RETURN VALUE:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN REWRITE -
    /LANGUAGE="cobol"
DEFINE TOKEN REWRITE -
    /LANGUAGE="cobol" -
    /DESCRIPTION="REWRITE statement" -

    "REWRITE {rec-name1} [FROM {src-item4}] [ALLOWING NO OTHERS]"
    "	[invalid-key-phrase]"
    "END-REWRITE"

END DEFINE

DELETE TOKEN ROLLBACK -
    /LANGUAGE="cobol"
DEFINE TOKEN ROLLBACK -
    /LANGUAGE="cobol" -
    /DESCRIPTION="ROLLBACK statement for DBMS" -

    "ROLLBACK [STREAM]"
    "	[on-error-phrase]"
    "END-ROLLBACK"

END DEFINE

DELETE TOKEN "ROUTINE VALUE" -
    /LANGUAGE="cobol"
DEFINE TOKEN "ROUTINE VALUE" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="The value returned by this procedure." -

    "ROUTINE VALUE:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN "SCREEN-SECTION" -
    /LANGUAGE="cobol"
DEFINE TOKEN "SCREEN-SECTION" -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="SCREEN SECTION .."

END DEFINE
DELETE TOKEN SD -
    /LANGUAGE="cobol"
DEFINE TOKEN SD -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="SORT-MERGE-FILE-DESCRIPTION"

END DEFINE
DELETE TOKEN SEARCH1 -
    /LANGUAGE="cobol"
DEFINE TOKEN SEARCH1 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="SEARCH a table serially" -

    "SEARCH {src-table} [VARYING {pointr1}]"
    "	[AT END {statement}...]"
    "   {search-when}"
    "END-SEARCH"

END DEFINE

DELETE TOKEN SEARCH2 -
    /LANGUAGE="cobol"
DEFINE TOKEN SEARCH2 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="perform a nonserial, or binary, SEARCH" -

    "SEARCH ALL {src-table}"
    "	[AT END {statement}...]"
    "	WHEN {search-selector}"
    "	[AND {search-selector}]..."
    "		{search-action}"

END DEFINE

DELETE TOKEN SECURITY -
    /LANGUAGE="cobol"
DEFINE TOKEN SECURITY -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="SECURITY. [comment-entry]"

END DEFINE
DELETE TOKEN "SELECT-INDEXED" -
    /LANGUAGE="cobol"
DEFINE TOKEN "SELECT-INDEXED" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="SELECT for indexed file" -

    "SELECT [OPTIONAL] {file-name}"
    "	ASSIGN TO {file-spec1}"
    "	[RESERVE {reserve-num} AREAS]"
    "	ORGANIZATION IS INDEXED"
    "	[BLOCK CONTAINS [{smallest-block} TO] {blocksize} {RECORDS|CHARACTERS}]"
    "	[RECORD DELIMITER IS STANDARD-1]"
    "	[ACCESS MODE IS {SEQUENTIAL|RANDOM|DYNAMIC}]"
    "	[RECORD KEY IS {rec-key1} [WITH DUPLICATES] [ASCENDING|DESCENDING]]"
    "	[ALTERNATE RECORD KEY IS {alt-key2} [WITH DUPLICATES] [ASCENDING|DESCENDING]]..."
    "	[LOCK MODE IS {rel-ind-lock-mode}]"
    "	[FILE STATUS IS {file-stat}]."

END DEFINE

DELETE TOKEN "SELECT-LINE-SEQUENTIAL" -
    /LANGUAGE="cobol"
DEFINE TOKEN "SELECT-LINE-SEQUENTIAL" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="SELECT for X/Open line sequential file in DEC COBOL." -

    "SELECT [OPTIONAL] {file-name}"
    "	ASSIGN TO {file-spec3}"
    "	[RESERVE {reserve-num} AREAS]"
    "	ORGANIZATION IS LINE SEQUENTIAL"
    "	[BLOCK CONTAINS [{smallest-block} TO] {blocksize} {RECORDS|CHARACTERS}]"
    "	[CODE-SET IS {alphabet-name3}]"
    "	[PADDING CHARACTER IS {pad-char}]"
    "	[RECORD DELIMITER IS STANDARD-1]"
    "	[ACCESS MODE IS SEQUENTIAL]"
    "	[LOCK MODE IS {seq-lock-mode}]"
    "	[FILE STATUS IS {file-stat}]."

END DEFINE

DELETE TOKEN "SELECT-RELATIVE" -
    /LANGUAGE="cobol"
DEFINE TOKEN "SELECT-RELATIVE" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="SELECT for relative file" -

    "SELECT [OPTIONAL] {file-name}"
    "	ASSIGN TO {file-spec1}"
    "	[RESERVE {reserve-num} AREAS]"
    "	ORGANIZATION IS RELATIVE"
    "	[BLOCK CONTAINS [{smallest-block} TO] {blocksize} {RECORDS|CHARACTERS}]"
    "	[RECORD DELIMITER IS STANDARD-1]"
    "	[ACCESS MODE IS {{SEQUENTIAL|RANDOM|DYNAMIC} RELATIVE KEY IS {rel-key}}]"
    "	[LOCK MODE IS {rel-ind-lock-mode}]"
    "	[FILE STATUS IS {file-stat}]."

END DEFINE

DELETE TOKEN "SELECT-REPORT" -
    /LANGUAGE="cobol"
DEFINE TOKEN "SELECT-REPORT" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="SELECT for report file" -

    "SELECT {file-name}"
    "	ASSIGN TO {file-spec2}"
    "	[RESERVE {reserve-num} AREAS]"
    "	ORGANIZATION IS SEQUENTIAL"
    "	[BLOCK CONTAINS [{smallest-block} TO] {blocksize} {RECORDS|CHARACTERS}]"
    "	[CODE-SET IS {alphabet-name3}]"
    "	[PADDING CHARACTER IS {pad-char}]"
    "	[RECORD DELIMITER IS STANDARD-1]"
    "	[ACCESS MODE IS SEQUENTIAL]"
    "	[FILE STATUS IS {file-stat}]."

END DEFINE

DELETE TOKEN "SELECT-SEQUENTIAL" -
    /LANGUAGE="cobol"
DEFINE TOKEN "SELECT-SEQUENTIAL" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="SELECT for sequential file" -

    "SELECT [OPTIONAL] {file-name}"
    "	ASSIGN TO {seq-file-expr}"
    "	[RESERVE {reserve-num} AREAS]"
    "	ORGANIZATION IS SEQUENTIAL"
    "	[BLOCK CONTAINS [{smallest-block} TO] {blocksize} {RECORDS|CHARACTERS}]"
    "	[CODE-SET IS {alphabet-name3}]"
    "	[PADDING CHARACTER IS {pad-char}]"
    "	[RECORD DELIMITER IS STANDARD-1]"
    "	[ACCESS MODE IS SEQUENTIAL]"
    "	[LOCK MODE IS {seq-lock-mode}]"
    "	[FILE STATUS IS {file-stat}]."

END DEFINE

DELETE TOKEN "SELECT-SORT-MERGE" -
    /LANGUAGE="cobol"
DEFINE TOKEN "SELECT-SORT-MERGE" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="SELECT for sort or merge file" -

    "SELECT {file-name}"
    "	ASSIGN TO {file-spec1}."

END DEFINE

DELETE TOKEN SET1 -
    /LANGUAGE="cobol"
DEFINE TOKEN SET1 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="SET TO" -

    "SET {result}... TO {val2}"

END DEFINE

DELETE TOKEN SET2 -
    /LANGUAGE="cobol"
DEFINE TOKEN SET2 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="SET UP BY or DOWN BY" -

    "SET {indx}... {UP BY|DOWN BY} {increm2}"

END DEFINE

DELETE TOKEN SET3 -
    /LANGUAGE="cobol"
DEFINE TOKEN SET3 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="SET cond-name TO TRUE" -

    "SET {condition-name1}... TO TRUE"

END DEFINE

DELETE TOKEN SET4 -
    /LANGUAGE="cobol"
DEFINE TOKEN SET4 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="SET switch-name" -

    "SET {{switch-name2}... TO {ON|OFF}}..."

END DEFINE

DELETE TOKEN SET5 -
    /LANGUAGE="cobol"
DEFINE TOKEN SET5 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="SET TO REFERENCE" -

    "SET {pointer-id} TO REFERENCE OF {identifier1}"

END DEFINE

DELETE TOKEN SET6 -
    /LANGUAGE="cobol"
DEFINE TOKEN SET6 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="SET TO SUCCESS or FAILURE" -

    "SET {status-code-id} TO {SUCCESS|FAILURE}"

END DEFINE

DELETE TOKEN "SIDE EFFECTS" -
    /LANGUAGE="cobol"
DEFINE TOKEN "SIDE EFFECTS" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="Any side effects of this procedure." -

    "SIDE EFFECTS:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN SORT -
    /LANGUAGE="cobol"
DEFINE TOKEN SORT -
    /LANGUAGE="cobol" -
    /DESCRIPTION="SORT statement" -

    "SORT {sortfile}"
    "	{ON {ASCENDING|DESCENDING} KEY {sortkey}...}..."
    "	[WITH DUPLICATES IN ORDER]"
    "	[COLLATING SEQUENCE IS {alpha}]"
    "	{INPUT PROCEDURE ..|USING ..}"
    "	{OUTPUT PROCEDURE ..|GIVING ..}"

END DEFINE

DELETE TOKEN "SOURCE-COMPUTER" -
    /LANGUAGE="cobol"
DEFINE TOKEN "SOURCE-COMPUTER" -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="SOURCE-COMPUTER .."

END DEFINE
DELETE TOKEN "SPECIAL-NAMES" -
    /LANGUAGE="cobol"
DEFINE TOKEN "SPECIAL-NAMES" -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="SPECIAL-NAMES .."

END DEFINE
DELETE TOKEN START -
    /LANGUAGE="cobol"
DEFINE TOKEN START -
    /LANGUAGE="cobol" -
    /DESCRIPTION="START statement" -

    "START {file-name3} [KEY {start-key-options} {key-data}] [read-permission]"
    "	[invalid-key-phrase]"
    "END-START"

END DEFINE

DELETE TOKEN STOP -
    /LANGUAGE="cobol"
DEFINE TOKEN STOP -
    /LANGUAGE="cobol" -
    /DESCRIPTION="STOP statement" -

    "STOP {RUN|{disp}}"

END DEFINE

DELETE TOKEN STORE -
    /LANGUAGE="cobol"
DEFINE TOKEN STORE -
    /LANGUAGE="cobol" -
    /DESCRIPTION="STORE statement for DBMS" -

    "STORE {record-name} [[NEXT TO] DBKEY] [WITHIN {realm-name}...]"
    "	[RETAINING [currency-indicators] CURRENCY]"
    "	[on-error-phrase]"
    "END-STORE"

END DEFINE

DELETE TOKEN STRING -
    /LANGUAGE="cobol"
DEFINE TOKEN STRING -
    /LANGUAGE="cobol" -
    /DESCRIPTION="STRING statement" -

    "STRING {{src-string2}... DELIMITED BY {{delim1}|SIZE}}..."
    "	INTO {dest-string1} [WITH POINTER {pointr2}]"
    "	[on-overflow-phrase]"
    "END-STRING"

END DEFINE

DELETE TOKEN "SUB-SCHEMA-SECTION" -
    /LANGUAGE="cobol"
DEFINE TOKEN "SUB-SCHEMA-SECTION" -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="SUB-SCHEMA SECTION .."

END DEFINE
DELETE TOKEN SUBSYSTEM -
    /LANGUAGE="cobol"
DEFINE TOKEN SUBSYSTEM -
    /LANGUAGE="cobol" -
    /DESCRIPTION="The subsystem of which this module is a part." -

    "SUBSYSTEM:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN SUBTRACT1 -
    /LANGUAGE="cobol"
DEFINE TOKEN SUBTRACT1 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="SUBTRACT FROM" -

    "SUBTRACT {num-or-func} [{num-or-func}]... FROM {{result-n} [ROUNDED]}..."
    "	[on-size-error-clause]"
    "END-SUBTRACT"

END DEFINE

DELETE TOKEN SUBTRACT2 -
    /LANGUAGE="cobol"
DEFINE TOKEN SUBTRACT2 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="SUBTRACT GIVING" -

    "SUBTRACT {num-or-func} [{num-or-func}]... FROM {num-or-func} GIVING {{result-n-or-ne} [ROUNDED]}..."
    "	[on-size-error-clause]"
    "END-SUBTRACT"

END DEFINE

DELETE TOKEN SUBTRACT3 -
    /LANGUAGE="cobol"
DEFINE TOKEN SUBTRACT3 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="SUBTRACT CORRESPONDING" -

    "SUBTRACT CORRESPONDING {grp} FROM {grp} [ROUNDED]"
    "	[on-size-error-clause]"
    "END-SUBTRACT"

END DEFINE

DELETE TOKEN SUPPRESS -
    /LANGUAGE="cobol"
DEFINE TOKEN SUPPRESS -
    /LANGUAGE="cobol" -
    /DESCRIPTION="SUPPRESS statement" -

    "SUPPRESS PRINTING"

END DEFINE

DELETE TOKEN SYSTEM -
    /LANGUAGE="cobol"
DEFINE TOKEN SYSTEM -
    /LANGUAGE="cobol" -
    /DESCRIPTION="The system of which this module is a part." -

    "SYSTEM:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN TERMINATE -
    /LANGUAGE="cobol"
DEFINE TOKEN TERMINATE -
    /LANGUAGE="cobol" -
    /DESCRIPTION="TERMINATE statement" -

    "TERMINATE {report-name}..."

END DEFINE

DELETE TOKEN "TEXT LIBRARY MODULES INCLUDED" -
    /LANGUAGE="cobol"
DEFINE TOKEN "TEXT LIBRARY MODULES INCLUDED" -
    /LANGUAGE="cobol" -
    /DESCRIPTION="Any modules included from a text library." -

    "TEXT LIBRARY MODULES INCLUDED:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN TITLE -
    /LANGUAGE="cobol"
DEFINE TOKEN TITLE -
    /LANGUAGE="cobol" -
    /DESCRIPTION="The title of this module." -

    "TITLE:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN UNLOCK -
    /LANGUAGE="cobol"
DEFINE TOKEN UNLOCK -
    /LANGUAGE="cobol" -
    /DESCRIPTION="UNLOCK statement" -

    "UNLOCK {file-name4} [RECORD|ALL RECORDS]"

END DEFINE

DELETE TOKEN UNSTRING -
    /LANGUAGE="cobol"
DEFINE TOKEN UNSTRING -
    /LANGUAGE="cobol" -
    /DESCRIPTION="UNSTRING statement" -

    "UNSTRING {src-string3} [DELIMITED BY [ALL] {delim2} [OR [ALL] {delim2}]...]"
    "	INTO {{dest-string} [DELIMITER IN {delim-dest}] [COUNT IN {countr}]}... [WITH POINTER {pointr3}] [TALLYING IN {tally-ctr2}]"
    "	[on-overflow-phrase]"
    "END-UNSTRING"

END DEFINE

DELETE TOKEN USE1 -
    /LANGUAGE="cobol"
DEFINE TOKEN USE1 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="USE AFTER EXCEPTION PROCEDURE" -

    "USE [GLOBAL] AFTER STANDARD {EXCEPTION|ERROR} PROCEDURE ON {{file-name1}...|INPUT|OUTPUT|I-O|EXTEND}"

END DEFINE

DELETE TOKEN USE2 -
    /LANGUAGE="cobol"
DEFINE TOKEN USE2 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="USE BEFORE REPORTING" -

    "USE [GLOBAL] BEFORE REPORTING {group-data-name}"

END DEFINE

DELETE TOKEN USE3 -
    /LANGUAGE="cobol"
DEFINE TOKEN USE3 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="USE FOR DB-EXCEPTION for DBMS" -

    "USE [GLOBAL] FOR DB-EXCEPTION [ON {{DBM$_exception-condition}...|OTHER}]"

END DEFINE

DELETE TOKEN VERSION -
    /LANGUAGE="cobol"
DEFINE TOKEN VERSION -
    /LANGUAGE="cobol" -
    /DESCRIPTION="The version of this module." -

    "VERSION:"
    " "
    "	[DESCRIPTION OR NONE]"
    " "

END DEFINE

DELETE TOKEN "WORKING-STORAGE-SECTION" -
    /LANGUAGE="cobol"
DEFINE TOKEN "WORKING-STORAGE-SECTION" -
    /LANGUAGE="cobol" -
    /PLACEHOLDER="WORKING-STORAGE SECTION .."

END DEFINE
DELETE TOKEN WRITE1 -
    /LANGUAGE="cobol"
DEFINE TOKEN WRITE1 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="WRITE for sequential files" -

    "WRITE {rec-name2} [FROM {src-item4}] [ALLOWING NO OTHERS]"
    "	[{BEFORE|AFTER} ADVANCING {{advance-num} LINES|{top-name}|PAGE|TO POSITION {channel-num}}]"
    "	[at-end-of-page-phrase]"
    "END-WRITE"

END DEFINE

DELETE TOKEN WRITE2 -
    /LANGUAGE="cobol"
DEFINE TOKEN WRITE2 -
    /LANGUAGE="cobol" -
    /DESCRIPTION="WRITE for relative and indexed files" -

    "WRITE {rec-name2} [FROM {src-item4}] [ALLOWING NO OTHERS]"
    "	[invalid-key-phrase]"
    "END-WRITE"

END DEFINE