!
! 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 PASCAL on the mainframe.
! It might not comform exactly to the PASCAL 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 "Pascal"
DEFINE LANGUAGE "Pascal" -
    /VALID_IDENTIFIER_CHARACTERS="abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ$%_0123456789" -
    /INITIAL_STRING="[compilation_unit]" -
    /PUNCTUATION_CHARACTERS=",;:()[]{}.'" -
    /INDENT_SIZE=4 -
    /VERSION="V4.0-1" -

END DEFINE
DELETE PLACEHOLDER " ELSE %{STATEMENT}% " -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER " ELSE %{STATEMENT}% " -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "ELSE"
    "    {statement}"

END DEFINE

DELETE PLACEHOLDER " LEFT_MARKER COMMENT_STRING RIGHT_MARKER " -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER " LEFT_MARKER COMMENT_STRING RIGHT_MARKER " -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "bracket_marker"/PLACEHOLDER
    "paren_star_marker"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER " [NO]/LIST " -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER " [NO]/LIST " -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "list"/PLACEHOLDER
    "nolist"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "%DESCR" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "%DESCR" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="passed using 'by descriptor' mechanism" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "%descr"

END DEFINE

DELETE PLACEHOLDER "%IMMED" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "%IMMED" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="passed using 'by immediate value' mechanism" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "%immed"

END DEFINE

DELETE PLACEHOLDER "%INCLUDE" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "%INCLUDE" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="Source inclusion" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "include_file"/PLACEHOLDER
    "include_library_module"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "%REF" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "%REF" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="passed using 'by reference' mechanism" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "%ref"

END DEFINE

DELETE PLACEHOLDER "%STDESCR" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "%STDESCR" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="passed using 'by string descriptor' mechanism" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "%stdescr"

END DEFINE

DELETE PLACEHOLDER "%{CASE_EXPRESSION}%...%[OTHERWISE_STMT]%" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "%{CASE_EXPRESSION}%...%[OTHERWISE_STMT]%" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR=";" -
    /TYPE=NONTERMINAL -

    "{case_expression}..."
    "[otherwise_stmt]"

END DEFINE

DELETE PLACEHOLDER "%{Q|D|E}%%{SIGN}% DECIMAL_DIGITS" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "%{Q|D|E}%%{SIGN}% DECIMAL_DIGITS" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{Q|D|E}{sign}{decimal_digits}"

END DEFINE

DELETE PLACEHOLDER "%{RELATIONAL_OP | IN}% CONST_SIMPLE_EXP" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "%{RELATIONAL_OP | IN}% CONST_SIMPLE_EXP" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{relational_op | IN} {const_simple_exp}"

END DEFINE

DELETE PLACEHOLDER "%{RELATIONAL_OP | IN}% SIMPLE_EXPRESSION" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "%{RELATIONAL_OP | IN}% SIMPLE_EXPRESSION" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{relational_op | IN} {simple_expression}"

END DEFINE

DELETE PLACEHOLDER "%{SIGN | OR}% CONST_TERM" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "%{SIGN | OR}% CONST_TERM" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{sign | OR} {const_term}"

END DEFINE

DELETE PLACEHOLDER "%{SIGN | OR}% TERM" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "%{SIGN | OR}% TERM" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{sign | OR}{term}"

END DEFINE

DELETE PLACEHOLDER "%{VALUE_EXPR%[..VALUE_EXPR]%}%..." -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "%{VALUE_EXPR%[..VALUE_EXPR]%}%..." -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="constant value for a set type" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{value_expr[..value_expr]}..."

END DEFINE

DELETE PLACEHOLDER "'FILE_SPEC'" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "'FILE_SPEC'" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "'{file spec}'"

END DEFINE

DELETE PLACEHOLDER "( EXPRESSION )" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "( EXPRESSION )" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="an expression identifier" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "({value_expr}) :: [target_type]"

END DEFINE

DELETE PLACEHOLDER "(FILE_VARIABLE)" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "(FILE_VARIABLE)" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "( {file_variable} )"

END DEFINE

DELETE PLACEHOLDER "(READLN_PARAMETERS)" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "(READLN_PARAMETERS)" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "( [file_variable] , [read_var_list]..., [error := error_recovery] )"

END DEFINE

DELETE PLACEHOLDER "(WRITELN_PARAMETERS)" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "(WRITELN_PARAMETERS)" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "( [file_variable] , [carr_ch] , [write_list]..., [error := error_recovery] )"

END DEFINE

DELETE PLACEHOLDER "** FACTOR" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "** FACTOR" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR="" -
    /TYPE=MENU -

    "** {factor}"

END DEFINE

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

    "..{value_expr}"

END DEFINE

DELETE PLACEHOLDER 32_BIT_VAR -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER 32_BIT_VAR -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "A variable with an allocation size of 32 bits or less"

END DEFINE

DELETE PLACEHOLDER ":= %[MECHANISM_SPECIFIER]% INITIAL_VALUE" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ":= %[MECHANISM_SPECIFIER]% INITIAL_VALUE" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    ":= [mechanism_specifier] {initial_value}"

END DEFINE

DELETE PLACEHOLDER ":MINIMUM%[:FRACTION]%" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ":MINIMUM%[:FRACTION]%" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    ":{decimal_digits} : [decimal_digits]"

END DEFINE

DELETE PLACEHOLDER ACCESS_METHOD -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ACCESS_METHOD -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "DIRECT"
    "KEYED"
    "SEQUENTIAL"

END DEFINE

DELETE PLACEHOLDER "ACCESS_METHOD   :=   ACCESS_METHOD" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "ACCESS_METHOD   :=   ACCESS_METHOD" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="," -
    /TYPE=NONTERMINAL -

    "ACCESS_METHOD     := {access_method}"

END DEFINE

DELETE PLACEHOLDER ACTUAL_CONST_PARAMETER -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ACTUAL_CONST_PARAMETER -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="same type as corresponding formal" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "a constant parameter of the same type as the corresponding"
    "formal parameter defined in the routine being called"

END DEFINE

DELETE PLACEHOLDER ACTUAL_DISCRIMINANT_LIST -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ACTUAL_DISCRIMINANT_LIST -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=", " -
    /TYPE=NONTERMINAL -

    "{expression}"

END DEFINE

DELETE PLACEHOLDER ACTUAL_EXP_PARAMETER -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ACTUAL_EXP_PARAMETER -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="[mechanism_specifier] value_expr" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[mechanism_specifier] {value_expr}"

END DEFINE

DELETE PLACEHOLDER ACTUAL_FUNC_PARAMETER -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ACTUAL_FUNC_PARAMETER -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="[mechanism_specifier] function_identifier" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[mechanism_specifier] {func_id}"

END DEFINE

DELETE PLACEHOLDER ACTUAL_PARAMETER -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ACTUAL_PARAMETER -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=", " -
    /TYPE=MENU -

    "actual_proc_parameter"/PLACEHOLDER
    "actual_func_parameter"/PLACEHOLDER
    "actual_exp_parameter"/PLACEHOLDER
    "actual_const_parameter"/PLACEHOLDER
    "actual_write_list_element"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER ACTUAL_PROC_PARAMETER -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ACTUAL_PROC_PARAMETER -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="[mechanism_specifier] procedure_identifier" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[mechanism_specifier] {proc_id}"

END DEFINE

DELETE PLACEHOLDER ACTUAL_WRITE_LIST_ELEMENT -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ACTUAL_WRITE_LIST_ELEMENT -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="value_expr [colon_exp [colon_exp]]" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{value_expr} : [expression : [expression]]"

END DEFINE

DELETE PLACEHOLDER ADD_EXP -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ADD_EXP -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "An expression assignment compatible with the variable it is added to"
    "(ie. expression of the same type)"

END DEFINE

DELETE PLACEHOLDER ADD_VAR -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ADD_VAR -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "Integer or unsigned subrange, with an allocation size of 2 bytes,"
    "aligned on a word boundary"

END DEFINE

DELETE PLACEHOLDER ALIGNMENT_ATTRIBUTES -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ALIGNMENT_ATTRIBUTES -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="aligned, unaligned" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "aligned" /TOKEN
    "unaligned" /TOKEN

END DEFINE

DELETE PLACEHOLDER ALIGN_BOUNDARY -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ALIGN_BOUNDARY -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "memory boundary to align on: (0) byte alignment,"
    "(1) word alignment, (2) longword alignment, (3) quadword alignment"
    "(4) octaword alignment, and (9) page alignment"

END DEFINE

DELETE PLACEHOLDER ALLOCATION_ATTRIBUTES -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ALLOCATION_ATTRIBUTES -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="static, automatic, at, common, psect" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "at" /TOKEN
    "automatic" /TOKEN
    "common" /TOKEN
    "psect" /TOKEN
    "static" /TOKEN

END DEFINE

DELETE PLACEHOLDER ALLOCATION_SIZE_FUNCTIONS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ALLOCATION_SIZE_FUNCTIONS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="BITNEXT, BIT_OFFSET, BITSIZE, BYTE_OFFSET, NEXT, SIZE" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "BITNEXT" /TOKEN
    "BIT_OFFSET" /TOKEN
    "BITSIZE" /TOKEN
    "BYTE_OFFSET" /TOKEN
    "NEXT" /TOKEN
    "SIZE" /TOKEN

END DEFINE

DELETE PLACEHOLDER ALL_OPTION -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ALL_OPTION -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="enables/disables all options" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "ALL"
    "NONE"

END DEFINE

DELETE PLACEHOLDER ANONYMOUS_TAG -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ANONYMOUS_TAG -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="unnamed tag field" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{tag_type}"

END DEFINE

DELETE PLACEHOLDER ARGUMENT_NUMBER -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ARGUMENT_NUMBER -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "A positive integer value identifying the argument"

END DEFINE

DELETE PLACEHOLDER ARITHMETIC_FUNCTIONS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ARITHMETIC_FUNCTIONS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="ABS, ARCTAN, COS, EXP, LN, MAX, MIN" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "ABS" /TOKEN
    "ARCTAN" /TOKEN
    "COS" /TOKEN
    "EXP" /TOKEN
    "LN" /TOKEN
    "MAX" /TOKEN
    "MIN" /TOKEN

END DEFINE

DELETE PLACEHOLDER ARITHMETIC_LIST -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ARITHMETIC_LIST -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=", " -
    /TYPE=TERMINAL -

    "An actual parameter of type integer, unsigned, or real"

END DEFINE

DELETE PLACEHOLDER ARITHMETIC_OP -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ARITHMETIC_OP -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="+, -, *, **, /, DIV, REM, MOD" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "+"
    "-"
    "*"
    "**"
    "/"
    "DIV"
    "REM"
    "MOD"

END DEFINE

DELETE PLACEHOLDER ARITHMETIC_PARAMETER -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ARITHMETIC_PARAMETER -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "An actual parameter of type integer, unsigned, or real"

END DEFINE

DELETE PLACEHOLDER ARRAY -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ARRAY -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="group of components of the same type" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[PACKED] ARRAY [{index_ref}...] OF [ [component_attributes]... ] {data_type}"

END DEFINE

DELETE PLACEHOLDER ARRAY_ASSIGNMENT_LIST -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ARRAY_ASSIGNMENT_LIST -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="; " -
    /TYPE=NONTERMINAL -

    "{case_component_list}... : {component_value}"

END DEFINE

DELETE PLACEHOLDER ARRAY_CONSTRUCTOR -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ARRAY_CONSTRUCTOR -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="Extended standard format array constructor" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[ [array_assignment_list]...; [Otherwise] ]"

END DEFINE

DELETE PLACEHOLDER ARRAY_STRUCTURED_CONSTANT -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ARRAY_STRUCTURED_CONSTANT -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="Array constructors" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{type_name}{array_constructor}"

END DEFINE

DELETE PLACEHOLDER ASCENDING_OPTION -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ASCENDING_OPTION -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "ASCENDING"
    "DESCENDING"

END DEFINE

DELETE PLACEHOLDER BASE_DIGIT -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER BASE_DIGIT -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "A valid digit for the base given"

END DEFINE

DELETE PLACEHOLDER BASE_TYPE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER BASE_TYPE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "the ordinal type identifier or type definition from which the"
    "set elements are selected"

END DEFINE

DELETE PLACEHOLDER BASE_TYPE_ID -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER BASE_TYPE_ID -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "the type identifier of the dynamic variable  to which the pointer"
    "type refers; it can be an identifier of any type, a discriminated"
    "schema type, or an undiscriminated schema type"

END DEFINE

DELETE PLACEHOLDER BASE_VALUE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER BASE_VALUE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "A value between 2 and 36"

END DEFINE

DELETE PLACEHOLDER "BIN | HEX | OCT" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "BIN | HEX | OCT" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "BIN"
    "HEX"
    "OCT"

END DEFINE

DELETE PLACEHOLDER "BIN | HEX | OCT | VALUE_EXPR" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "BIN | HEX | OCT | VALUE_EXPR" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "BIN" /TOKEN
    "HEX" /TOKEN
    "OCT" /TOKEN
    "value_expr"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER BINARY -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER BINARY -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="binary notation" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "2#{binary_digits}"

END DEFINE

DELETE PLACEHOLDER BINARY_DIGITS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER BINARY_DIGITS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "Combination of 0's and 1's"

END DEFINE

DELETE PLACEHOLDER BIT_LOCATION -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER BIT_LOCATION -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "constant expression that specifies the bit location, relative to"
    "the beginning of the record, where the field begins"

END DEFINE

DELETE PLACEHOLDER BIT_VECTOR -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER BIT_VECTOR -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "A variable of type PACKED ARRAY OF BOOLEAN with an INTEGER"
    "index type"

END DEFINE

DELETE PLACEHOLDER BLOCK -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER BLOCK -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="declaration_list BEGIN statement_list END" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    " "
    "[declaration_list]..."
    "BEGIN"
    "[statement_list]..."
    "END"

END DEFINE

DELETE PLACEHOLDER BLOCK_OR_DIRECTIVE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER BLOCK_OR_DIRECTIVE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "block"/PLACEHOLDER
    "external_dir"/PLACEHOLDER
    "forward_dir"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER BOOLEAN_VAR -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER BOOLEAN_VAR -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "A variable of type boolean"

END DEFINE

DELETE PLACEHOLDER BOUNDS_OPTION -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER BOUNDS_OPTION -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="enables/disables bounds checking" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "BOUNDS"
    "NOBOUNDS"

END DEFINE

DELETE PLACEHOLDER BRACKET_MARKER -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER BRACKET_MARKER -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="{ comment_string }" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{ {comment_string} }"

END DEFINE

DELETE PLACEHOLDER CARRIAGE_CONTROL -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CARRIAGE_CONTROL -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "LIST"
    "CARRIAGE"
    "FORTRAN"
    "NOCARRIAGE"
    "NONE"

END DEFINE

DELETE PLACEHOLDER "CARRIAGE_CONTROL:=   CARRIAGE_CONTROL" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "CARRIAGE_CONTROL:=   CARRIAGE_CONTROL" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="," -
    /TYPE=NONTERMINAL -

    "CARRIAGE_CONTROL  := {carriage_control}"

END DEFINE

DELETE PLACEHOLDER CARR_CH -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CARR_CH -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=", " -
    /TYPE=MENU -

    "'+'"
    "' '"
    "'0'"
    "'1'"
    "'$'"
    "''(0)"

END DEFINE

DELETE PLACEHOLDER CASE_COMPONENT_LIST -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CASE_COMPONENT_LIST -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="," -
    /TYPE=NONTERMINAL -

    "{index | subrange}"

END DEFINE

DELETE PLACEHOLDER CASE_EXPRESSION -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CASE_EXPRESSION -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="{case_labels}... : {statement}" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR=";" -
    /TYPE=NONTERMINAL -

    "{case_labels}... : {statement}"

END DEFINE

DELETE PLACEHOLDER "CASE_EXPRESSIONS | OTHERWISE_STMT" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "CASE_EXPRESSIONS | OTHERWISE_STMT" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR=";" -
    /TYPE=MENU -

    "%{case_expression}%...%[otherwise_stmt]%"/PLACEHOLDER
    "{otherwise_stmt}"

END DEFINE

DELETE PLACEHOLDER CASE_LABELS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CASE_LABELS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=", " -
    /TYPE=TERMINAL -

    "constant value(s) or a subrange of values of the same ordinal type as the case selector"

END DEFINE

DELETE PLACEHOLDER CASE_LABEL_LIST -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CASE_LABEL_LIST -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR=";" -
    /TYPE=MENU -

    "{case_selector_expressions}"
    "{otherwise_label}"

END DEFINE

DELETE PLACEHOLDER CASE_SELECTOR -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CASE_SELECTOR -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "an expression of ordinal type"

END DEFINE

DELETE PLACEHOLDER CASE_SELECTORS_OPTION -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CASE_SELECTORS_OPTION -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="enables/disables case selector checking" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "CASE_SELECTORS"
    "NOCASE_SELECTORS"

END DEFINE

DELETE PLACEHOLDER CASE_SELECTOR_EXPRESSION -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CASE_SELECTOR_EXPRESSION -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="{field_labels}... : ({field_list})" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR=";" -
    /TYPE=NONTERMINAL -

    "{field_labels}... : ({field_list})"

END DEFINE

DELETE PLACEHOLDER CASE_SELECTOR_EXPRESSIONS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CASE_SELECTOR_EXPRESSIONS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="{field_labels}... : ({field_list})" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR=";" -
    /TYPE=NONTERMINAL -

    "{case_selector_expression}..."
    "[otherwise_label]"

END DEFINE

DELETE PLACEHOLDER CDD_PATHNAME -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CDD_PATHNAME -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "character string representing the path name of the CDD record description"
    "which is to be extracted"

END DEFINE

DELETE PLACEHOLDER CHANGE_ENTRY -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CHANGE_ENTRY -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    " {dd-mmm-yyyy}  |   {nnn}   |  {tbs}"
    "--------------+---------+-------------------------------------------------------"
    "[change_entry]"

END DEFINE

DELETE PLACEHOLDER CHANGE_OPTION -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CHANGE_OPTION -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "CHANGES"
    "NOCHANGES"

END DEFINE

DELETE PLACEHOLDER "CHARACTER SET" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "CHARACTER SET" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="definition of the Pascal character set" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "Any characters from the implementation of the"
    "ASCII character set used by VAX Pascal."

END DEFINE

DELETE PLACEHOLDER CHARSET -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CHARSET -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "A variable with type SET OF CHAR"

END DEFINE

DELETE PLACEHOLDER CHAR_STRING_FUNCTIONS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CHAR_STRING_FUNCTIONS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="BIN, DEC, HEX, INDEX, LENGTH, OCT, PAD, STATUSV, SUBSTR, UDEC" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "BIN" /TOKEN
    "DEC" /TOKEN
    "HEX" /TOKEN
    "INDEX" /TOKEN
    "LENGTH" /TOKEN
    "OCT" /TOKEN
    "PAD" /TOKEN
    "STATUSV" /TOKEN
    "SUBSTR" /TOKEN
    "UDEC" /TOKEN

END DEFINE

DELETE PLACEHOLDER CHAR_STRING_PROCEDURES -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CHAR_STRING_PROCEDURES -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="READV, WRITEV" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "READV" /TOKEN
    "WRITEV" /TOKEN

END DEFINE

DELETE PLACEHOLDER CHECK_OPTIONS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CHECK_OPTIONS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=", " -
    /TYPE=MENU -

    "all_option"/PLACEHOLDER
    "bounds_option"/PLACEHOLDER
    "case_selectors_option"/PLACEHOLDER
    "declarations_option"/PLACEHOLDER
    "overflow_option"/PLACEHOLDER
    "pointers_option"/PLACEHOLDER
    "subrange_option"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER CLOSE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CLOSE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="positional or nonpositional" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "nonpositional_close"/PLACEHOLDER
    "positional_close"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER COMMENT_STRING -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER COMMENT_STRING -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "Any combination of ASCII chars and symbols, excluding the"
    "comment end markers and nonprinting control characters"

END DEFINE

DELETE PLACEHOLDER COMMON_BLOCK -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER COMMON_BLOCK -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "the name of the common block where variables will be shared"

END DEFINE

DELETE PLACEHOLDER COMPILATION_UNIT -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER COMPILATION_UNIT -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "PROGRAM" /TOKEN
    "MODULE" /TOKEN

END DEFINE

DELETE PLACEHOLDER COMPILE_TIME_EXP -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER COMPILE_TIME_EXP -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="operands whose values can be determined when the program is compiled" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "constant_expression"/PLACEHOLDER
    "cte_builtin"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER COMPONENT_ACCESS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER COMPONENT_ACCESS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "A component access may have one of the following forms:"
    "	{[ {value_expr}...]}..."
    "	{.field_identifier}..."
    "	{^}..."

END DEFINE

DELETE PLACEHOLDER COMPONENT_ATTRIBUTES -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER COMPONENT_ATTRIBUTES -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="list of component attributes" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=", " -
    /TYPE=MENU -

    "alignment_attributes"/PLACEHOLDER
    "KEY" /TOKEN
    "POS" /TOKEN
    "READONLY" /TOKEN
    "size_attributes"/PLACEHOLDER
    "UNSAFE" /TOKEN
    "VOLATILE" /TOKEN
    "WRITEONLY" /TOKEN

END DEFINE

DELETE PLACEHOLDER COMPONENT_NUM -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER COMPONENT_NUM -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "positive integer expression indicating the component at which the"
    "file is to be positioned"

END DEFINE

DELETE PLACEHOLDER COMPONENT_VALUE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER COMPONENT_VALUE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "expression"/PLACEHOLDER
    "array_constructor"/PLACEHOLDER
    "record_constructor"/PLACEHOLDER
    "set_constructor"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER COMPOUND -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER COMPOUND -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="BEGIN statement_list END" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "BEGIN"
    "{statement_list}..."
    "END"

END DEFINE

DELETE PLACEHOLDER COMP_UNIT_ATTRIBUTE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER COMP_UNIT_ATTRIBUTE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="list of compilation unit attributes" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=", " -
    /TYPE=MENU -

    "check" /TOKEN
    "double_precision_attributes"/PLACEHOLDER
    "environment" /TOKEN
    "ident" /TOKEN
    "inherit" /TOKEN
    "optimization_attributes"/PLACEHOLDER
    "overlaid" /TOKEN
    "psect" /TOKEN
    "visibility_attributes"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER CONFORMANT_ARRAY -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CONFORMANT_ARRAY -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="ARRAY [index_ref_conformant_list] OF [attributes] type" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "ARRAY [{index_ref_conformant_list}...] OF [ [component_attributes]... ] {type_name_or_conformant}"

END DEFINE

DELETE PLACEHOLDER CONFORMANT_PACKED_ARRAY -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CONFORMANT_PACKED_ARRAY -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="PACKED ARRAY [index_ref_conformant] OF [attributes] type_id" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "PACKED ARRAY [{index_ref_conformant}]"
    "    OF [ [component_attributes]... ] {type_id}"

END DEFINE

DELETE PLACEHOLDER CONFORMANT_PARAMETER -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CONFORMANT_PARAMETER -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="Conformant varying, Conformant packed array, Conformant array" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "conformant_varying"/PLACEHOLDER
    "conformant_packed_array"/PLACEHOLDER
    "conformant_array"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER CONFORMANT_VARYING -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CONFORMANT_VARYING -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="[attributes] VARYING upper_bound OF CHAR" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[ [component_attributes]... ] VARYING [{upper_bound_id}] OF CHAR"

END DEFINE

DELETE PLACEHOLDER CONSTANT -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CONSTANT -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="A constant value or identifier" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "numeric_const"/PLACEHOLDER
    "string_const"/PLACEHOLDER
    "real_const"/PLACEHOLDER
    "constant_access"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER CONSTANT_ACCESS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CONSTANT_ACCESS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="A compoent part of a constant identifier" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "Can be in one of the following forms:"
    "	id{[ {value_expr}... ]}..."
    "	id{.field_identifier}..."
    "	id"

END DEFINE

DELETE PLACEHOLDER CONSTANT_DEFINITION -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CONSTANT_DEFINITION -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR=";" -
    /TYPE=NONTERMINAL -

    "{constant_identifier} = {compile_time_exp}"

END DEFINE

DELETE PLACEHOLDER CONSTANT_EXPRESSION -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CONSTANT_EXPRESSION -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="expression must use constants and/or constant ids" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{const_simple_exp} [{relational_op | IN} const_simple_exp]"

END DEFINE

DELETE PLACEHOLDER CONSTANT_ID -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CONSTANT_ID -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="a const id or const value" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "a predeclared constant identifier or constant value"

END DEFINE

DELETE PLACEHOLDER CONSTANT_IDENTIFIER -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CONSTANT_IDENTIFIER -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "the identifier of the symbolic constant being defined"

END DEFINE

DELETE PLACEHOLDER CONST_EXP_LIST -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CONST_EXP_LIST -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR="," -
    /TYPE=NONTERMINAL -

    "{compile_time_exp}"

END DEFINE

DELETE PLACEHOLDER CONST_FACTOR -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CONST_FACTOR -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR="" -
    /TYPE=MENU -

    "constant_id"/PLACEHOLDER
    "not_const_factor"/PLACEHOLDER
    "numeric_const"/PLACEHOLDER
    "real_const"/PLACEHOLDER
    "string_const"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER CONST_PRIMARY -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CONST_PRIMARY -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{const_factor}**[const_factor]..."

END DEFINE

DELETE PLACEHOLDER CONST_SIMPLE_EXP -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CONST_SIMPLE_EXP -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[sign]{const_term} [{sign | OR} const_term]..."

END DEFINE

DELETE PLACEHOLDER CONST_TERM -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CONST_TERM -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{const_primary} [primary_op const_primary]..."

END DEFINE

DELETE PLACEHOLDER CONTROL_VAR -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CONTROL_VAR -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "the name of a previously declared variable of an ordinal type"

END DEFINE

DELETE PLACEHOLDER CONVERT_TYPE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CONVERT_TYPE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "An expression to be converted; can be of any type except"
    "a varying of char, a conformant array schema or conformant"
    "varying schema"

END DEFINE

DELETE PLACEHOLDER CTE_ALLOCATION_FUNCTIONS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CTE_ALLOCATION_FUNCTIONS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="must be used with constants or constant ids" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "bitnext" /TOKEN
    "bitsize" /TOKEN
    "bit_offset" /TOKEN
    "byte_offset" /TOKEN
    "next" /TOKEN
    "size" /TOKEN

END DEFINE

DELETE PLACEHOLDER CTE_ARITHMETIC_FUNCTIONS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CTE_ARITHMETIC_FUNCTIONS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="must be used with constants or constant ids" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "abs" /TOKEN
    "arctan" /TOKEN
    "cos" /TOKEN
    "exp" /TOKEN
    "ln" /TOKEN
    "max" /TOKEN
    "min" /TOKEN

END DEFINE

DELETE PLACEHOLDER CTE_BUILTIN -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CTE_BUILTIN -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="must be used with constants or constant ids" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "cte_allocation_functions"/PLACEHOLDER
    "cte_arithmetic_functions"/PLACEHOLDER
    "cte_more_arithmetic_functions"/PLACEHOLDER
    "cte_ordinal_functions"/PLACEHOLDER
    "cte_string_functions"/PLACEHOLDER
    "cte_transfer_functions"/PLACEHOLDER
    "cte_misc_functions"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER CTE_MISC_FUNCTIONS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CTE_MISC_FUNCTIONS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="must be used with constants or constant ids" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "card" /TOKEN
    "expo" /TOKEN
    "odd" /TOKEN
    "zero" /TOKEN

END DEFINE

DELETE PLACEHOLDER CTE_MORE_ARITHMETIC_FUNCTIONS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CTE_MORE_ARITHMETIC_FUNCTIONS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="must be used with constants or constant ids" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "sin" /TOKEN
    "sqr" /TOKEN
    "sqrt" /TOKEN
    "uand" /TOKEN
    "unot" /TOKEN
    "uor" /TOKEN
    "uxor" /TOKEN
    "xor" /TOKEN

END DEFINE

DELETE PLACEHOLDER CTE_ORDINAL_FUNCTIONS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CTE_ORDINAL_FUNCTIONS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="must be used with constants or constant ids" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "pred" /TOKEN
    "succ" /TOKEN

END DEFINE

DELETE PLACEHOLDER CTE_STRING_FUNCTIONS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CTE_STRING_FUNCTIONS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="must be used with constants or constant ids" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "index" /TOKEN
    "length" /TOKEN
    "pad" /TOKEN
    "substr" /TOKEN

END DEFINE

DELETE PLACEHOLDER CTE_TRANSFER_FUNCTIONS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER CTE_TRANSFER_FUNCTIONS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="must be used with constants or constant ids" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "chr" /TOKEN
    "dble" /TOKEN
    "int" /TOKEN
    "ord" /TOKEN
    "quad" /TOKEN
    "round" /TOKEN
    "sngl" /TOKEN
    "trunc" /TOKEN
    "uint" /TOKEN
    "uround" /TOKEN
    "utrunc" /TOKEN

END DEFINE

DELETE PLACEHOLDER DATA_TYPE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER DATA_TYPE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="ordinal, real, structured, pointer, user_defined" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "ordinal_type"/PLACEHOLDER
    "real_type"/PLACEHOLDER
    "structured_type"/PLACEHOLDER
    "pointer_type"/PLACEHOLDER
    "string_type"/PLACEHOLDER
    "user_defined_type"/PLACEHOLDER
    "discriminated_schema_type" /TOKEN
    "timestamp" /TOKEN

END DEFINE

DELETE PLACEHOLDER DATETIME_STRING -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER DATETIME_STRING -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "A string containing a date and/or time; default is date and"
    "time of program execution"

END DEFINE

DELETE PLACEHOLDER "DD-MMM-YYYY" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "DD-MMM-YYYY" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "Enter the date (i.e. 01-Jan-1985)"

END DEFINE

DELETE PLACEHOLDER DECIMAL_DIGITS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER DECIMAL_DIGITS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="decimal notation" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "Combination of digits: 0 1 2 3 4 5 6 7 8 9"

END DEFINE

DELETE PLACEHOLDER DECLARATIONS_OPTION -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER DECLARATIONS_OPTION -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="enables/disables declarations checking" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "DECLARATIONS"
    "NODECLARATIONS"

END DEFINE

DELETE PLACEHOLDER DECLARATION_LIST -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER DECLARATION_LIST -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR="" -
    /TYPE=MENU -

    "LABEL" /TOKEN
    "CONST" /TOKEN
    "TYPE" /TOKEN
    "VAR" /TOKEN
    "PROCEDURE" /TOKEN
    "FUNCTION" /TOKEN
    "VALUE_DECLARATION_SECTION" /TOKEN

END DEFINE

DELETE PLACEHOLDER "DEFAULT         :=   FILE_SPEC" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "DEFAULT         :=   FILE_SPEC" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="," -
    /TYPE=NONTERMINAL -

    "DEFAULT           := '{file spec}'"

END DEFINE

DELETE PLACEHOLDER DESCRIPTION_OR_NONE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER DESCRIPTION_OR_NONE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "NONE"

END DEFINE

DELETE PLACEHOLDER DESIGNATE_ID -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER DESIGNATE_ID -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "program section in which storage for an object is to be allocated"

END DEFINE

DELETE PLACEHOLDER DICTIONARY_DIRECTIVE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER DICTIONARY_DIRECTIVE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="allows using types defined in other languages" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "%DICTIONARY '{cdd_pathname}[ [NO]

END DEFINE

DELETE PLACEHOLDER DICT_EXTRACTION -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER DICT_EXTRACTION -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="CDD record extraction" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{dictionary_directive}"

END DEFINE

DELETE PLACEHOLDER DIGITS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER DIGITS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=", " -
    /TYPE=NONTERMINAL -

    "{significant_digits}"

END DEFINE

DELETE PLACEHOLDER DIRECT_ACCESS_PROCEDURES -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER DIRECT_ACCESS_PROCEDURES -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="DELETE, FIND, LOCATE, UPDATE" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "DELETE" /TOKEN
    "FIND" /TOKEN
    "LOCATE" /TOKEN
    "UPDATE" /TOKEN

END DEFINE

DELETE PLACEHOLDER DISCRIMINANT_ID -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER DISCRIMINANT_ID -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=", " -
    /TYPE=TERMINAL -

    "A valid discriminant name"

END DEFINE

DELETE PLACEHOLDER DISPOSE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER DISPOSE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="dispose pointer, dispose ptr to a record with a variant" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "DISPOSE_PTR" /TOKEN
    "DISPOSE_REC_WITH_VARIANT" /TOKEN

END DEFINE

DELETE PLACEHOLDER DISPOSITION -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER DISPOSITION -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "SAVE"
    "DELETE"
    "PRINT"
    "PRINT_DELETE"
    "SUBMIT"
    "SUBMIT_DELETE"

END DEFINE

DELETE PLACEHOLDER "DISPOSITION     :=   DISPOSITION" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "DISPOSITION     :=   DISPOSITION" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="," -
    /TYPE=NONTERMINAL -

    "DISPOSITION       := {disposition}"

END DEFINE

DELETE PLACEHOLDER DOUBLE_PRECISION_ATTRIBUTES -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER DOUBLE_PRECISION_ATTRIBUTES -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="g_floating, nog_floating" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "g_floating" /TOKEN
    "nog_floating" /TOKEN

END DEFINE

DELETE PLACEHOLDER DUPLICATE_OPTION -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER DUPLICATE_OPTION -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "DUPLICATES"
    "NODUPLICATES"

END DEFINE

DELETE PLACEHOLDER DYNAMIC_FUNCTIONS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER DYNAMIC_FUNCTIONS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="ADDRESS, DISPOSE, IADDRESS, NEW" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "ADDRESS" /TOKEN
    "DISPOSE" /TOKEN
    "IADDRESS" /TOKEN
    "NEW" /TOKEN

END DEFINE

DELETE PLACEHOLDER DYNAMIC_OR_VARIABLE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER DYNAMIC_OR_VARIABLE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "Pointer that refers to either a dynamic variable allocated by the"
    "NEW procedure or to variables that have the VOLATILE attribute"

END DEFINE

DELETE PLACEHOLDER ENUMERATION_IDS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ENUMERATION_IDS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=", " -
    /TYPE=TERMINAL -

    "a constant value of the specified type"

END DEFINE

DELETE PLACEHOLDER ENVIRON_NAME_STRING -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ENVIRON_NAME_STRING -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "a sequence of characters that specify the file created"
    "(from the program with the ENVIRONMENT attribute) that will be"
    "inherited by another program. The default file type is .PEN"

END DEFINE

DELETE PLACEHOLDER "ERROR           :=   ERROR_RECOVERY" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "ERROR           :=   ERROR_RECOVERY" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="," -
    /TYPE=NONTERMINAL -

    "ERROR             := {error_recovery}"

END DEFINE

DELETE PLACEHOLDER "ERROR := ERROR_RECOVERY" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "ERROR := ERROR_RECOVERY" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=", " -
    /TYPE=NONTERMINAL -

    "ERROR := {error_recovery}"

END DEFINE

DELETE PLACEHOLDER ERROR_RECOVERY -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ERROR_RECOVERY -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=", " -
    /TYPE=MENU -

    "CONTINUE"
    "MESSAGE"

END DEFINE

DELETE PLACEHOLDER ERROR_RETURN -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ERROR_RETURN -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=", " -
    /TYPE=TERMINAL -

    "Name of a variable to hold the VMS error recovery code"

END DEFINE

DELETE PLACEHOLDER ESTABLISH_FUNC_ID -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ESTABLISH_FUNC_ID -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "Name of a function with the ASYNCHRONOUS attribute"

END DEFINE

DELETE PLACEHOLDER EXACT_ADDRESS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER EXACT_ADDRESS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "constant expression expressing the exact address where the"
    "variable is located"

END DEFINE

DELETE PLACEHOLDER EXPRESSION -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER EXPRESSION -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="operands or data items combined with operators" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{simple_expression} [{relational_op | IN} simple_expression]"

END DEFINE

DELETE PLACEHOLDER "EXPRESSION : %[EXPRESSION]%" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "EXPRESSION : %[EXPRESSION]%" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{value_expr} : [expression]"

END DEFINE

DELETE PLACEHOLDER EXP_TYPE_CAST -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER EXP_TYPE_CAST -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="expression type cast" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "({value_expr}) :: {target_type}"

END DEFINE

DELETE PLACEHOLDER EXTENDED_DIGIT -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER EXTENDED_DIGIT -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="A constant in base 2 through 36" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{base_value}#{base_digit}"

END DEFINE

DELETE PLACEHOLDER EXTERNAL_DIR -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER EXTERNAL_DIR -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="routine is external to the program" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "EXTERNAL"

END DEFINE

DELETE PLACEHOLDER FACTOR -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER FACTOR -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR="" -
    /TYPE=MENU -

    "variable"/PLACEHOLDER
    "constant"/PLACEHOLDER
    "NOT factor"/PLACEHOLDER
    "( expression )"/PLACEHOLDER
    "function_id"/PLACEHOLDER
    "structured_constant"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER FIELD_COMPONENTS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER FIELD_COMPONENTS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR=";" -
    /TYPE=NONTERMINAL -

    "{field_id}... : [ [component_attributes]... ] {data_type} [VALUE initial_value]"

END DEFINE

DELETE PLACEHOLDER FIELD_ID -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER FIELD_ID -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=", " -
    /TYPE=NONTERMINAL -

    "{user_defined_id}"

END DEFINE

DELETE PLACEHOLDER FIELD_IDENTIFIER -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER FIELD_IDENTIFIER -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=", " -
    /TYPE=TERMINAL -

    "The name of a field within the record"

END DEFINE

DELETE PLACEHOLDER FIELD_LABELS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER FIELD_LABELS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=", " -
    /TYPE=TERMINAL -

    "constant value(s) or a subrange of values of the tag field type"

END DEFINE

DELETE PLACEHOLDER FIELD_LIST -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER FIELD_LIST -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="record components and a possible variant clause" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[field_components]..."
    "[variant_clause]"

END DEFINE

DELETE PLACEHOLDER FIELD_LIST_OR_DICT_EXTRACTION -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER FIELD_LIST_OR_DICT_EXTRACTION -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR=";" -
    /TYPE=MENU -

    "dict_extraction"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER FILE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER FILE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="file of, text" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "FILE_OF" /TOKEN
    "TEXT" /TOKEN

END DEFINE

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

    "information about the file for the operating system"

END DEFINE

DELETE PLACEHOLDER FILE_COMPONENT_TYPE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER FILE_COMPONENT_TYPE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "ordinal_type"/PLACEHOLDER
    "real_type"/PLACEHOLDER
    "pointer_type"/PLACEHOLDER
    "file_of_records"/PLACEHOLDER
    "file_of_arrays"/PLACEHOLDER
    "varying_of_char"/PLACEHOLDER
    "set"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER FILE_HISTORY -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER FILE_HISTORY -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "OLD"
    "NEW"
    "READONLY"
    "UNKNOWN"

END DEFINE

DELETE PLACEHOLDER FILE_NAME -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER FILE_NAME -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "character string expression that contains a VAX/VMS file"
    "specification of a logical name"

END DEFINE

DELETE PLACEHOLDER "FILE_NAME       :=   FILE_NAME" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "FILE_NAME       :=   FILE_NAME" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="," -
    /TYPE=NONTERMINAL -

    "FILE_NAME         := {file_name}"

END DEFINE

DELETE PLACEHOLDER FILE_OF_ARRAYS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER FILE_OF_ARRAYS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="array with NO file component type" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{array}"

END DEFINE

DELETE PLACEHOLDER FILE_OF_RECORDS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER FILE_OF_RECORDS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="record with NO file component type" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{record}"

END DEFINE

DELETE PLACEHOLDER FILE_SHARING -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER FILE_SHARING -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "READONLY"
    "READWRITE"
    "NONE"

END DEFINE

DELETE PLACEHOLDER FILE_SPECIFICATION -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER FILE_SPECIFICATION -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "A name of a file"

END DEFINE

DELETE PLACEHOLDER FILE_VARIABLE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER FILE_VARIABLE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=", " -
    /TYPE=TERMINAL -

    "the name of the file variable which is associated with the"
    "file being manipulated"

END DEFINE

DELETE PLACEHOLDER FILL_CHAR -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER FILL_CHAR -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "An expression of type char to be used as the fill character"

END DEFINE

DELETE PLACEHOLDER FINAL_LENGTH -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER FINAL_LENGTH -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "An integer parameter indicating the length of the resulting string"

END DEFINE

DELETE PLACEHOLDER "FINAL_LENGTH %[DIGITS]%" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "FINAL_LENGTH %[DIGITS]%" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=", " -
    /TYPE=NONTERMINAL -

    "{final_length}, [digits]"

END DEFINE

DELETE PLACEHOLDER FIXED_PART_LIST -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER FIXED_PART_LIST -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR="; " -
    /TYPE=NONTERMINAL -

    "{field_identifier}... : {component_value}"

END DEFINE

DELETE PLACEHOLDER FOREIGN_PARAMETER -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER FOREIGN_PARAMETER -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="mech_specifier {value_par | proc_par | func_par}" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{mechanism_specifier} {foreign_parm}"

END DEFINE

DELETE PLACEHOLDER FOREIGN_PARM -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER FOREIGN_PARM -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "value_parameter"/PLACEHOLDER
    "procedure_parameter"/PLACEHOLDER
    "function_parameter"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "FORMAL PARAMETERS" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "FORMAL PARAMETERS" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="Formal parameters for routine" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "FORMAL PARAMETERS:"
    " "
    "   {subtags}"

END DEFINE

DELETE PLACEHOLDER FORMAL_DISCRIMINANT_ID -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER FORMAL_DISCRIMINANT_ID -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "A formal discriminant of the current schema definition"

END DEFINE

DELETE PLACEHOLDER FORMAL_DISCRIMINANT_TAG -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER FORMAL_DISCRIMINANT_TAG -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="tag based on actual discriminant value" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{formal_discriminant_id}"

END DEFINE

DELETE PLACEHOLDER FORMAL_PARAMETERS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER FORMAL_PARAMETERS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR="; " -
    /TYPE=MENU -

    "var_parameter"/PLACEHOLDER
    "value_parameter"/PLACEHOLDER
    "procedure_parameter"/PLACEHOLDER
    "function_parameter"/PLACEHOLDER
    "foreign_parameter"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER FORMAL_PARAM_ATTRIBUTES -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER FORMAL_PARAM_ATTRIBUTES -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="list of formal parameter attributes" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=", " -
    /TYPE=MENU -

    "aligned" /TOKEN
    "list_attribute" /TOKEN
    "parameter_passing_attributes"/PLACEHOLDER
    "readonly" /TOKEN
    "size_attributes"/PLACEHOLDER
    "truncate_attribute" /TOKEN
    "unsafe" /TOKEN
    "volatile" /TOKEN
    "writeonly" /TOKEN

END DEFINE

DELETE PLACEHOLDER FORWARD_DIR -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER FORWARD_DIR -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="routine can be referred to before it's block is defined" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "FORWARD"

END DEFINE

DELETE PLACEHOLDER FUNCTION_ID -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER FUNCTION_ID -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="a function identifier" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{func_id}( [actual_parameter] )[component_access]"

END DEFINE

DELETE PLACEHOLDER FUNCTION_LEVEL_COMMENTS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER FUNCTION_LEVEL_COMMENTS -
    /LANGUAGE="Pascal" -
    /PLACEHOLDER=STANDARD_FUNCTION_LEVEL_COMMENTS

END DEFINE
DELETE PLACEHOLDER FUNCTION_PARAMETER -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER FUNCTION_PARAMETER -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="func_heading [:= [mech_specifier] initial_val]" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[ [routine_attribute]... ]"
    "FUNCTION {user_defined_id}"
    "    ( [formal_parameters]... ) :[ [func_result_attributes]... ] {func_type_id}"
    "[:= [mechanism_specifier] initial_value]"

END DEFINE

DELETE PLACEHOLDER FUNC_ID -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER FUNC_ID -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "the name of a user declared function"

END DEFINE

DELETE PLACEHOLDER FUNC_RESULT_ATTRIBUTES -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER FUNC_RESULT_ATTRIBUTES -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="list of function result attributes" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=", " -
    /TYPE=MENU -

    "alignment_attributes"/PLACEHOLDER
    "size_attributes"/PLACEHOLDER
    "unsafe" /TOKEN
    "volatile" /TOKEN

END DEFINE

DELETE PLACEHOLDER FUNC_TYPE_ID -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER FUNC_TYPE_ID -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "the type identifier of the function result which can be any"
    "type except a file type or a structured type with a file"
    "component"

END DEFINE

DELETE PLACEHOLDER GENERAL_PROCEDURES -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER GENERAL_PROCEDURES -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="OPEN, CLOSE" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "OPEN" /TOKEN
    "CLOSE" /TOKEN

END DEFINE

DELETE PLACEHOLDER HEADER_LEVEL_COMMENTS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER HEADER_LEVEL_COMMENTS -
    /LANGUAGE="Pascal" -
    /PLACEHOLDER=STANDARD_HEADER_LEVEL_COMMENTS

END DEFINE
DELETE PLACEHOLDER HEXADECIMAL -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER HEXADECIMAL -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="hexadecimal notation" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "16#{hex_digits}"

END DEFINE

DELETE PLACEHOLDER HEX_DIGITS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER HEX_DIGITS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "Combination of: A B C D E F a b c d e f,"
    "and decimal digits"

END DEFINE

DELETE PLACEHOLDER "HISTORY         :=   FILE_HISTORY" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "HISTORY         :=   FILE_HISTORY" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="," -
    /TYPE=NONTERMINAL -

    "HISTORY           := {file_history}"

END DEFINE

DELETE PLACEHOLDER "I/O_FUNCTIONS" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "I/O_FUNCTIONS" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="EOLN and miscellaneous functions" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "miscellaneous_functions"/PLACEHOLDER
    "EOLN" /TOKEN

END DEFINE

DELETE PLACEHOLDER "I/O_PROCEDURES" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "I/O_PROCEDURES" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="input and output procedures" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "general_procedures"/PLACEHOLDER
    "sequential_access_input_procedures"/PLACEHOLDER
    "sequential_access_output_procedures"/PLACEHOLDER
    "miscellaneous_procedures"/PLACEHOLDER
    "text_file_procedures"/PLACEHOLDER
    "direct_access_procedures"/PLACEHOLDER
    "location_access_procedures"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER IDENTIFIERS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER IDENTIFIERS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="Pascal identifiers" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "user_defined_id"/PLACEHOLDER
    "predeclared_id"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER IDENT_NAME_STRING -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER IDENT_NAME_STRING -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "a string used to supply identification information to the"
    "linker"

END DEFINE

DELETE PLACEHOLDER ID_LIST -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ID_LIST -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=", " -
    /TYPE=NONTERMINAL -

    "{user_defined_id}"

END DEFINE

DELETE PLACEHOLDER INCLUDE_FILE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER INCLUDE_FILE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "%INCLUDE '{include_file_spec}[ [NO]

END DEFINE

DELETE PLACEHOLDER INCLUDE_FILE_SPEC -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER INCLUDE_FILE_SPEC -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "name of a file to be included"

END DEFINE

DELETE PLACEHOLDER INCLUDE_LIBRARY_MODULE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER INCLUDE_LIBRARY_MODULE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "%INCLUDE '[include_file_spec]({module_name})[ [NO]

END DEFINE

DELETE PLACEHOLDER "INDEX | SUBRANGE" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "INDEX | SUBRANGE" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="," -
    /TYPE=TERMINAL -

    "Enter a valid index value or subrange of indices"

END DEFINE

DELETE PLACEHOLDER INDEX_REF -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER INDEX_REF -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=", " -
    /TYPE=NONTERMINAL -

    "[unsafe_attr] {index_type}"

END DEFINE

DELETE PLACEHOLDER INDEX_REF_CONFORMANT -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER INDEX_REF_CONFORMANT -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{lower_bound_id}..{upper_bound_id} : [unsafe_attr] {index_type}"

END DEFINE

DELETE PLACEHOLDER INDEX_REF_CONFORMANT_LIST -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER INDEX_REF_CONFORMANT_LIST -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR=";" -
    /TYPE=NONTERMINAL -

    "{index_ref_conformant}"

END DEFINE

DELETE PLACEHOLDER INDEX_TYPE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER INDEX_TYPE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "the type of the index, which can be any ordinal type"

END DEFINE

DELETE PLACEHOLDER INHERIT_NAME_STRING -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER INHERIT_NAME_STRING -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "specifies the name of the environment file to be inherited by"
    "a program with the INHERIT attribute"

END DEFINE

DELETE PLACEHOLDER INHERIT_NAME_STRINGS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER INHERIT_NAME_STRINGS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=", " -
    /TYPE=NONTERMINAL -

    "'{inherit_name_string}'"

END DEFINE

DELETE PLACEHOLDER INITIAL_VALUE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER INITIAL_VALUE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=", " -
    /TYPE=MENU -

    "compile_time_exp"/PLACEHOLDER
    "array_constructor"/PLACEHOLDER
    "record_constructor"/PLACEHOLDER
    "set_constructor"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER INLINE_OPTION -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER INLINE_OPTION -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="enables/disables inline expansion of user_defined routines" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "INLINE"
    "NOINLINE"

END DEFINE

DELETE PLACEHOLDER INTERLOCKED_FUNCTIONS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER INTERLOCKED_FUNCTIONS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="ADD_INTERLOCKED, CLEAR_INTERLOCKED, SET_INTERLOCKED" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "ADD_INTERLOCKED" /TOKEN
    "CLEAR_INTERLOCKED" /TOKEN
    "SET_INTERLOCKED" /TOKEN

END DEFINE

DELETE PLACEHOLDER INT_OR_UNS_PARM -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER INT_OR_UNS_PARM -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "Actual parameter of type integer or unsigned"

END DEFINE

DELETE PLACEHOLDER IN_OUT_STATEMENTS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER IN_OUT_STATEMENTS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="input/output procedures, input/output functions" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "i/o_procedures"/PLACEHOLDER
    "i/o_functions"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER ITERATION_CLAUSE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ITERATION_CLAUSE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "sequence_to"/PLACEHOLDER
    "sequence_downto"/PLACEHOLDER
    "set_member_clause"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER KEY_NUM -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER KEY_NUM -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "positive integer indicating the key position"

END DEFINE

DELETE PLACEHOLDER KEY_NUM_VALUE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER KEY_NUM_VALUE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "A number indicating the key (0 for the field that is primary,"
    "all others are alternates)"

END DEFINE

DELETE PLACEHOLDER KEY_OPTIONS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER KEY_OPTIONS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=", " -
    /TYPE=MENU -

    "Ascending_Option"/PLACEHOLDER
    "Change_Option"/PLACEHOLDER
    "Duplicate_Option"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER KEY_OPTION_LIST -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER KEY_OPTION_LIST -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[key_num_value] , [key_options]..."

END DEFINE

DELETE PLACEHOLDER KEY_VAL -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER KEY_VAL -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "expression indicating the key to be found"

END DEFINE

DELETE PLACEHOLDER LABELED_STATEMENT -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER LABELED_STATEMENT -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="simple or structured statement preceded by a label" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[statement_label] : "
    "{statement_list}..."

END DEFINE

DELETE PLACEHOLDER LABEL_NAME -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER LABEL_NAME -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=", " -
    /TYPE=TERMINAL -

    "any decimal integer between 0 and 65,535 or a symbolic constant"

END DEFINE

DELETE PLACEHOLDER LEX_ELEMENTS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER LEX_ELEMENTS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "character set"/PLACEHOLDER
    "special_symbols"/PLACEHOLDER
    "reserved_words"/PLACEHOLDER
    "identifiers"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER LINKER_ID -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER LINKER_ID -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "name by which the corresponding object is known to the linker"

END DEFINE

DELETE PLACEHOLDER LIST -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER LIST -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="included declarations listed with program" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "

END DEFINE

DELETE PLACEHOLDER LOCATION_ACCESS_PROCEDURES -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER LOCATION_ACCESS_PROCEDURES -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="FINDK, RESETK" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "FINDK" /TOKEN
    "RESETK" /TOKEN

END DEFINE

DELETE PLACEHOLDER LOGICAL_OP -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER LOGICAL_OP -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="AND, AND_THEN, OR, OR_ELSE, NOT" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "AND"
    "AND_THEN"
    "OR"
    "OR_ELSE"
    "NOT"

END DEFINE

DELETE PLACEHOLDER LOGICAL_PROPERTIES -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER LOGICAL_PROPERTIES -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR="" -
    /TYPE=MENU -

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

END DEFINE

DELETE PLACEHOLDER LOWER_BOUND_ID -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER LOWER_BOUND_ID -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "an identifier that represents the lower bound of the array's index"

END DEFINE

DELETE PLACEHOLDER LOWER_SUB_BOUND -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER LOWER_SUB_BOUND -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "a constant expression that establishes the lower limit of"
    "the subrange"

END DEFINE

DELETE PLACEHOLDER LOW_LEVEL -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER LOW_LEVEL -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="FIND_FIRST_BIT_CLEAR, FIND_FIRST_BIT_SET, FIND_MEMBER, FIND_NONMEMBER MFPR" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "FIND_FIRST_BIT_CLEAR" /TOKEN
    "FIND_FIRST_BIT_SET" /TOKEN
    "FIND_MEMBER" /TOKEN
    "FIND_NONMEMBER" /TOKEN
    "MFPR" /TOKEN

END DEFINE

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

    "{"
    "  [tbs]"
    "}"

END DEFINE

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

    "[tbs]"

END DEFINE

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

    "{	[tbs]	}"

END DEFINE

DELETE PLACEHOLDER MATCH -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER MATCH -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=", " -
    /TYPE=NONTERMINAL -

    "{match_type}"

END DEFINE

DELETE PLACEHOLDER MATCH_TYPE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER MATCH_TYPE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "EQL"
    "NXT"
    "NXTEQL"

END DEFINE

DELETE PLACEHOLDER MECHANISM_SPECIFIER -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER MECHANISM_SPECIFIER -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "%descr"/PLACEHOLDER
    "%immed"/PLACEHOLDER
    "%ref"/PLACEHOLDER
    "%stdescr"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER MISCELLANEOUS_FUNCTIONS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER MISCELLANEOUS_FUNCTIONS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="EOF, STATUS, UFB" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "EOF" /TOKEN
    "STATUS" /TOKEN
    "UFB" /TOKEN

END DEFINE

DELETE PLACEHOLDER MISCELLANEOUS_PROCEDURES -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER MISCELLANEOUS_PROCEDURES -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="TRUNCATE, UNLOCK" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "TRUNCATE" /TOKEN
    "UNLOCK" /TOKEN

END DEFINE

DELETE PLACEHOLDER MISC_FUNCTIONS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER MISC_FUNCTIONS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="CARD, CLOCK, EXPO, ODD, TIME, DATE, UNDEFINED, ZERO" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "CARD" /TOKEN
    "CLOCK" /TOKEN
    "DATE_FUNC" /TOKEN
    "EXPO" /TOKEN
    "LOWER" /TOKEN
    "ODD" /TOKEN
    "TIME_FUNC" /TOKEN
    "UNDEFINED" /TOKEN
    "UPPER" /TOKEN
    "ZERO" /TOKEN

END DEFINE

DELETE PLACEHOLDER MISC_PROCEDURES -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER MISC_PROCEDURES -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="CREATE_DIRECTORY, DATE, DELETE_FILE, ESTABLISH, HALT, MTPR, RENAME_FILE, REVERT, TIME" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "CREATE_DIRECTORY" /TOKEN
    "DATE_PROC" /TOKEN
    "DELETE_FILE" /TOKEN
    "ESTABLISH" /TOKEN
    "GETTIMESTAMP" /TOKEN
    "HALT" /TOKEN
    "MTPR" /TOKEN
    "RENAME_FILE" /TOKEN
    "REVERT" /TOKEN
    "TIME_PROC" /TOKEN

END DEFINE

DELETE PLACEHOLDER MODULE_FINALIZATION -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER MODULE_FINALIZATION -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="Module finalization section" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "TO END DO"
    "    {statement};"

END DEFINE

DELETE PLACEHOLDER MODULE_INITIALIZATION -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER MODULE_INITIALIZATION -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="Module initialization section" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "TO BEGIN DO"
    "    {statement};"

END DEFINE

DELETE PLACEHOLDER MODULE_NAME -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER MODULE_NAME -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "name of a text module located in a text library"

END DEFINE

DELETE PLACEHOLDER MORE_ARITHMETIC_FUNCTIONS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER MORE_ARITHMETIC_FUNCTIONS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="SIN, SQR, SQRT, UAND, UNOT, UOR, UXOR, XOR" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "SIN" /TOKEN
    "SQR" /TOKEN
    "SQRT" /TOKEN
    "UAND" /TOKEN
    "UNOT" /TOKEN
    "UOR" /TOKEN
    "UXOR" /TOKEN
    "XOR" /TOKEN

END DEFINE

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

    " "
    "{identifiers}:"
    "	{tbs}"

END DEFINE

DELETE PLACEHOLDER MORE_TRANSFER_FUNCTIONS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER MORE_TRANSFER_FUNCTIONS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="TRUNC, UINT, UROUND, UTRUNC" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "TRUNC" /TOKEN
    "UINT" /TOKEN
    "UROUND" /TOKEN
    "UTRUNC" /TOKEN

END DEFINE

DELETE PLACEHOLDER NAMED_TAG -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER NAMED_TAG -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="named tag field" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{tag_id} : [unsafe_attr] {tag_type}"

END DEFINE

DELETE PLACEHOLDER NAME_STRING -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER NAME_STRING -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="a quoted string" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "'[name_string_type]'"

END DEFINE

DELETE PLACEHOLDER "NAME_STRING (%{CONST_EXP_LIST}%...)" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "NAME_STRING (%{CONST_EXP_LIST}%...)" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{name_string} ({const_exp_list}...)"

END DEFINE

DELETE PLACEHOLDER NAME_STRINGS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER NAME_STRINGS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="a list of strings and constant expressions" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{name_string ({const_exp_list}...)}...[name_string]"

END DEFINE

DELETE PLACEHOLDER NAME_STRING_TYPE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER NAME_STRING_TYPE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "Spaces, tabs, quotes or any printing characters other than"
    "a single apostrophe (ie, apostrophe expressed as '')"

END DEFINE

DELETE PLACEHOLDER NEW -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER NEW -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="new pointer, new ptr on a record with a variant" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "NEW_PTR" /TOKEN
    "NEW_PTR_UNDISCRIMINATED_SCHEMA" /TOKEN
    "NEW_REC_WITH_VARIANT" /TOKEN

END DEFINE

DELETE PLACEHOLDER NEW_FILE_NAME -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER NEW_FILE_NAME -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "New file specification"

END DEFINE

DELETE PLACEHOLDER NEW_TYPE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER NEW_TYPE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="a new type, either subrange or structured" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "subrange" /TOKEN
    "record" /TOKEN
    "array" /TOKEN
    "set" /TOKEN
    "file" /TOKEN

END DEFINE

DELETE PLACEHOLDER NNN -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER NNN -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "Enter initials"

END DEFINE

DELETE PLACEHOLDER NOLIST -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER NOLIST -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="included declarations not listed with program" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "

END DEFINE

DELETE PLACEHOLDER NONPOSITIONAL_CLOSE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER NONPOSITIONAL_CLOSE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="close procedure with parameter names" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "CLOSE( FILE_VARIABLE     := {file_variable},"
    "       [disposition     :=   disposition],"
    "       [user_action     :=   user_action],"
    "       [error           :=   error_recovery] )"

END DEFINE

DELETE PLACEHOLDER NONPOSITIONAL_OPEN -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER NONPOSITIONAL_OPEN -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="open procedure with parameter names" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "OPEN( FILE_VARIABLE     := {file_variable},"
    "      [file_name       :=   file_name],"
    "      [history         :=   file_history],"
    "      [record_length   :=   record_length],"
    "      [access_method   :=   access_method],"
    "      [record_type     :=   record_type],"
    "      [carriage_control:=   carriage_control],"
    "      [organization    :=   organization],"
    "      [disposition     :=   disposition],"
    "      [sharing         :=   file_sharing],"
    "      [user_action     :=   user_action],"
    "      [default         :=   file_spec],"
    "      [error           :=   error_recovery] )"

END DEFINE

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

    "NOT {factor}"

END DEFINE

DELETE PLACEHOLDER NOT_CONST_FACTOR -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER NOT_CONST_FACTOR -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="NOT of a constant factor" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "NOT {const_factor}"

END DEFINE

DELETE PLACEHOLDER NUMERIC_CONST -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER NUMERIC_CONST -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="a numeric value" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "decimal_digits"/PLACEHOLDER
    "octal"/PLACEHOLDER
    "hexadecimal"/PLACEHOLDER
    "binary"/PLACEHOLDER
    "extended_digit"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER NUM_OF_LINES -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER NUM_OF_LINES -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "a positive integer expression indicating the number of lines to"
    "be written to the file before execution terminates"

END DEFINE

DELETE PLACEHOLDER OBJECT -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER OBJECT -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "A character string expression to be searched"

END DEFINE

DELETE PLACEHOLDER OCTAL -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER OCTAL -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="octal notation" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "8#{octal_digits}"

END DEFINE

DELETE PLACEHOLDER OCTAL_DIGITS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER OCTAL_DIGITS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "Combination of digits: 0 1 2 3 4 5 6 7"

END DEFINE

DELETE PLACEHOLDER OLD_FILE_NAME -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER OLD_FILE_NAME -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "Old file specification"

END DEFINE

DELETE PLACEHOLDER OLD_HEADER_LEVEL_COMMENTS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER OLD_HEADER_LEVEL_COMMENTS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="Compilation unit header" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{"
    "PROGRAM DESCRIPTION: "
    " "
    "	[tbs]"
    " "
    "AUTHORS: "
    " "
    "	[tbs]"
    " "
    "CREATION DATE:	[tbs]"
    " "
    " "
    "			C H A N G E   L O G"
    " "
    "     Date     |   Name  | Description"
    "--------------+---------+-------------------------------------------------------"
    "[change_entry]"
    "}"

END DEFINE

DELETE PLACEHOLDER OLD_ROUTINE_LEVEL_COMMENTS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER OLD_ROUTINE_LEVEL_COMMENTS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{"
    "FUNCTIONAL DESCRIPTION: "
    " "
    "	[tbs]"
    " "
    "FORMAL PARAMETERS: "
    " "
    "	[description_or_none]"
    " "
    "IMPLICIT INPUTS:"
    " "
    "	[description_or_none]"
    " "
    "IMPLICIT OUTPUTS:"
    " "
    "	[description_or_none]"
    " "
    "ROUTINE VALUE:"
    " "
    "	[description_or_none]"
    " "
    "SIDE EFFECTS:"
    " "
    "	[description_or_none]"
    "}"

END DEFINE

DELETE PLACEHOLDER OPEN -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER OPEN -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="positional or nonpositional" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "nonpositional_open"/PLACEHOLDER
    "positional_open"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER OPERATORS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER OPERATORS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "arithmetic_op"/PLACEHOLDER
    "relational_op"/PLACEHOLDER
    "logical_op"/PLACEHOLDER
    "string_op"/PLACEHOLDER
    "set_op"/PLACEHOLDER
    "type_cast_op"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER OPTIMIZATION_ATTRIBUTES -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER OPTIMIZATION_ATTRIBUTES -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="optimize, nooptimize" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "optimize" /TOKEN
    "nooptimize" /TOKEN

END DEFINE

DELETE PLACEHOLDER OPTIMIZE_OPTIONS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER OPTIMIZE_OPTIONS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=", " -
    /TYPE=MENU -

    "all_option"/PLACEHOLDER
    "inline_option"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER OPTIONAL_HEADER_TAGS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER OPTIONAL_HEADER_TAGS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR="" -
    /TYPE=MENU -

    "CDD PATHNAMES" /TOKEN
    "COMPILATION QUALIFIERS" /TOKEN
    "FILES USED" /TOKEN
    "INCLUDED FILES" /TOKEN
    "KEYWORDS" /TOKEN
    "PORTABILITY ISSUES" /TOKEN
    "SUBSYSTEM" /TOKEN
    "TEXT LIBRARY MODULES INCLUDED" /TOKEN
    "VERSION" /TOKEN

END DEFINE

DELETE PLACEHOLDER OPTIONAL_ROUTINE_TAGS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER OPTIONAL_ROUTINE_TAGS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR="" -
    /TYPE=MENU -

    "ERROR CODES" /TOKEN
    "EXCEPTIONS" /TOKEN
    "INCLUDED FILES" /TOKEN
    "KEYWORDS" /TOKEN
    "TEXT LIBRARY MODULES INCLUDED" /TOKEN

END DEFINE

DELETE PLACEHOLDER ORDINAL_FUNCTIONS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ORDINAL_FUNCTIONS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="PRED, SUCC" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "PRED" /TOKEN
    "SUCC" /TOKEN

END DEFINE

DELETE PLACEHOLDER ORDINAL_PARAMETER -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ORDINAL_PARAMETER -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "Actual parameter of ordinal type"

END DEFINE

DELETE PLACEHOLDER ORDINAL_TYPE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ORDINAL_TYPE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="INTEGER, UNSIGNED, CHAR, BOOLEAN, ENUMERATED, SUBRANGE" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "INTEGER" /TOKEN
    "UNSIGNED" /TOKEN
    "CHAR" /TOKEN
    "BOOLEAN" /TOKEN
    "ENUMERATED" /TOKEN
    "SUBRANGE" /TOKEN

END DEFINE

DELETE PLACEHOLDER ORDINAL_TYPE_ID -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ORDINAL_TYPE_ID -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="ordinal type name" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "Name of a ordinal type"

END DEFINE

DELETE PLACEHOLDER ORGANIZATION -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ORGANIZATION -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "SEQUENTIAL"
    "RELATIVE"
    "INDEXED"

END DEFINE

DELETE PLACEHOLDER "ORGANIZATION    :=   ORGANIZATION" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "ORGANIZATION    :=   ORGANIZATION" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="," -
    /TYPE=NONTERMINAL -

    "ORGANIZATION      := {organization}"

END DEFINE

DELETE PLACEHOLDER OTHERWISE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER OTHERWISE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "OTHERWISE {component_value}"

END DEFINE

DELETE PLACEHOLDER OTHERWISE_LABEL -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER OTHERWISE_LABEL -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "OTHERWISE"
    "   ({field_list})"

END DEFINE

DELETE PLACEHOLDER OTHERWISE_STMT -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER OTHERWISE_STMT -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "OTHERWISE"
    "    {statement_list}..."

END DEFINE

DELETE PLACEHOLDER OTHERWISE_ZERO -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER OTHERWISE_ZERO -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "OTHERWISE ZERO"

END DEFINE

DELETE PLACEHOLDER OVERFLOW_OPTION -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER OVERFLOW_OPTION -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="enables/disables overflow checking" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "OVERFLOW"
    "NOOVERFLOW"

END DEFINE

DELETE PLACEHOLDER PACKED -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER PACKED -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "PACKED"

END DEFINE

DELETE PLACEHOLDER PACKED_ARRAY_OF_CHAR -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER PACKED_ARRAY_OF_CHAR -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="a group of characters with string semmantics" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "PACKED ARRAY [1..{upper_bound}] OF CHAR"

END DEFINE

DELETE PLACEHOLDER PACKED_ARRAY_VAR -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER PACKED_ARRAY_VAR -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "A packed array variable"

END DEFINE

DELETE PLACEHOLDER PARAMETER_FUNCTIONS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER PARAMETER_FUNCTIONS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="ARGUMENT, ARGUMENT_LIST_LENGTH, PRESENT" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "ARGUMENT" /TOKEN
    "ARGUMENT_LIST_LENGTH" /TOKEN
    "PRESENT" /TOKEN

END DEFINE

DELETE PLACEHOLDER PARAMETER_NAME -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER PARAMETER_NAME -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "Name of the formal LIST parameter"

END DEFINE

DELETE PLACEHOLDER PARAMETER_PASSING_ATTRIBUTES -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER PARAMETER_PASSING_ATTRIBUTES -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="class_a, class_nca, class_s, immediate, reference" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "class_a" /TOKEN
    "class_nca" /TOKEN
    "class_s" /TOKEN
    "immediate" /TOKEN
    "reference" /TOKEN

END DEFINE

DELETE PLACEHOLDER PARAMETER_TYPE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER PARAMETER_TYPE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "type_name"/PLACEHOLDER
    "schema_name"/PLACEHOLDER
    "conformant_parameter"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER PAREN_STAR_MARKER -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER PAREN_STAR_MARKER -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="(* comment_string *)" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "(* {comment_string} *)"

END DEFINE

DELETE PLACEHOLDER PATTERN -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER PATTERN -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "A character string expression to be found"

END DEFINE

DELETE PLACEHOLDER POINTERS_OPTION -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER POINTERS_OPTION -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="enables/disables pointers checking" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "POINTERS"
    "NOPOINTERS"

END DEFINE

DELETE PLACEHOLDER POINTER_EXP -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER POINTER_EXP -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "A pointer expression of a type that refers to a record type"

END DEFINE

DELETE PLACEHOLDER POINTER_TYPE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER POINTER_TYPE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="identifies the type_ident of a dynamic variable" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "^ [ [ptr_base_type_attributes]... ] {base_type_id}"

END DEFINE

DELETE PLACEHOLDER POINTER_VAR -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER POINTER_VAR -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "A pointer variable"

END DEFINE

DELETE PLACEHOLDER POSITIONAL_CLOSE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER POSITIONAL_CLOSE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="close procedure without parameter names" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "CLOSE( {file_variable}, "
    "       [disposition], "
    "       [user_action], "
    "       [ERROR := error_recovery] )"

END DEFINE

DELETE PLACEHOLDER POSITIONAL_OPEN -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER POSITIONAL_OPEN -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="open procedure without parameter names" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "OPEN( {file_variable},"
    "      [file_name], "
    "      [file_history], "
    "      [record_length], "
    "      [access_method], "
    "      [record_type], "
    "      [carriage_control], "
    "      [organization], "
    "      [disposition], "
    "      [file_sharing], "
    "      [user_action], "
    "      ['file_spec'], "
    "      [error := error_recovery] )"

END DEFINE

DELETE PLACEHOLDER PREDECLARED_FUNCTIONS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER PREDECLARED_FUNCTIONS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="declared Pascal functions" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "arithmetic_functions"/PLACEHOLDER
    "more_arithmetic_functions"/PLACEHOLDER
    "ordinal_functions"/PLACEHOLDER
    "transfer_functions"/PLACEHOLDER
    "more_transfer_functions"/PLACEHOLDER
    "string_compare_functions"/PLACEHOLDER
    "char_string_functions"/PLACEHOLDER
    "allocation_size_functions"/PLACEHOLDER
    "interlocked_functions"/PLACEHOLDER
    "Low_Level"/PLACEHOLDER
    "dynamic_functions"/PLACEHOLDER
    "parameter_functions"/PLACEHOLDER
    "misc_functions"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER PREDECLARED_ID -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER PREDECLARED_ID -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="list of Pascal predeclared identifiers" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "ABS"
    "ADD_INTERLOCKED"
    "ADDRESS"
    "ARCTAN"
    "ARGUMENT"
    "ARGUMENT_LIST_LENGTH"
    "BIN"
    "BITNEXT"
    "BIT_OFFSET"
    "BITSIZE"
    "BOOLEAN"
    "BYTE_OFFSET"
    "CARD"
    "CHAR"
    "CHR"
    "CLEAR_INTERLOCKED"
    "CLOCK"
    "CLOSE"
    "COS"
    "CREATE_DIRECTORY"
    "DATE"
    "DBLE"
    "DEC"
    "DELETE"
    "DELETE_FILE"
    "DISPOSE"
    "DOUBLE"
    "EOF"
    "EOLN"
    "EPSDOUBLE"
    "EPSQUADRUPLE"
    "EPSREAL"
    "EQ"
    "ESTABLISH"
    "EXP"
    "EXTEND"
    "EXPO"
    "FALSE"
    "FIND"
    "FIND_FIRST_BIT_CLEAR"
    "FIND_FIRST_BIT_SET"
    "FINDK"
    "FIND_MEMBER"
    "FIND_NONMEMBER"
    "GE"
    "GET"
    "GETTIMESTAMP"
    "GT"
    "HALT"
    "HEX"
    "IADDRESS"
    "INDEX"
    "INPUT"
    "INT"
    "INTEGER"
    "LE"
    "LENGTH"
    "LINELIMIT"
    "LN"
    "LOCATE"
    "LOWER"
    "LT"
    "MAX"
    "MAXCHAR"
    "MAXDOUBLE"
    "MAXINT"
    "MAXQUADRUPLE"
    "MAXREAL"
    "MAXUNSIGNED"
    "MIN"
    "MINDOUBLE"
    "MINQUADRUPLE"
    "MINREAL"
    "NE"
    "NEW"
    "NEXT"
    "NIL"
    "OCT"
    "ODD"
    "OPEN"
    "ORD"
    "OUTPUT"
    "PACK"
    "PAD"
    "PAGE"
    "PRED"
    "PRESENT"
    "PUT"
    "QUAD"
    "QUADRUPLE"
    "READ"
    "READLN"
    "READV"
    "REAL"
    "RENAME_FILE"
    "RESET"
    "RESETK"
    "REVERT"
    "REWRITE"
    "ROUND"
    "SET_INTERLOCKED"
    "SIN"
    "SINGLE"
    "SIZE"
    "SNGL"
    "SQR"
    "SQRT"
    "STATUS"
    "STATUSV"
    "STRING"
    "SUBSTR"
    "SUCC"
    "TEXT"
    "TIME"
    "TIMESTAMP"
    "TRUE"
    "TRUNC"
    "TRUNCATE"
    "UAND"
    "UDEC"
    "UFB"
    "UINT"
    "UNDEFINED"
    "UNLOCK"
    "UNOT"
    "UNPACK"
    "UNSIGNED"
    "UOR"
    "UPDATE"
    "UPPER"
    "UROUND"
    "UTRUNC"
    "UXOR"
    "WRITE"
    "WRITELN"
    "WRITEV"
    "XOR"
    "ZERO"

END DEFINE

DELETE PLACEHOLDER PREDECLARED_PROCEDURES -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER PREDECLARED_PROCEDURES -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="predeclared Pascal procedures" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "transfer_procedures"/PLACEHOLDER
    "char_string_procedures"/PLACEHOLDER
    "misc_procedures"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER PREDECLARED_STATEMENTS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER PREDECLARED_STATEMENTS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="predeclared procedures, predeclared functions" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "predeclared_procedures"/PLACEHOLDER
    "predeclared_functions"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER PRIMARY -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER PRIMARY -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{factor} [** factor]..."

END DEFINE

DELETE PLACEHOLDER PRIMARY_OP -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER PRIMARY_OP -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "*"
    "/"
    "DIV"
    "REM"
    "MOD"
    "AND"
    "AND_THEN"

END DEFINE

DELETE PLACEHOLDER "PRIMARY_OP CONST_PRIMARY" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "PRIMARY_OP CONST_PRIMARY" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{primary_op} {const_primary}"

END DEFINE

DELETE PLACEHOLDER "PRIMARY_OP PRIMARY" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "PRIMARY_OP PRIMARY" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=" " -
    /TYPE=NONTERMINAL -

    "{primary_op} {primary}"

END DEFINE

DELETE PLACEHOLDER PROCEDURE_LEVEL_COMMENTS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER PROCEDURE_LEVEL_COMMENTS -
    /LANGUAGE="Pascal" -
    /PLACEHOLDER=STANDARD_PROCEDURE_LEVEL_COMMENTS

END DEFINE
DELETE PLACEHOLDER PROCEDURE_PARAMETER -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER PROCEDURE_PARAMETER -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="proc_heading [:= [mech_specifier] initial_val]" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[ [routine_attribute]... ]"
    "PROCEDURE {user_defined_id}"
    "    ( [formal_parameters]... )"
    "[:= [mechanism_specifier] initial_value]"

END DEFINE

DELETE PLACEHOLDER PROC_ID -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER PROC_ID -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "the name of a user declared procedure"

END DEFINE

DELETE PLACEHOLDER "PROC_ID | FUNC_ID" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "PROC_ID | FUNC_ID" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "proc_id"/PLACEHOLDER
    "func_id"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER PROGRAM_PARAMETER -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER PROGRAM_PARAMETER -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=", " -
    /TYPE=TERMINAL -

    "the name(s) of the file variables associated with the external"
    "file(s) used by the compilation unit."

END DEFINE

DELETE PLACEHOLDER PTR_BASE_TYPE_ATTRIBUTES -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER PTR_BASE_TYPE_ATTRIBUTES -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="list of pointer base type attributes" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=", " -
    /TYPE=MENU -

    "aligned" /TOKEN
    "hidden" /TOKEN
    "readonly" /TOKEN
    "size_attributes"/PLACEHOLDER
    "unsafe" /TOKEN
    "volatile" /TOKEN
    "writeonly" /TOKEN

END DEFINE

DELETE PLACEHOLDER "Q|D|E" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "Q|D|E" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "Q"
    "D"
    "E"

END DEFINE

DELETE PLACEHOLDER READ_VAR_LIST -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER READ_VAR_LIST -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=", " -
    /TYPE=NONTERMINAL -

    "{variable} : [BIN | HEX | OCT]"

END DEFINE

DELETE PLACEHOLDER REAL_CONST -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER REAL_CONST -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="a real constant value" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{decimal_digits}.{decimal_digits}[{Q|D|E}{sign} decimal_digits]"

END DEFINE

DELETE PLACEHOLDER REAL_PARAMETER -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER REAL_PARAMETER -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "Actual parameter of type real, single, double, or quadruple"

END DEFINE

DELETE PLACEHOLDER REAL_TYPE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER REAL_TYPE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="REAL, SINGLE, DOUBLE, QUADRUPLE" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "REAL" /TOKEN
    "SINGLE" /TOKEN
    "DOUBLE" /TOKEN
    "QUADRUPLE" /TOKEN

END DEFINE

DELETE PLACEHOLDER REAL_VARIABLE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER REAL_VARIABLE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "Actual parameter must be a variable of type real,"
    "single, double, or quadruple"

END DEFINE

DELETE PLACEHOLDER RECORD -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER RECORD -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="group of components which may be of different types" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[PACKED] RECORD"
    "[field_list]"
    "END"

END DEFINE

DELETE PLACEHOLDER RECORD_CONSTRUCTOR -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER RECORD_CONSTRUCTOR -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="Extended standard record constructor" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[ [fixed_part_list]...; [variant_part] [otherwise_zero] ]"

END DEFINE

DELETE PLACEHOLDER RECORD_LENGTH -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER RECORD_LENGTH -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "any positive integer that specifies the maximum size in bytes for"
    "a line in a text file or a file of type FILE OF VARYING"

END DEFINE

DELETE PLACEHOLDER "RECORD_LENGTH   :=   RECORD_LENGTH" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "RECORD_LENGTH   :=   RECORD_LENGTH" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="," -
    /TYPE=NONTERMINAL -

    "RECORD_LENGTH     := {record_length}"

END DEFINE

DELETE PLACEHOLDER RECORD_STRUCTURED_CONSTANT -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER RECORD_STRUCTURED_CONSTANT -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="Record constructors" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{type_name}{record_constructor}"

END DEFINE

DELETE PLACEHOLDER RECORD_TYPE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER RECORD_TYPE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "FIXED"
    "VARIABLE"
    "STREAM"
    "STREAM_CR"
    "STREAM_LF"

END DEFINE

DELETE PLACEHOLDER "RECORD_TYPE     :=   RECORD_TYPE" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "RECORD_TYPE     :=   RECORD_TYPE" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="," -
    /TYPE=NONTERMINAL -

    "RECORD_TYPE       := {record_type}"

END DEFINE

DELETE PLACEHOLDER RECORD_WITH_DICT_EXTRACTION -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER RECORD_WITH_DICT_EXTRACTION -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="record with CDD extraction(s)" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{type_id} = [ [variable_attributes]... ] [PACKED] RECORD"
    "            [field_list_or_dict_extraction]..."
    "            END"

END DEFINE

DELETE PLACEHOLDER REGISTER_NUM -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER REGISTER_NUM -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "A register number"

END DEFINE

DELETE PLACEHOLDER REGULAR_TYPE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER REGULAR_TYPE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="a type identifier and its data type" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{type_id} = [ [variable_attributes]... ] {data_type} [VALUE initial_value]"

END DEFINE

DELETE PLACEHOLDER RELATIONAL_OP -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER RELATIONAL_OP -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="=, <>, <, <=, >, >=" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "="
    "<>"
    "<"
    "<="
    ">"
    ">="

END DEFINE

DELETE PLACEHOLDER "RELATIONAL_OP | IN" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "RELATIONAL_OP | IN" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "relational_op"/PLACEHOLDER
    "IN"

END DEFINE

DELETE PLACEHOLDER RESERVED_WORDS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER RESERVED_WORDS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="a list of Pascal reserved words" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "AND"
    "AND_THEN"
    "ARRAY"
    "BEGIN"
    "CASE"
    "CONST"
    "DIV"
    "DO"
    "DOWNTO"
    "ELSE"
    "END"
    "FILE"
    "FOR"
    "FUNCTION"
    "GOTO"
    "IF"
    "IN"
    "LABEL"
    "MOD"
    "MODULE"
    "NIL"
    "NOT"
    "OF"
    "OR"
    "OR_ELSE"
    "OTHERWISE"
    "PACKED"
    "PROCEDURE"
    "PROGRAM"
    "RECORD"
    "REM"
    "REPEAT"
    "SET"
    "THEN"
    "TO"
    "TYPE"
    "UNTIL"
    "VALUE"
    "VAR"
    "VARYING"
    "WHILE"
    "WITH"
    "%DESCR"
    "%DICTIONARY"
    "%IMMED"
    "%INCLUDE"
    "%REF"
    "%STDESCR"
    "%SUBTITLE"
    "%TITLE"

END DEFINE

DELETE PLACEHOLDER ROUTINE_ATTRIBUTE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER ROUTINE_ATTRIBUTE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="list of routine attributes" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=", " -
    /TYPE=MENU -

    "asynchronous" /TOKEN
    "check" /TOKEN
    "initialize" /TOKEN
    "optimization_attributes"/PLACEHOLDER
    "psect" /TOKEN
    "unbound" /TOKEN
    "visibility_attributes"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER SCHEMA_FORMAL_LIST -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER SCHEMA_FORMAL_LIST -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="a list of discriminants for the schema type" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR="; " -
    /TYPE=NONTERMINAL -

    "{discriminant_id}... : [unsafe_attr] {ordinal_type_id}"

END DEFINE

DELETE PLACEHOLDER SCHEMA_NAME -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER SCHEMA_NAME -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "The name of a schema type"

END DEFINE

DELETE PLACEHOLDER SCHEMA_TYPE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER SCHEMA_TYPE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="a schema type identifier and its data type" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{type_id}( {schema_formal_list}... ) = {new_type} [VALUE initial_value]"

END DEFINE

DELETE PLACEHOLDER SEQUENCE_DOWNTO -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER SEQUENCE_DOWNTO -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="FOR variable := initial_value DOWNTO final_value" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    ":= {value_expr} DOWNTO {value_expr}"

END DEFINE

DELETE PLACEHOLDER SEQUENCE_TO -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER SEQUENCE_TO -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="FOR variable := initial_value TO final_value" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    ":= {value_expr} TO {value_expr}"

END DEFINE

DELETE PLACEHOLDER SEQUENTIAL_ACCESS_INPUT_PROCEDURES -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER SEQUENTIAL_ACCESS_INPUT_PROCEDURES -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="GET, READ, RESET" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "GET" /TOKEN
    "READ" /TOKEN
    "RESET" /TOKEN

END DEFINE

DELETE PLACEHOLDER SEQUENTIAL_ACCESS_OUTPUT_PROCEDURES -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER SEQUENTIAL_ACCESS_OUTPUT_PROCEDURES -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="PUT, REWRITE, WRITE, EXTEND" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "PUT" /TOKEN
    "REWRITE" /TOKEN
    "WRITE" /TOKEN
    "EXTEND" /TOKEN

END DEFINE

DELETE PLACEHOLDER SET -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER SET -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="collection of data items of the same ordinal type" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[PACKED] SET OF [unsafe_attr] {base_type}"

END DEFINE

DELETE PLACEHOLDER SET_CONSTRUCTOR -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER SET_CONSTRUCTOR -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="constant value for a set type" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[ [{value_expr[..value_expr]}...] ]"

END DEFINE

DELETE PLACEHOLDER SET_EXPRESSION -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER SET_EXPRESSION -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "A set expression"

END DEFINE

DELETE PLACEHOLDER SET_MEMBER_CLAUSE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER SET_MEMBER_CLAUSE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="FOR variable IN set_expression" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "IN {set_expression}"

END DEFINE

DELETE PLACEHOLDER SET_OP -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER SET_OP -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="union,intersect,difference,equality,inequality,LEQ,GEQ,IN" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "+"
    "*"
    "-"
    "="
    "<>"
    "<="
    ">="
    "IN"

END DEFINE

DELETE PLACEHOLDER SET_OR_BOOL_PARM -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER SET_OR_BOOL_PARM -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "A set or boolean value"

END DEFINE

DELETE PLACEHOLDER SET_STRUCTURED_CONSTANT -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER SET_STRUCTURED_CONSTANT -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="Set constructors" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[type_name]{set_constructor}"

END DEFINE

DELETE PLACEHOLDER "SHARING         :=   FILE_SHARING" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "SHARING         :=   FILE_SHARING" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="," -
    /TYPE=NONTERMINAL -

    "SHARING           := {file_sharing}"

END DEFINE

DELETE PLACEHOLDER SIGN -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER SIGN -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "+"
    "-"

END DEFINE

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

    "+"
    "-"
    "OR"
    "OR_ELSE"

END DEFINE

DELETE PLACEHOLDER SIGNIFICANT_DIGITS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER SIGNIFICANT_DIGITS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "An integer parameter indicating the minimum number of"
    "significant digits to be returned"

END DEFINE

DELETE PLACEHOLDER SIMPLE_EXPRESSION -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER SIMPLE_EXPRESSION -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[sign]{term} [{sign | OR} term]..."

END DEFINE

DELETE PLACEHOLDER SIMPLE_STATEMENT -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER SIMPLE_STATEMENT -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="ASSIGNMENT, ROUTINE, GOTO, EMPTY" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "ASSIGNMENT" /TOKEN
    "ROUTINE" /TOKEN
    "GOTO" /TOKEN
    "EMPTY" /TOKEN

END DEFINE

DELETE PLACEHOLDER SIZE_ATTRIBUTES -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER SIZE_ATTRIBUTES -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="bit, byte, word, long, quad, octa" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "bit" /TOKEN
    "byte" /TOKEN
    "word" /TOKEN
    "long" /TOKEN
    "quad_attr" /TOKEN
    "octa" /TOKEN

END DEFINE

DELETE PLACEHOLDER SPECIAL_SYMBOLS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER SPECIAL_SYMBOLS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="a list of Pascal special symbols" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "'"
    ":="
    "[]"
    "(. .)"
    ":"
    ","
    "(* *)"
    "{}"
    "/"
    "="
    "**"
    ">"
    ">="
    "<"
    "<="
    "-"
    "*"
    "<>"
    "()"
    "%"
    "."
    "+"
    "^"
    "@"
    ";"
    ".."
    "::"

END DEFINE

DELETE PLACEHOLDER STANDARD_FUNCTION_LEVEL_COMMENTS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER STANDARD_FUNCTION_LEVEL_COMMENTS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{+"
    "FUNCTIONAL DESCRIPTION:"
    " "
    "	[tbs]"
    " "
    "[formal parameters]"
    " "
    "RETURN VALUE:"
    " "
    "	[description_or_none]"
    " "
    "SIDE EFFECTS:"
    " "
    "	[description_or_none]"
    " "
    "DESIGN:"
    " "
    "	[description_or_none]"
    " "
    "IMPLICIT INPUT PARAMETERS:"
    " "
    "	[description_or_none]"
    " "
    "IMPLICIT OUTPUT PARAMETERS:"
    " "
    "	[description_or_none]"
    " "
    "[logical_properties]"
    " "
    "[optional_routine_tags]"
    "-}"

END DEFINE

DELETE PLACEHOLDER STANDARD_HEADER_LEVEL_COMMENTS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER STANDARD_HEADER_LEVEL_COMMENTS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="Compilation unit header" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{+"
    "COMPONENT: [tbs]"
    " "
    "PROGRAM DESCRIPTION:"
    " "
    "	[tbs]"
    " "
    "AUTHORS:"
    " "
    "	[tbs]"
    " "
    "CREATION DATE: [tbs]"
    " "
    "DESIGN ISSUES:"
    " "
    "	[tbs]"
    " "
    "[optional_header_tags]"
    " "
    "MODIFICATION HISTORY:"
    " "
    "     Date     |   Name  | Description"
    "--------------+---------+-------------------------------------------------------"
    "[change_entry]"
    "-}"

END DEFINE

DELETE PLACEHOLDER STANDARD_PROCEDURE_LEVEL_COMMENTS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER STANDARD_PROCEDURE_LEVEL_COMMENTS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{+"
    "FUNCTIONAL DESCRIPTION:"
    " "
    "	[tbs]"
    " "
    "[formal parameters]"
    " "
    "SIDE EFFECTS:"
    " "
    "	[description_or_none]"
    " "
    "DESIGN:"
    " "
    "	[description_or_none]"
    " "
    "IMPLICIT INPUT PARAMETERS:"
    " "
    "	[description_or_none]"
    " "
    "IMPLICIT OUTPUT PARAMETERS:"
    " "
    "	[description_or_none]"
    " "
    "[logical_properties]"
    " "
    "[optional_routine_tags]"
    "-}"

END DEFINE

DELETE PLACEHOLDER START -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER START -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "An integer expression indicating the starting position of the substring"

END DEFINE

DELETE PLACEHOLDER START_INDEX -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER START_INDEX -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR=", " -
    /TYPE=TERMINAL -

    "Indicates the index position in an array where to begin"

END DEFINE

DELETE PLACEHOLDER STATEMENT -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER STATEMENT -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "simple_statement"/PLACEHOLDER
    "structured_statement"/PLACEHOLDER
    "labeled_statement"/PLACEHOLDER
    "predeclared_statements"/PLACEHOLDER
    "in_out_statements"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER STATEMENT_LABEL -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER STATEMENT_LABEL -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "an unsigned decimal integer or symbolic constant that represents"
    "a statement label"

END DEFINE

DELETE PLACEHOLDER STATEMENT_LIST -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER STATEMENT_LIST -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR=";" -
    /TYPE=MENU -

    "simple_statement"/PLACEHOLDER
    "structured_statement"/PLACEHOLDER
    "labeled_statement"/PLACEHOLDER
    "predeclared_statements"/PLACEHOLDER
    "in_out_statements"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER STORAGE_UNITS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER STORAGE_UNITS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "constant which indicates the number of storage units"

END DEFINE

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

    "A character string expression"

END DEFINE

DELETE PLACEHOLDER STRING_COMPARE_FUNCTIONS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER STRING_COMPARE_FUNCTIONS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="EQ, LT, GT, NE, LE, GE" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "EQ" /TOKEN
    "LT" /TOKEN
    "GT" /TOKEN
    "NE" /TOKEN
    "LE" /TOKEN
    "GE" /TOKEN

END DEFINE

DELETE PLACEHOLDER STRING_CONST -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER STRING_CONST -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="constant string value" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "name_string"/PLACEHOLDER
    "name_strings"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER STRING_LENGTH -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER STRING_LENGTH -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "Length of the string between 1 and 65535"

END DEFINE

DELETE PLACEHOLDER STRING_OP -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER STRING_OP -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="concatenation, relational_op" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "+"
    "RELATIONAL_OP"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER STRING_TYPE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER STRING_TYPE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="CHAR, PACKED ARRAY OF CHAR, VARYING, and STRING" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "CHAR" /TOKEN
    "PACKED_ARRAY_OF_CHAR"/PLACEHOLDER
    "VARYING_OF_CHAR" /TOKEN
    "STRING" /TOKEN

END DEFINE

DELETE PLACEHOLDER STRING_VAR -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER STRING_VAR -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "A character string variable of type VARYING OF CHAR"

END DEFINE

DELETE PLACEHOLDER STRUCTURED_CONSTANT -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER STRUCTURED_CONSTANT -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="Array, Record, and Set constructors" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "array_structured_constant"/PLACEHOLDER
    "record_structured_constant"/PLACEHOLDER
    "set_structured_constant"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER STRUCTURED_STATEMENT -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER STRUCTURED_STATEMENT -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="CASE, COMPOUND, FOR, IF, REPEAT, WHILE, WITH" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "COMPOUND" /TOKEN
    "IF" /TOKEN
    "FOR" /TOKEN
    "REPEAT" /TOKEN
    "WHILE" /TOKEN
    "WITH" /TOKEN
    "CASE" /TOKEN

END DEFINE

DELETE PLACEHOLDER STRUCTURED_TYPE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER STRUCTURED_TYPE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="RECORD, ARRAY, VARYING_OF_CHAR, SET, FILE, STRING" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "RECORD" /TOKEN
    "ARRAY" /TOKEN
    "VARYING_OF_CHAR" /TOKEN
    "SET" /TOKEN
    "FILE" /TOKEN
    "STRING" /TOKEN

END DEFINE

DELETE PLACEHOLDER SUBRANGE_OPTION -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER SUBRANGE_OPTION -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="enables/disables subrange checking" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "SUBRANGE"
    "NOSUBRANGE"

END DEFINE

DELETE PLACEHOLDER SUBTAGS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER SUBTAGS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="Subtags under tag" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{identifiers}:"
    "	{tbs}"
    "[more_subtags]..."

END DEFINE

DELETE PLACEHOLDER TAG_CLAUSE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER TAG_CLAUSE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "anonymous_tag"/PLACEHOLDER
    "named_tag"/PLACEHOLDER
    "formal_discriminant_tag"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER TAG_ID -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER TAG_ID -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "the name of the tag field"

END DEFINE

DELETE PLACEHOLDER TAG_IDENTIFIER -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER TAG_IDENTIFIER -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "Tag name"

END DEFINE

DELETE PLACEHOLDER TAG_LIST -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER TAG_LIST -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=", " -
    /TYPE=TERMINAL -

    "Tag field identifiers of a variant record"

END DEFINE

DELETE PLACEHOLDER TAG_TYPE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER TAG_TYPE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "type identifier for the tag field"

END DEFINE

DELETE PLACEHOLDER TARGET_TYPE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER TARGET_TYPE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "a definition or identifier of any type except VARYING OF CHAR"

END DEFINE

DELETE PLACEHOLDER TBS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER TBS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "to be supplied"

END DEFINE

DELETE PLACEHOLDER TERM -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER TERM -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{primary} [primary_op primary]..."

END DEFINE

DELETE PLACEHOLDER TEXT_FILE_PROCEDURES -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER TEXT_FILE_PROCEDURES -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="LINELIMIT, PAGE, READLN, WRITELN" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "LINELIMIT" /TOKEN
    "PAGE" /TOKEN
    "READLN" /TOKEN
    "WRITELN" /TOKEN

END DEFINE

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

    "A string parameter of type PACKED ARRAY[1..11] OF CHAR"

END DEFINE

DELETE PLACEHOLDER TIMESTAMP_PARAMETER -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER TIMESTAMP_PARAMETER -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "An actual parameter of type timestamp"

END DEFINE

DELETE PLACEHOLDER TITLE_STRING -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER TITLE_STRING -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "a character string representing the title"

END DEFINE

DELETE PLACEHOLDER TRANSFER_FUNCTIONS -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER TRANSFER_FUNCTIONS -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="CHR, DBLE, INT, ORD, QUAD, ROUND, SNGL" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "CHR" /TOKEN
    "DBLE" /TOKEN
    "INT" /TOKEN
    "ORD" /TOKEN
    "QUAD" /TOKEN
    "ROUND" /TOKEN
    "SNGL" /TOKEN

END DEFINE

DELETE PLACEHOLDER TRANSFER_PROCEDURES -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER TRANSFER_PROCEDURES -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="PACK, UNPACK" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "PACK" /TOKEN
    "UNPACK" /TOKEN

END DEFINE

DELETE PLACEHOLDER TYPE_CAST_OP -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER TYPE_CAST_OP -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="overides a declared type for one operation" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "var_type_cast"/PLACEHOLDER
    "exp_type_cast"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER TYPE_CAST_VAR_ID -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER TYPE_CAST_VAR_ID -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "an identifier defined for any type except VARYING OF CHAR"
    "or a conformant schema"

END DEFINE

DELETE PLACEHOLDER TYPE_DEFINITION -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER TYPE_DEFINITION -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR=";" -
    /TYPE=MENU -

    "regular_type"/PLACEHOLDER
    "schema_type"/PLACEHOLDER
    "dict_extraction"/PLACEHOLDER
    "record_with_dict_extraction"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER TYPE_ID -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER TYPE_ID -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="identifier of the type being defined" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "the identifier of the type being defined"

END DEFINE

DELETE PLACEHOLDER TYPE_NAME -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER TYPE_NAME -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "A predeclared identifier of the specified type"

END DEFINE

DELETE PLACEHOLDER TYPE_NAME_OR_CONFORMANT -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER TYPE_NAME_OR_CONFORMANT -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "type_name"/PLACEHOLDER
    "conformant_parameter"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER UNPACKED_ARRAY_VAR -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER UNPACKED_ARRAY_VAR -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "A unpacked array variable"

END DEFINE

DELETE PLACEHOLDER UNSAFE_ATTR -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER UNSAFE_ATTR -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="unsafe attributes" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "[UNSAFE]"

END DEFINE

DELETE PLACEHOLDER UNSIGNED_PARAMETER -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER UNSIGNED_PARAMETER -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "An expression of type UNSIGNED"

END DEFINE

DELETE PLACEHOLDER UPPER_BOUND -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER UPPER_BOUND -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "any integer or integer declared value in the range from 1 through 65,535"

END DEFINE

DELETE PLACEHOLDER UPPER_BOUND_ID -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER UPPER_BOUND_ID -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "an identifier that represents the upper bound of the array's index"

END DEFINE

DELETE PLACEHOLDER UPPER_SUB_BOUND -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER UPPER_SUB_BOUND -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "a constant expression that established the upper limit of"
    "the subrange"

END DEFINE

DELETE PLACEHOLDER USER_ACTION -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER USER_ACTION -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "a function identifier which specifies the user defined function to be used"
    "in place of the predefined function"

END DEFINE

DELETE PLACEHOLDER "USER_ACTION     :=   USER_ACTION" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "USER_ACTION     :=   USER_ACTION" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="," -
    /TYPE=NONTERMINAL -

    "USER_ACTION       := {user_action}"

END DEFINE

DELETE PLACEHOLDER USER_DECLARED_TYPE_ID -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER USER_DECLARED_TYPE_ID -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "a predefined type declared by the user in a TYPE declaration section"

END DEFINE

DELETE PLACEHOLDER USER_DEFINED_ID -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER USER_DEFINED_ID -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="user declared identifiers" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "Combinations of letters, digits, dollar signs, and underscores;"
    "First character must be a letter; first 31 chars denote a unique name"

END DEFINE

DELETE PLACEHOLDER USER_DEFINED_TYPE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER USER_DEFINED_TYPE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="a type identifier declared by the user" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{user_declared_type_id}"

END DEFINE

DELETE PLACEHOLDER "VALUE INITIAL_VALUE" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "VALUE INITIAL_VALUE" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="specify initial_value for type, variable, or field" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "VALUE {initial_value}"

END DEFINE

DELETE PLACEHOLDER VALUE_DECLARATION -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER VALUE_DECLARATION -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR=";" -
    /TYPE=NONTERMINAL -

    "{variable_identifier} := {initial_value}"

END DEFINE

DELETE PLACEHOLDER VALUE_EXPR -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER VALUE_EXPR -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="run-time expression" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "expression"/PLACEHOLDER
    "predeclared_functions"/PLACEHOLDER
    "i/o_functions"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER "VALUE_EXPR%[..VALUE_EXPR]%" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "VALUE_EXPR%[..VALUE_EXPR]%" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=", " -
    /TYPE=NONTERMINAL -

    "{value_expr}[..value_expr]"

END DEFINE

DELETE PLACEHOLDER VALUE_PARAMETER -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER VALUE_PARAMETER -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="{id},...:[attributes] {type_name | schema_name | conformant_parameter}" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{id_list}... :[ [formal_param_attributes]... ]  {parameter_type} [:= [mechanism_specifier] initial_value]"

END DEFINE

DELETE PLACEHOLDER VARIABLE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER VARIABLE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="a predeclared identifier for some type" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "a predeclared variable identifier or field identifier which"
    "can be in one of the following forms:"
    "     {      nothing       }"
    "     {   [array_index]    }"
    "  id { .field_identifier  } ..."
    "     {       ^            }"
    "     { :: target_type     }"

END DEFINE

DELETE PLACEHOLDER "VARIABLE | FUNC_ID" -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER "VARIABLE | FUNC_ID" -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "variable"/PLACEHOLDER
    "func_id"/PLACEHOLDER

END DEFINE

DELETE PLACEHOLDER VARIABLE_ATTRIBUTES -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER VARIABLE_ATTRIBUTES -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="list of variable attributes" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=", " -
    /TYPE=MENU -

    "alignment_attributes"/PLACEHOLDER
    "allocation_attributes"/PLACEHOLDER
    "hidden" /TOKEN
    "readonly" /TOKEN
    "size_attributes"/PLACEHOLDER
    "unsafe" /TOKEN
    "value_attribute" /TOKEN
    "visibility_attributes"/PLACEHOLDER
    "volatile" /TOKEN
    "writeonly" /TOKEN

END DEFINE

DELETE PLACEHOLDER VARIABLE_DECLARATION -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER VARIABLE_DECLARATION -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=VERTICAL -
    /SEPARATOR=";" -
    /TYPE=NONTERMINAL -

    "{variable_id}... : [ [variable_attributes]... ] {data_type} [VALUE initial_value]"

END DEFINE

DELETE PLACEHOLDER VARIABLE_ID -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER VARIABLE_ID -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR="," -
    /TYPE=TERMINAL -

    "the identifier of the variable being declared"

END DEFINE

DELETE PLACEHOLDER VARIABLE_IDENTIFIER -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER VARIABLE_IDENTIFIER -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "the name of the variable to be initialized"

END DEFINE

DELETE PLACEHOLDER VARIANT_CLAUSE -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER VARIANT_CLAUSE -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "CASE [tag_clause] OF"
    "    {case_label_list}"

END DEFINE

DELETE PLACEHOLDER VARIANT_PART -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER VARIANT_PART -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "CASE [tag_identifier] : {constant_expression} OF "
    "    [ [fixed_part_list]...; [variant_part] ];"

END DEFINE

DELETE PLACEHOLDER VARIANT_POINTER_EXP -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER VARIANT_POINTER_EXP -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "A pointer expression of a type that refers to a record type"
    "with variants"

END DEFINE

DELETE PLACEHOLDER VARIANT_POINTER_VAR -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER VARIANT_POINTER_VAR -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "A pointer variable of a type that refers to a record type"
    "with variants"

END DEFINE

DELETE PLACEHOLDER VARYING_OF_CHAR -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER VARYING_OF_CHAR -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="unfixed length string of character components" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "VARYING [{upper_bound}] OF CHAR"

END DEFINE

DELETE PLACEHOLDER VAR_OR_TYPE_PARM -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER VAR_OR_TYPE_PARM -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "A variable or type identifier"

END DEFINE

DELETE PLACEHOLDER VAR_PARAMETER -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER VAR_PARAMETER -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="VAR {id},...:[attributes] {type_name | schema_name | conformant_parameter}" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "VAR {id_list}... :[ [formal_param_attributes]... ] {parameter_type} [:= [mechanism_specifier] initial_value]"

END DEFINE

DELETE PLACEHOLDER VAR_TYPE_CAST -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER VAR_TYPE_CAST -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="variable type cast" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=NONTERMINAL -

    "{type_cast_var_id} :: {target_type}"

END DEFINE

DELETE PLACEHOLDER VISIBILITY_ATTRIBUTES -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER VISIBILITY_ATTRIBUTES -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="local, global, external, weak_global, weak_external" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=MENU -

    "local" /TOKEN
    "global" /TOKEN
    "external" /TOKEN
    "weak_global" /TOKEN
    "weak_external" /TOKEN

END DEFINE

DELETE PLACEHOLDER VOLATILE_OR_READONLY_VAR -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER VOLATILE_OR_READONLY_VAR -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=CONTEXT_DEPENDENT -
    /SEPARATOR="" -
    /TYPE=TERMINAL -

    "Actual parameter must be a VOLATILE or READONLY variable of any type"
    "except a component of a packed structure type"

END DEFINE

DELETE PLACEHOLDER WITH_ELEMENT -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER WITH_ELEMENT -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="object whose scope is to be opened, either record or schema type" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=", " -
    /TYPE=TERMINAL -

    "object whose scope is to be opened, either record or schema type"

END DEFINE

DELETE PLACEHOLDER WRITE_LIST -
    /LANGUAGE="Pascal"
DEFINE PLACEHOLDER WRITE_LIST -
    /LANGUAGE="Pascal" -
    /NOAUTO_SUBSTITUTE -
    /DESCRIPTION="" -
    /DUPLICATION=HORIZONTAL -
    /SEPARATOR=", " -
    /TYPE=NONTERMINAL -

    "{bin | hex | oct | value_expr}[:minimum[:fraction]]"

END DEFINE

DELETE TOKEN "%DICTIONARY" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "%DICTIONARY" -
    /LANGUAGE="Pascal" -
    /PLACEHOLDER=DICTIONARY_DIRECTIVE

END DEFINE
DELETE TOKEN "%INCLUDE" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "%INCLUDE" -
    /LANGUAGE="Pascal" -
    /PLACEHOLDER="%INCLUDE"

END DEFINE
DELETE TOKEN "%SUBTITLE" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "%SUBTITLE" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="" -

    "%SUBTITLE '[title_string]'"

END DEFINE

DELETE TOKEN "%TITLE" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "%TITLE" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="" -

    "%TITLE '[title_string]'"

END DEFINE

DELETE TOKEN "<" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "<" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="Enter a pseudocode comment." -

    "«{tbs}»"

END DEFINE

DELETE TOKEN ABS -
    /LANGUAGE="Pascal"
DEFINE TOKEN ABS -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="computes the absolute value of x" -

    "ABS( {arithmetic_parameter} )"

END DEFINE

DELETE TOKEN ABSTRACT -
    /LANGUAGE="Pascal"
DEFINE TOKEN ABSTRACT -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="A high-level description of the module." -

    "ABSTRACT:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN ACTUAL_PARAMETER -
    /LANGUAGE="Pascal"
DEFINE TOKEN ACTUAL_PARAMETER -
    /LANGUAGE="Pascal" -
    /PLACEHOLDER=ACTUAL_PARAMETER

END DEFINE
DELETE TOKEN ADDRESS -
    /LANGUAGE="Pascal"
DEFINE TOKEN ADDRESS -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="returns a pointer value that refers to x" -

    "ADDRESS( {volatile_or_readonly_var} )"

END DEFINE

DELETE TOKEN ADD_INTERLOCKED -
    /LANGUAGE="Pascal"
DEFINE TOKEN ADD_INTERLOCKED -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="adds value of expression to value of the variable" -

    "ADD_INTERLOCKED( {add_exp}, {add_var} )"

END DEFINE

DELETE TOKEN ALGORITHM -
    /LANGUAGE="Pascal"
DEFINE TOKEN ALGORITHM -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="A prose description of the algorithm or design used." -

    "ALGORITHM:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN ALIGNED -
    /LANGUAGE="Pascal"
DEFINE TOKEN ALIGNED -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="aligned on indicated boundary" -

    "ALIGNED( [align_boundary] )"

END DEFINE

DELETE TOKEN ARCTAN -
    /LANGUAGE="Pascal"
DEFINE TOKEN ARCTAN -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="computes the arc tangent of x and expresses result in radians" -

    "ARCTAN( {arithmetic_parameter} )"

END DEFINE

DELETE TOKEN ARGUMENT -
    /LANGUAGE="Pascal"
DEFINE TOKEN ARGUMENT -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="denotes a particular argument that corresponds to a parm with LIST" -

    "ARGUMENT( {parameter_name}, {argument_number} )"

END DEFINE

DELETE TOKEN ARGUMENTS -
    /LANGUAGE="Pascal"
DEFINE TOKEN ARGUMENTS -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="For each argument: its name, punctuation (tag terminator), description." -

    "ARGUMENTS:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN ARGUMENT_LIST_LENGTH -
    /LANGUAGE="Pascal"
DEFINE TOKEN ARGUMENT_LIST_LENGTH -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="# of arguments corresponding to a LIST parameter" -

    "ARGUMENT_LIST_LENGTH( {parameter_name} )"

END DEFINE

DELETE TOKEN "ARITHMETIC EXCEPTIONS HANDLED" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "ARITHMETIC EXCEPTIONS HANDLED" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="A description of any arithmetic exceptions handled." -

    "ARITHMETIC EXCEPTIONS HANDLED:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN ARRAY -
    /LANGUAGE="Pascal"
DEFINE TOKEN ARRAY -
    /LANGUAGE="Pascal" -
    /PLACEHOLDER=ARRAY

END DEFINE
DELETE TOKEN ARRAY_CONSTRUCTOR -
    /LANGUAGE="Pascal"
DEFINE TOKEN ARRAY_CONSTRUCTOR -
    /LANGUAGE="Pascal" -
    /PLACEHOLDER=ARRAY_CONSTRUCTOR

END DEFINE
DELETE TOKEN ASSIGNMENT -
    /LANGUAGE="Pascal"
DEFINE TOKEN ASSIGNMENT -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="variable := expression" -

    "{variable | func_id} := {value_expr}"

END DEFINE

DELETE TOKEN ASYNCHRONOUS -
    /LANGUAGE="Pascal"
DEFINE TOKEN ASYNCHRONOUS -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="routine may be called by an asynchronous event" -

    "ASYNCHRONOUS"

END DEFINE

DELETE TOKEN AT -
    /LANGUAGE="Pascal"
DEFINE TOKEN AT -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="no storage is allocated" -

    "AT({exact_address})"

END DEFINE

DELETE TOKEN AUTHORS -
    /LANGUAGE="Pascal"
DEFINE TOKEN AUTHORS -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="A list of the authors or maintainers of this module." -

    "AUTHORS:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN AUTOMATIC -
    /LANGUAGE="Pascal"
DEFINE TOKEN AUTOMATIC -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="storage allocated each entry to routine where it's declared" -

    "AUTOMATIC"

END DEFINE

DELETE TOKEN BEGIN -
    /LANGUAGE="Pascal"
DEFINE TOKEN BEGIN -
    /LANGUAGE="Pascal" -
    /PLACEHOLDER=COMPOUND

END DEFINE
DELETE TOKEN BIN -
    /LANGUAGE="Pascal"
DEFINE TOKEN BIN -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="converts the value of x to its binary equivalent" -

    "BIN( {convert_type}, [final_length [digits]] )"

END DEFINE

DELETE TOKEN BIT -
    /LANGUAGE="Pascal"
DEFINE TOKEN BIT -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="amount of storage expressed in bits" -

    "BIT( [storage_units] )"

END DEFINE

DELETE TOKEN BITNEXT -
    /LANGUAGE="Pascal"
DEFINE TOKEN BITNEXT -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="# of bits allocated for component of var in packed array" -

    "BITNEXT( {var_or_type_parm} )"

END DEFINE

DELETE TOKEN BITSIZE -
    /LANGUAGE="Pascal"
DEFINE TOKEN BITSIZE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="# of bits allocated for component of var in packed record" -

    "BITSIZE( {var_or_type_parm} )"

END DEFINE

DELETE TOKEN BIT_OFFSET -
    /LANGUAGE="Pascal"
DEFINE TOKEN BIT_OFFSET -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="bit-position of a field of type x in a record" -

    "BIT_OFFSET( {var_or_type_parm} )"

END DEFINE

DELETE TOKEN BOOLEAN -
    /LANGUAGE="Pascal"
DEFINE TOKEN BOOLEAN -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="either false or true" -

    "BOOLEAN"

END DEFINE

DELETE TOKEN BYTE -
    /LANGUAGE="Pascal"
DEFINE TOKEN BYTE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="amount of storage expressed in bytes" -

    "BYTE( [storage_units] )"

END DEFINE

DELETE TOKEN BYTE_OFFSET -
    /LANGUAGE="Pascal"
DEFINE TOKEN BYTE_OFFSET -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="byte-position of a field of type x in a record" -

    "BYTE_OFFSET( {var_or_type_parm} )"

END DEFINE

DELETE TOKEN CARD -
    /LANGUAGE="Pascal"
DEFINE TOKEN CARD -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="returns number of components currently elements of set" -

    "CARD( {set_expression} )"

END DEFINE

DELETE TOKEN CASE -
    /LANGUAGE="Pascal"
DEFINE TOKEN CASE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="CASE expression OF ..." -

    "CASE {case_selector} OF"
    "     {case_expressions | otherwise_stmt}"
    "     END"

END DEFINE

DELETE TOKEN "CDD PATHNAMES" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "CDD PATHNAMES" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="CDD Pathnames used in this module." -

    "CDD PATHNAMES:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN CHAR -
    /LANGUAGE="Pascal"
DEFINE TOKEN CHAR -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="single character values from the ASCII character set" -

    "CHAR"

END DEFINE

DELETE TOKEN CHECK -
    /LANGUAGE="Pascal"
DEFINE TOKEN CHECK -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="specifies error checking options" -

    "CHECK({check_options}...)"

END DEFINE

DELETE TOKEN CHR -
    /LANGUAGE="Pascal"
DEFINE TOKEN CHR -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="converts x to its char value" -

    "CHR( {int_or_uns_parm} )"

END DEFINE

DELETE TOKEN CLASS_A -
    /LANGUAGE="Pascal"
DEFINE TOKEN CLASS_A -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="class_a descriptor" -

    "CLASS_A"

END DEFINE

DELETE TOKEN CLASS_NCA -
    /LANGUAGE="Pascal"
DEFINE TOKEN CLASS_NCA -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="class_nca descriptor" -

    "CLASS_NCA"

END DEFINE

DELETE TOKEN CLASS_S -
    /LANGUAGE="Pascal"
DEFINE TOKEN CLASS_S -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="class_s descriptor" -

    "CLASS_S"

END DEFINE

DELETE TOKEN CLEAR_INTERLOCKED -
    /LANGUAGE="Pascal"
DEFINE TOKEN CLEAR_INTERLOCKED -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="assigns FALSE to b and returns original value of b" -

    "CLEAR_INTERLOCKED( {boolean_var} )"

END DEFINE

DELETE TOKEN "CLIENT OBLIGATIONS" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "CLIENT OBLIGATIONS" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="Subsequent obligations imposed on client, such as freeing memory" -

    "CLIENT OBLIGATIONS:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN CLOCK -
    /LANGUAGE="Pascal"
DEFINE TOKEN CLOCK -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="amount of cpu time in mil_sec used by current process" -

    "CLOCK"

END DEFINE

DELETE TOKEN CLOSE -
    /LANGUAGE="Pascal"
DEFINE TOKEN CLOSE -
    /LANGUAGE="Pascal" -
    /PLACEHOLDER=CLOSE

END DEFINE
DELETE TOKEN COMMENT_LINE -
    /LANGUAGE="Pascal"
DEFINE TOKEN COMMENT_LINE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="" -

    "{ left_marker comment_string right_marker }"

END DEFINE

DELETE TOKEN COMMON -
    /LANGUAGE="Pascal"
DEFINE TOKEN COMMON -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="storage for a var allocated in a common block" -

    "COMMON( [common_block] )"

END DEFINE

DELETE TOKEN "COMPILATION QUALIFIERS" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "COMPILATION QUALIFIERS" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="Qualifiers to use to successfully compile this module." -

    "COMPILATION QUALIFIERS:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN "COMPLETION CODE" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "COMPLETION CODE" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="Any completion code returned by this procedure." -

    "COMPLETION CODE:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN COMPONENT -
    /LANGUAGE="Pascal"
DEFINE TOKEN COMPONENT -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="The component to which this module belongs." -

    "COMPONENT:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN COMPOUND -
    /LANGUAGE="Pascal"
DEFINE TOKEN COMPOUND -
    /LANGUAGE="Pascal" -
    /PLACEHOLDER=COMPOUND

END DEFINE
DELETE TOKEN CONST -
    /LANGUAGE="Pascal"
DEFINE TOKEN CONST -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="CONST {const_id = const_expression};..." -

    "CONST"
    "    {constant_definition}...;"
    " "

END DEFINE

DELETE TOKEN COS -
    /LANGUAGE="Pascal"
DEFINE TOKEN COS -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="computes the cosine of x, which is expressed in radians" -

    "COS( {arithmetic_parameter} )"

END DEFINE

DELETE TOKEN CREATE_DIRECTORY -
    /LANGUAGE="Pascal"
DEFINE TOKEN CREATE_DIRECTORY -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="creates a new VMS directory or subdirectory" -

    "CREATE_DIRECTORY( {file_specification}, [error_return] )"

END DEFINE

DELETE TOKEN "CREATION DATE" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "CREATION DATE" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="The creation date of this module." -

    "CREATION DATE:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN DATE_FUNC -
    /LANGUAGE="Pascal"
DEFINE TOKEN DATE_FUNC -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="convert date portion of timestamp to a string" -

    "DATE( {timestamp_parameter} )"

END DEFINE

DELETE TOKEN DATE_PROC -
    /LANGUAGE="Pascal"
DEFINE TOKEN DATE_PROC -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="assign the current date to a string variable" -

    "DATE( {time string} )"

END DEFINE

DELETE TOKEN DBLE -
    /LANGUAGE="Pascal"
DEFINE TOKEN DBLE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="converts x to its double precision equivalent" -

    "DBLE( {arithmetic_parameter} )"

END DEFINE

DELETE TOKEN DEC -
    /LANGUAGE="Pascal"
DEFINE TOKEN DEC -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="signed decimal representation of a parameter,<= 32 bits" -

    "DEC( {32_bit_var}, [final_length [digits]] )"

END DEFINE

DELETE TOKEN DELETE -
    /LANGUAGE="Pascal"
DEFINE TOKEN DELETE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="deletes the current file component" -

    "DELETE( {file_variable}, ERROR := [error_recovery] )"

END DEFINE

DELETE TOKEN DELETE_FILE -
    /LANGUAGE="Pascal"
DEFINE TOKEN DELETE_FILE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="deletes one or more VMS files" -

    "DELETE_FILE( {file_specification}, [error_return] )"

END DEFINE

DELETE TOKEN "DESIGN ISSUES" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "DESIGN ISSUES" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="Any noteworthy issues regarding the design of the module." -

    "DESIGN ISSUES:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN DISCRIMINATED_SCHEMA_TYPE -
    /LANGUAGE="Pascal"
DEFINE TOKEN DISCRIMINATED_SCHEMA_TYPE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="discriminated schema type" -

    "{schema_name}( {actual_discriminant_list}... )"

END DEFINE

DELETE TOKEN DISPOSE -
    /LANGUAGE="Pascal"
DEFINE TOKEN DISPOSE -
    /LANGUAGE="Pascal" -
    /PLACEHOLDER=DISPOSE

END DEFINE
DELETE TOKEN DISPOSE_PTR -
    /LANGUAGE="Pascal"
DEFINE TOKEN DISPOSE_PTR -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="deallocates memory for the dynamic variable p^" -

    "DISPOSE( {pointer_exp} )"

END DEFINE

DELETE TOKEN DISPOSE_REC_WITH_VARIANT -
    /LANGUAGE="Pascal"
DEFINE TOKEN DISPOSE_REC_WITH_VARIANT -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="disposes dynamic variables of a record type with variants" -

    "DISPOSE( {variant_pointer_exp}, [tag_list]... )"

END DEFINE

DELETE TOKEN DOUBLE -
    /LANGUAGE="Pascal"
DEFINE TOKEN DOUBLE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="denotes double precision real values" -

    "DOUBLE"

END DEFINE

DELETE TOKEN EMPTY -
    /LANGUAGE="Pascal"
DEFINE TOKEN EMPTY -
    /LANGUAGE="Pascal" -
    /DESCRIPTION=" '          ' " -

    " "

END DEFINE

DELETE TOKEN ENUMERATED -
    /LANGUAGE="Pascal"
DEFINE TOKEN ENUMERATED -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="ordered set of constant values" -

    "({enumeration_ids}...)"

END DEFINE

DELETE TOKEN ENVIRONMENT -
    /LANGUAGE="Pascal"
DEFINE TOKEN ENVIRONMENT -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="units's program/module level declarations are saved" -

    "ENVIRONMENT('[environ_name_string]')"

END DEFINE

DELETE TOKEN EOF -
    /LANGUAGE="Pascal"
DEFINE TOKEN EOF -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="tells whether the file ptr is after the end of file" -

    "EOF[(file_variable)]"

END DEFINE

DELETE TOKEN EOLN -
    /LANGUAGE="Pascal"
DEFINE TOKEN EOLN -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="tests for the eoln marker within a text file" -

    "EOLN[(file_variable)]"

END DEFINE

DELETE TOKEN EPSDOUBLE -
    /LANGUAGE="Pascal"
DEFINE TOKEN EPSDOUBLE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="smallest delta value for type DOUBLE around 1D0" -

    "EPSDOUBLE"

END DEFINE

DELETE TOKEN EPSQUADRUPLE -
    /LANGUAGE="Pascal"
DEFINE TOKEN EPSQUADRUPLE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="smallest delta value for type QUADRUPLE around 1Q0" -

    "EPSQUADRUPLE"

END DEFINE

DELETE TOKEN EPSREAL -
    /LANGUAGE="Pascal"
DEFINE TOKEN EPSREAL -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="smallest delta value for type REAL around 1.0" -

    "EPSREAL"

END DEFINE

DELETE TOKEN EQ -
    /LANGUAGE="Pascal"
DEFINE TOKEN EQ -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="performs string comparison without blank padding" -

    "EQ( {string}, {string} )"

END DEFINE

DELETE TOKEN "ERROR CODES" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "ERROR CODES" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="Any error codes returned by this procedure." -

    "ERROR CODES:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN ESTABLISH -
    /LANGUAGE="Pascal"
DEFINE TOKEN ESTABLISH -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="establishes a condition handler" -

    "ESTABLISH( {establish_func_id} )"

END DEFINE

DELETE TOKEN EXCEPTIONS -
    /LANGUAGE="Pascal"
DEFINE TOKEN EXCEPTIONS -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="Any exceptions signalled by this procedure." -

    "EXCEPTIONS:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN EXP -
    /LANGUAGE="Pascal"
DEFINE TOKEN EXP -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="computes the exponential of x, that is e**x" -

    "EXP( {arithmetic_parameter} )"

END DEFINE

DELETE TOKEN EXPO -
    /LANGUAGE="Pascal"
DEFINE TOKEN EXPO -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="returns the exponent of the floating point representation of r" -

    "EXPO( {real_parameter} )"

END DEFINE

DELETE TOKEN EXPRESSION -
    /LANGUAGE="Pascal"
DEFINE TOKEN EXPRESSION -
    /LANGUAGE="Pascal" -
    /PLACEHOLDER=EXPRESSION

END DEFINE
DELETE TOKEN EXTEND -
    /LANGUAGE="Pascal"
DEFINE TOKEN EXTEND -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="opens an existing file for write access positioning at eof" -

    "EXTEND( {file_variable}, ERROR := [error_recovery] )"

END DEFINE

DELETE TOKEN EXTERNAL -
    /LANGUAGE="Pascal"
DEFINE TOKEN EXTERNAL -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="indicates an assumed global routine or var" -

    "EXTERNAL( [linker_id] )"

END DEFINE

DELETE TOKEN FACILITY -
    /LANGUAGE="Pascal"
DEFINE TOKEN FACILITY -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="The facility to which this module belongs." -

    "FACILITY:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN FALSE -
    /LANGUAGE="Pascal"
DEFINE TOKEN FALSE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="predefined constant of type BOOLEAN" -

    "FALSE"

END DEFINE

DELETE TOKEN FIELD_LIST -
    /LANGUAGE="Pascal"
DEFINE TOKEN FIELD_LIST -
    /LANGUAGE="Pascal" -
    /PLACEHOLDER=FIELD_LIST

END DEFINE
DELETE TOKEN FILE -
    /LANGUAGE="Pascal"
DEFINE TOKEN FILE -
    /LANGUAGE="Pascal" -
    /PLACEHOLDER=FILE

END DEFINE
DELETE TOKEN "FILES USED" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "FILES USED" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="Any files used by this procedure." -

    "FILES USED:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN FILE_OF -
    /LANGUAGE="Pascal"
DEFINE TOKEN FILE_OF -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="sequence of components of the same type" -

    "[PACKED] FILE OF [ [component_attributes]... ] {file_component_type}"

END DEFINE

DELETE TOKEN FIND -
    /LANGUAGE="Pascal"
DEFINE TOKEN FIND -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="positions a file at a specified component" -

    "FIND( {file_variable}, {component_num}, ERROR := [error_recovery] )"

END DEFINE

DELETE TOKEN FINDK -
    /LANGUAGE="Pascal"
DEFINE TOKEN FINDK -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="searches keyed access file and locates specific component" -

    "FINDK( {file_variable}, {key_num}, {key_val},"
    "       [match], ERROR := [error_recovery] )"

END DEFINE

DELETE TOKEN FIND_FIRST_BIT_CLEAR -
    /LANGUAGE="Pascal"
DEFINE TOKEN FIND_FIRST_BIT_CLEAR -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="locates the first bit in a PACKED ARRAY OF BOOLEAN whose value is 0" -

    "FIND_FIRST_BIT_CLEAR( {bit_vector}, [start_index] )"

END DEFINE

DELETE TOKEN FIND_FIRST_BIT_SET -
    /LANGUAGE="Pascal"
DEFINE TOKEN FIND_FIRST_BIT_SET -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="locates the first bit in a PACKED ARRAY OF BOOLEAN whose value is 1" -

    "FIND_FIRST_BIT_SET( {bit_vector}, [start_index] )"

END DEFINE

DELETE TOKEN FIND_MEMBER -
    /LANGUAGE="Pascal"
DEFINE TOKEN FIND_MEMBER -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="locates the first character in a string that is a member of a set" -

    "FIND_MEMBER( {string}, {charset} )"

END DEFINE

DELETE TOKEN FIND_NONMEMBER -
    /LANGUAGE="Pascal"
DEFINE TOKEN FIND_NONMEMBER -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="locates the first character in a string that is not a member of a set" -

    "FIND_NONMEMBER( {string}, {charset} )"

END DEFINE

DELETE TOKEN FOR -
    /LANGUAGE="Pascal"
DEFINE TOKEN FOR -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="FOR {TO | DOWNTO | IN} DO" -

    "FOR {control_var} {iteration_clause} DO"
    "    {statement}"

END DEFINE

DELETE TOKEN "FORMAL ARGUMENTS" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "FORMAL ARGUMENTS" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="For each argument: its name, punctuation (tag terminator), description." -

    "FORMAL ARGUMENTS:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN "FORMAL PARAMETERS" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "FORMAL PARAMETERS" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="For each argument: its name, punctuation (tag terminator), description." -

    "FORMAL PARAMETERS:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN FUNCTION -
    /LANGUAGE="Pascal"
DEFINE TOKEN FUNCTION -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="function_heading {block | directive}" -

    "[ [routine_attribute]... ]"
    "FUNCTION {user_defined_id}"
    "    ( [formal_parameters]... ) : [ [func_result_attributes]... ] {func_type_id};"
    " "
    "    [function_level_comments]"
    " "
    "    {block_or_directive};"
    " "

END DEFINE

DELETE TOKEN "FUNCTION VALUE" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "FUNCTION VALUE" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="The value of the function." -

    "FUNCTION VALUE:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN "FUNCTIONAL DESCRIPTION" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "FUNCTIONAL DESCRIPTION" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="A description of the procedure." -

    "FUNCTIONAL DESCRIPTION:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN FUNCTION_LEVEL_COMMENTS -
    /LANGUAGE="Pascal"
DEFINE TOKEN FUNCTION_LEVEL_COMMENTS -
    /LANGUAGE="Pascal" -
    /PLACEHOLDER=STANDARD_FUNCTION_LEVEL_COMMENTS

END DEFINE
DELETE TOKEN GE -
    /LANGUAGE="Pascal"
DEFINE TOKEN GE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="performs string comparison without blank padding" -

    "GE( {string}, {string} )"

END DEFINE

DELETE TOKEN GET -
    /LANGUAGE="Pascal"
DEFINE TOKEN GET -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="advances file position, next file component is read" -

    "GET( {file_variable}, ERROR := [error_recovery] )"

END DEFINE

DELETE TOKEN GETTIMESTAMP -
    /LANGUAGE="Pascal"
DEFINE TOKEN GETTIMESTAMP -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="fill in timestamp variable from string or current time" -

    "GETTIMESTAMP( {timestamp_parameter}, [datetime_string] )"

END DEFINE

DELETE TOKEN GLOBAL -
    /LANGUAGE="Pascal"
DEFINE TOKEN GLOBAL -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="provides a strong definition of an object" -

    "GLOBAL( [linker_id] )"

END DEFINE

DELETE TOKEN GOTO -
    /LANGUAGE="Pascal"
DEFINE TOKEN GOTO -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="GOTO label" -

    "GOTO {statement_label}"

END DEFINE

DELETE TOKEN GT -
    /LANGUAGE="Pascal"
DEFINE TOKEN GT -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="performs string comparison without blank padding" -

    "GT( {string}, {string} )"

END DEFINE

DELETE TOKEN G_FLOATING -
    /LANGUAGE="Pascal"
DEFINE TOKEN G_FLOATING -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="vars & exps represented in g_floating notation" -

    "G_FLOATING"

END DEFINE

DELETE TOKEN HALT -
    /LANGUAGE="Pascal"
DEFINE TOKEN HALT -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="calls LIB$STOP with the condition value PAS$_HALT" -

    "HALT"

END DEFINE

DELETE TOKEN HEADER -
    /LANGUAGE="Pascal"
DEFINE TOKEN HEADER -
    /LANGUAGE="Pascal" -
    /PLACEHOLDER=STANDARD_HEADER_LEVEL_COMMENTS

END DEFINE
DELETE TOKEN HEX -
    /LANGUAGE="Pascal"
DEFINE TOKEN HEX -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="converts 'w' to its hexadecimal equivalent" -

    "HEX( {convert_type}, [final_length [digits]] )"

END DEFINE

DELETE TOKEN HIDDEN -
    /LANGUAGE="Pascal"
DEFINE TOKEN HIDDEN -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="object not to be included in an environment file" -

    "HIDDEN"

END DEFINE

DELETE TOKEN IADDRESS -
    /LANGUAGE="Pascal"
DEFINE TOKEN IADDRESS -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="an integer value that refers to x" -

    "IADDRESS( {dynamic_or_variable} )"

END DEFINE

DELETE TOKEN IDENT -
    /LANGUAGE="Pascal"
DEFINE TOKEN IDENT -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="qualifies the name of a compilation unit" -

    "IDENT('{ident_name_string}')"

END DEFINE

DELETE TOKEN IF -
    /LANGUAGE="Pascal"
DEFINE TOKEN IF -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="IF expression THEN statement [ELSE statement]" -

    "IF {expression}"
    "THEN"
    "    {statement}"
    "[ ELSE {statement} ]"

END DEFINE

DELETE TOKEN IMMEDIATE -
    /LANGUAGE="Pascal"
DEFINE TOKEN IMMEDIATE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="pass by immediate value" -

    "IMMEDIATE"

END DEFINE

DELETE TOKEN "IMPLICIT INPUT PARAMETERS" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "IMPLICIT INPUT PARAMETERS" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="Any external data read, but not passed as an explicit parameter." -

    "IMPLICIT INPUT PARAMETERS:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN "IMPLICIT INPUTS" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "IMPLICIT INPUTS" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="Any external data read, but not passed as an explicit parameter." -

    "IMPLICIT INPUTS:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN "IMPLICIT OUTPUT PARAMETERS" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "IMPLICIT OUTPUT PARAMETERS" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="Any external data changed, but not passed as an explicit parameter." -

    "IMPLICIT OUTPUT PARAMETERS:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN "IMPLICIT OUTPUTS" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "IMPLICIT OUTPUTS" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="Any external data changed, but not passed as an explicit parameter." -

    "IMPLICIT OUTPUTS:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN "IMPLICIT PARAMETERS" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "IMPLICIT PARAMETERS" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="Any external data used, but not passed as an explicit parameter." -

    "IMPLICIT PARAMETERS:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN "INCLUDED FILES" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "INCLUDED FILES" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="Any files that are included into this module." -

    "INCLUDED FILES:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN INDEX -
    /LANGUAGE="Pascal"
DEFINE TOKEN INDEX -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="finds first occurence of a pattern in an object string" -

    "INDEX( {object}, {pattern} )"

END DEFINE

DELETE TOKEN INHERIT -
    /LANGUAGE="Pascal"
DEFINE TOKEN INHERIT -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="indicates environment files to be inherited" -

    "INHERIT({inherit_name_strings}...)"

END DEFINE

DELETE TOKEN INITIALIZE -
    /LANGUAGE="Pascal"
DEFINE TOKEN INITIALIZE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="procedure called before main program is entered" -

    "INITIALIZE"

END DEFINE

DELETE TOKEN "INPUT PARAMETERS" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "INPUT PARAMETERS" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="Descriptions of formal parameters that are used but not modified." -

    "INPUT PARAMETERS:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN "INPUT/OUTPUT PARAMETERS" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "INPUT/OUTPUT PARAMETERS" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="Descriptions of formal parameters that are used and modified." -

    "INPUT/OUTPUT PARAMETERS:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN INT -
    /LANGUAGE="Pascal"
DEFINE TOKEN INT -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="converts x into its integer equivalent" -

    "INT( {ordinal_parameter} )"

END DEFINE

DELETE TOKEN INTEGER -
    /LANGUAGE="Pascal"
DEFINE TOKEN INTEGER -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="integer values, ranging from -2**31+1 through 2**31-1" -

    "INTEGER"

END DEFINE

DELETE TOKEN INVARIANTS -
    /LANGUAGE="Pascal"
DEFINE TOKEN INVARIANTS -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="Important conditions guaranteed to be preserved by this procedure." -

    "INVARIANTS:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN KEY -
    /LANGUAGE="Pascal"
DEFINE TOKEN KEY -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="field is to be used as a key" -

    "KEY( [key_option_list] )"

END DEFINE

DELETE TOKEN KEYWORDS -
    /LANGUAGE="Pascal"
DEFINE TOKEN KEYWORDS -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="A list of keywords that characterize the procedure." -

    "KEYWORDS:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN LABEL -
    /LANGUAGE="Pascal"
DEFINE TOKEN LABEL -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="LABEL {label_list},..." -

    "LABEL"
    "    {label_name}...;"
    " "

END DEFINE

DELETE TOKEN LE -
    /LANGUAGE="Pascal"
DEFINE TOKEN LE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="performs string comparison without blank padding" -

    "LE( {string}, {string} )"

END DEFINE

DELETE TOKEN LENGTH -
    /LANGUAGE="Pascal"
DEFINE TOKEN LENGTH -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="returns the length of a character string" -

    "LENGTH( {string} )"

END DEFINE

DELETE TOKEN LEX_ELEMENTS -
    /LANGUAGE="Pascal"
DEFINE TOKEN LEX_ELEMENTS -
    /LANGUAGE="Pascal" -
    /PLACEHOLDER=LEX_ELEMENTS

END DEFINE
DELETE TOKEN LINELIMIT -
    /LANGUAGE="Pascal"
DEFINE TOKEN LINELIMIT -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="ends program execution after a # of lines are written" -

    "LINELIMIT( {file_variable}, {num_of_lines}, ERROR := [error_recovery] )"

END DEFINE

DELETE TOKEN LIST_ATTRIBUTE -
    /LANGUAGE="Pascal"
DEFINE TOKEN LIST_ATTRIBUTE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="can call actual_par corresp to last formal_par named in heading" -

    "LIST"

END DEFINE

DELETE TOKEN LN -
    /LANGUAGE="Pascal"
DEFINE TOKEN LN -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="computes the natural log of x; x > 0" -

    "LN( {arithmetic_parameter} )"

END DEFINE

DELETE TOKEN LOCAL -
    /LANGUAGE="Pascal"
DEFINE TOKEN LOCAL -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="object unavailable to other independently compiled units" -

    "LOCAL"

END DEFINE

DELETE TOKEN LOCATE -
    /LANGUAGE="Pascal"
DEFINE TOKEN LOCATE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="positions a direct access file at a particular component" -

    "LOCATE( {file_variable}, {component_num}, ERROR := [error_recovery] )"

END DEFINE

DELETE TOKEN LONG -
    /LANGUAGE="Pascal"
DEFINE TOKEN LONG -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="amount of storage expressed in long words" -

    "LONG( [storage_units] )"

END DEFINE

DELETE TOKEN LOWER -
    /LANGUAGE="Pascal"
DEFINE TOKEN LOWER -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="return lower bound of ordinal, set, or array index" -

    "LOWER( {var_or_type_parm}, {compile_time_exp} )"

END DEFINE

DELETE TOKEN LT -
    /LANGUAGE="Pascal"
DEFINE TOKEN LT -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="performs string comparison without blank padding" -

    "LT( {string}, {string} )"

END DEFINE

DELETE TOKEN MAX -
    /LANGUAGE="Pascal"
DEFINE TOKEN MAX -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="returns the maximum value of the list" -

    "MAX( {arithmetic_list}... )"

END DEFINE

DELETE TOKEN MAXCHAR -
    /LANGUAGE="Pascal"
DEFINE TOKEN MAXCHAR -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="largest possible value for type CHAR" -

    "MAXCHAR"

END DEFINE

DELETE TOKEN MAXDOUBLE -
    /LANGUAGE="Pascal"
DEFINE TOKEN MAXDOUBLE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="largest possible value for type DOUBLE" -

    "MAXDOUBLE"

END DEFINE

DELETE TOKEN MAXINT -
    /LANGUAGE="Pascal"
DEFINE TOKEN MAXINT -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="largest possible value for type INTEGER" -

    "MAXINT"

END DEFINE

DELETE TOKEN MAXQUADRUPLE -
    /LANGUAGE="Pascal"
DEFINE TOKEN MAXQUADRUPLE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="largest possible value for type QUADRUPLE" -

    "MAXQUADRUPLE"

END DEFINE

DELETE TOKEN MAXREAL -
    /LANGUAGE="Pascal"
DEFINE TOKEN MAXREAL -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="largest possible value for type REAL" -

    "MAXREAL"

END DEFINE

DELETE TOKEN MFPR -
    /LANGUAGE="Pascal"
DEFINE TOKEN MFPR -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="Returns current value in register" -

    "MFPR ( {register_num} )"

END DEFINE

DELETE TOKEN MIN -
    /LANGUAGE="Pascal"
DEFINE TOKEN MIN -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="returns the minimum value of the list" -

    "MIN( {arithmetic_list}... )"

END DEFINE

DELETE TOKEN MINDOUBLE -
    /LANGUAGE="Pascal"
DEFINE TOKEN MINDOUBLE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="minimum value for type DOUBLE" -

    "MINDOUBLE"

END DEFINE

DELETE TOKEN MINQUADRUPLE -
    /LANGUAGE="Pascal"
DEFINE TOKEN MINQUADRUPLE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="minimum value for type QUADRUPLE" -

    "MINQUADRUPLE"

END DEFINE

DELETE TOKEN MINREAL -
    /LANGUAGE="Pascal"
DEFINE TOKEN MINREAL -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="minimum value for type REAL" -

    "MINREAL"

END DEFINE

DELETE TOKEN "MODIFICATION HISTORY" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "MODIFICATION HISTORY" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="The modification history of the module." -

    "MODIFICATION HISTORY:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN MODULE -
    /LANGUAGE="Pascal"
DEFINE TOKEN MODULE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="" -

    "[ [comp_unit_attribute]... ]"
    "MODULE {user_defined_id} ( [program_parameter]... );"
    " "
    "[header_level_comments]"
    " "
    "[declaration_list]..."
    " "
    "[module_initialization]"
    " "
    "[module_finalization]"
    " "
    "END."

END DEFINE

DELETE TOKEN MTPR -
    /LANGUAGE="Pascal"
DEFINE TOKEN MTPR -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="Moves a specified value into a register" -

    "MTPR ( {register_num} , {expression} )"

END DEFINE

DELETE TOKEN NE -
    /LANGUAGE="Pascal"
DEFINE TOKEN NE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="performs string comparison without blank padding" -

    "NE( {string}, {string} )"

END DEFINE

DELETE TOKEN NEW -
    /LANGUAGE="Pascal"
DEFINE TOKEN NEW -
    /LANGUAGE="Pascal" -
    /PLACEHOLDER=NEW

END DEFINE
DELETE TOKEN NEW_PTR -
    /LANGUAGE="Pascal"
DEFINE TOKEN NEW_PTR -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="sets aside memory for the dynamic variable, p^" -

    "NEW( {pointer_var} )"

END DEFINE

DELETE TOKEN NEW_PTR_UNDISCRIMINATED_SCHEMA -
    /LANGUAGE="Pascal"
DEFINE TOKEN NEW_PTR_UNDISCRIMINATED_SCHEMA -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="allocates memory for dynamic vars of an undiscriminated schema type" -

    "NEW( {pointer_var}, {actual_discriminant_list}... )"

END DEFINE

DELETE TOKEN NEW_REC_WITH_VARIANT -
    /LANGUAGE="Pascal"
DEFINE TOKEN NEW_REC_WITH_VARIANT -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="allocates memory for dynamic vars of a variant record type" -

    "NEW( {variant_pointer_var}, [tag_list]... )"

END DEFINE

DELETE TOKEN NEXT -
    /LANGUAGE="Pascal"
DEFINE TOKEN NEXT -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="# of bytes allocated for component of var in unpacked array" -

    "NEXT( {var_or_type_parm} )"

END DEFINE

DELETE TOKEN NOG_FLOATING -
    /LANGUAGE="Pascal"
DEFINE TOKEN NOG_FLOATING -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="vars & exps represented in d_floating notation" -

    "NOG_FLOATING"

END DEFINE

DELETE TOKEN "NON-STANDARD FEATURES USED" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "NON-STANDARD FEATURES USED" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="Any non-standard features used by this procedure." -

    "NON-STANDARD FEATURES USED:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN NOOPTIMIZE -
    /LANGUAGE="Pascal"
DEFINE TOKEN NOOPTIMIZE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="compiler is not allowed to optimize the object" -

    "NOOPTIMIZE"

END DEFINE

DELETE TOKEN OBLIGATIONS -
    /LANGUAGE="Pascal"
DEFINE TOKEN OBLIGATIONS -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="Anything the caller must do after using this procedure, e. g. release memory." -

    "OBLIGATIONS:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN OCT -
    /LANGUAGE="Pascal"
DEFINE TOKEN OCT -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="converts 'w' into its octal equivalent" -

    "OCT( {convert_type}, [final_length [digits]] )"

END DEFINE

DELETE TOKEN OCTA -
    /LANGUAGE="Pascal"
DEFINE TOKEN OCTA -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="amount of storage expressed in octa words" -

    "OCTA( [storage_units] )"

END DEFINE

DELETE TOKEN ODD -
    /LANGUAGE="Pascal"
DEFINE TOKEN ODD -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="tests whether the value of x is odd; boolean result" -

    "ODD( {int_or_uns_parm} )"

END DEFINE

DELETE TOKEN OPEN -
    /LANGUAGE="Pascal"
DEFINE TOKEN OPEN -
    /LANGUAGE="Pascal" -
    /PLACEHOLDER=OPEN

END DEFINE
DELETE TOKEN OPERATORS -
    /LANGUAGE="Pascal"
DEFINE TOKEN OPERATORS -
    /LANGUAGE="Pascal" -
    /PLACEHOLDER=OPERATORS

END DEFINE
DELETE TOKEN OPTIMIZE -
    /LANGUAGE="Pascal"
DEFINE TOKEN OPTIMIZE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="specifies optimize options" -

    "OPTIMIZE({optimize_options}...)"

END DEFINE

DELETE TOKEN "OPTIONAL PARAMETERS" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "OPTIONAL PARAMETERS" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="Descriptions of parameters that are optional." -

    "OPTIONAL PARAMETERS:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN ORD -
    /LANGUAGE="Pascal"
DEFINE TOKEN ORD -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="returns the position of x in the ordered sequence of values of x's type" -

    "ORD( {ordinal_parameter} )"

END DEFINE

DELETE TOKEN "OUTPUT PARAMETERS" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "OUTPUT PARAMETERS" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="Descriptions of parameters whose values are set by this procedure." -

    "OUTPUT PARAMETERS:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN OVERLAID -
    /LANGUAGE="Pascal"
DEFINE TOKEN OVERLAID -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="vars at program level overlay ones in other overlaid units" -

    "OVERLAID"

END DEFINE

DELETE TOKEN PAC -
    /LANGUAGE="Pascal"
DEFINE TOKEN PAC -
    /LANGUAGE="Pascal" -
    /PLACEHOLDER=PACKED_ARRAY_OF_CHAR

END DEFINE
DELETE TOKEN PACK -
    /LANGUAGE="Pascal"
DEFINE TOKEN PACK -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="copies components of an unpacked array to a packed array" -

    "PACK( {unpacked_array_var}, {start_index}, {packed_array_var} )"

END DEFINE

DELETE TOKEN PAD -
    /LANGUAGE="Pascal"
DEFINE TOKEN PAD -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="appends fill char to string extending string to final length" -

    "PAD( {string}, {fill_char}, {final_length} )"

END DEFINE

DELETE TOKEN PAGE -
    /LANGUAGE="Pascal"
DEFINE TOKEN PAGE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="skips from current page to next page of text" -

    "PAGE( {file_variable}, ERROR := [error_recovery] )"

END DEFINE

DELETE TOKEN PARAMETERS -
    /LANGUAGE="Pascal"
DEFINE TOKEN PARAMETERS -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="Descriptions of parameters for this procedure." -

    "PARAMETERS:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN "PORTABILITY ISSUES" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "PORTABILITY ISSUES" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="Any issues that relate to the portability of this module." -

    "PORTABILITY ISSUES:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN POS -
    /LANGUAGE="Pascal"
DEFINE TOKEN POS -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="forces field to a specific bit position within record" -

    "POS({bit_location})"

END DEFINE

DELETE TOKEN POSTCONDITIONS -
    /LANGUAGE="Pascal"
DEFINE TOKEN POSTCONDITIONS -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="Conditions guaranteed to be true after calling this procedure." -

    "POSTCONDITIONS:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN PRECONDITIONS -
    /LANGUAGE="Pascal"
DEFINE TOKEN PRECONDITIONS -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="Conditions that must be true before calling this procedure." -

    "PRECONDITIONS:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN PRED -
    /LANGUAGE="Pascal"
DEFINE TOKEN PRED -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="returns the value immediately preceding x" -

    "PRED( {ordinal_parameter} )"

END DEFINE

DELETE TOKEN PRESENT -
    /LANGUAGE="Pascal"
DEFINE TOKEN PRESENT -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="indicates there's an argument corres. to optional parameter" -

    "PRESENT( {parameter_name} )"

END DEFINE

DELETE TOKEN PROCEDURE -
    /LANGUAGE="Pascal"
DEFINE TOKEN PROCEDURE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="procedure_heading {block | directive}" -

    "[ [routine_attribute]... ]"
    "PROCEDURE {user_defined_id}"
    "    ( [formal_parameters]... );"
    " "
    "    [procedure_level_comments]"
    " "
    "    {block_or_directive};"
    " "

END DEFINE

DELETE TOKEN PROCEDURE_LEVEL_COMMENTS -
    /LANGUAGE="Pascal"
DEFINE TOKEN PROCEDURE_LEVEL_COMMENTS -
    /LANGUAGE="Pascal" -
    /PLACEHOLDER=STANDARD_PROCEDURE_LEVEL_COMMENTS

END DEFINE
DELETE TOKEN PROGRAM -
    /LANGUAGE="Pascal"
DEFINE TOKEN PROGRAM -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="" -

    "[ [comp_unit_attribute]... ]"
    "PROGRAM {user_defined_id} ( [program_parameter]... );"
    " "
    "[header_level_comments]"
    " "
    "[declaration_list]..."
    " "
    "BEGIN"
    "[statement_list]..."
    "END."

END DEFINE

DELETE TOKEN "PROGRAM ABSTRACT" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "PROGRAM ABSTRACT" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="An abstract description of this program or module." -

    "PROGRAM ABSTRACT:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN "PROGRAM DESCRIPTION" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "PROGRAM DESCRIPTION" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="A description of this program or module." -

    "PROGRAM DESCRIPTION:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN PSECT -
    /LANGUAGE="Pascal"
DEFINE TOKEN PSECT -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="designates program section where storage for an object is" -

    "PSECT({designate_id})"

END DEFINE

DELETE TOKEN PUT -
    /LANGUAGE="Pascal"
DEFINE TOKEN PUT -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="adds a new component to a file" -

    "PUT( {file_variable}, ERROR := [error_recovery] )"

END DEFINE

DELETE TOKEN QUAD -
    /LANGUAGE="Pascal"
DEFINE TOKEN QUAD -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="converts x to its quadruple precision equivalent" -

    "QUAD( {arithmetic_parameter} )"

END DEFINE

DELETE TOKEN QUADRUPLE -
    /LANGUAGE="Pascal"
DEFINE TOKEN QUADRUPLE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="denotes quadruple precision real values" -

    "QUADRUPLE"

END DEFINE

DELETE TOKEN QUAD_ATTR -
    /LANGUAGE="Pascal"
DEFINE TOKEN QUAD_ATTR -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="amount of storage expressed in quad words" -

    "QUAD( [storage_units] )"

END DEFINE

DELETE TOKEN READ -
    /LANGUAGE="Pascal"
DEFINE TOKEN READ -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="reads one or more file components into a var" -

    "READ( [file_variable] , {read_var_list}..., ERROR := [error_recovery] )"

END DEFINE

DELETE TOKEN READLN -
    /LANGUAGE="Pascal"
DEFINE TOKEN READLN -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="reads lines of data from a text file" -

    "READLN[(readln_parameters)]"

END DEFINE

DELETE TOKEN READONLY -
    /LANGUAGE="Pascal"
DEFINE TOKEN READONLY -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="object can only be read by a program" -

    "READONLY"

END DEFINE

DELETE TOKEN READV -
    /LANGUAGE="Pascal"
DEFINE TOKEN READV -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="reads characters, assigning them to variable parameters" -

    "READV( {string}, {read_var_list}..., ERROR := [error_recovery] )"

END DEFINE

DELETE TOKEN REAL -
    /LANGUAGE="Pascal"
DEFINE TOKEN REAL -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="denotes single precision real values" -

    "REAL"

END DEFINE

DELETE TOKEN RECORD -
    /LANGUAGE="Pascal"
DEFINE TOKEN RECORD -
    /LANGUAGE="Pascal" -
    /PLACEHOLDER=RECORD

END DEFINE
DELETE TOKEN RECORD_CONSTRUCTOR -
    /LANGUAGE="Pascal"
DEFINE TOKEN RECORD_CONSTRUCTOR -
    /LANGUAGE="Pascal" -
    /PLACEHOLDER=RECORD_CONSTRUCTOR

END DEFINE
DELETE TOKEN REFERENCE -
    /LANGUAGE="Pascal"
DEFINE TOKEN REFERENCE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="pass by reference" -

    "REFERENCE"

END DEFINE

DELETE TOKEN RENAME_FILE -
    /LANGUAGE="Pascal"
DEFINE TOKEN RENAME_FILE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="renames a VMS file" -

    "RENAME_FILE( {old_file_name}, {new_file_name}, [error_return] )"

END DEFINE

DELETE TOKEN REPEAT -
    /LANGUAGE="Pascal"
DEFINE TOKEN REPEAT -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="REPEAT statement_list UNTIL expression" -

    "REPEAT"
    "    {statement_list}..."
    "UNTIL {expression}"

END DEFINE

DELETE TOKEN RESET -
    /LANGUAGE="Pascal"
DEFINE TOKEN RESET -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="readies a file for reading" -

    "RESET( {file_variable}, ERROR := [error_recovery] )"

END DEFINE

DELETE TOKEN RESETK -
    /LANGUAGE="Pascal"
DEFINE TOKEN RESETK -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="readies a file for reading" -

    "RESETK( {file_variable}, {key_num}, ERROR := [error_recovery] )"

END DEFINE

DELETE TOKEN RESULT -
    /LANGUAGE="Pascal"
DEFINE TOKEN RESULT -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="The value returned by this procedure." -

    "RESULT:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN "RETURN VALUE" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "RETURN VALUE" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="The value returned by this procedure." -

    "RETURN VALUE:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN REVERT -
    /LANGUAGE="Pascal"
DEFINE TOKEN REVERT -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="cancels a condition handler" -

    "REVERT"

END DEFINE

DELETE TOKEN REWRITE -
    /LANGUAGE="Pascal"
DEFINE TOKEN REWRITE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="readies a file for output" -

    "REWRITE( {file_variable}, ERROR := [error_recovery] )"

END DEFINE

DELETE TOKEN ROUND -
    /LANGUAGE="Pascal"
DEFINE TOKEN ROUND -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="converts r to its integer equivalent by rounding" -

    "ROUND( {real_parameter} )"

END DEFINE

DELETE TOKEN ROUTINE -
    /LANGUAGE="Pascal"
DEFINE TOKEN ROUTINE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="{proc_id | func_id} ( [actual_parameter] )" -

    "{proc_id | func_id}( [actual_parameter]... )"

END DEFINE

DELETE TOKEN "ROUTINE VALUE" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "ROUTINE VALUE" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="The value returned by this procedure." -

    "ROUTINE VALUE:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN SET -
    /LANGUAGE="Pascal"
DEFINE TOKEN SET -
    /LANGUAGE="Pascal" -
    /PLACEHOLDER=SET

END DEFINE
DELETE TOKEN SET_CONSTRUCTOR -
    /LANGUAGE="Pascal"
DEFINE TOKEN SET_CONSTRUCTOR -
    /LANGUAGE="Pascal" -
    /PLACEHOLDER=SET_CONSTRUCTOR

END DEFINE
DELETE TOKEN SET_INTERLOCKED -
    /LANGUAGE="Pascal"
DEFINE TOKEN SET_INTERLOCKED -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="assigns TRUE to b and returns its original value of b" -

    "SET_INTERLOCKED( {boolean_var} )"

END DEFINE

DELETE TOKEN "SIDE EFFECTS" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "SIDE EFFECTS" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="Any side effects of this procedure." -

    "SIDE EFFECTS:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN SIN -
    /LANGUAGE="Pascal"
DEFINE TOKEN SIN -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="computes the sine of x, which is expressed in radians" -

    "SIN( {arithmetic_parameter} )"

END DEFINE

DELETE TOKEN SINGLE -
    /LANGUAGE="Pascal"
DEFINE TOKEN SINGLE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="synonymous with the REAL datatype" -

    "SINGLE"

END DEFINE

DELETE TOKEN SIZE -
    /LANGUAGE="Pascal"
DEFINE TOKEN SIZE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="# of bytes allocated for var or record field of type x" -

    "SIZE( {var_or_type_parm}, [field_labels]... )"

END DEFINE

DELETE TOKEN SNGL -
    /LANGUAGE="Pascal"
DEFINE TOKEN SNGL -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="rounds x to its single precision equivalent" -

    "SNGL( {arithmetic_parameter} )"

END DEFINE

DELETE TOKEN SQR -
    /LANGUAGE="Pascal"
DEFINE TOKEN SQR -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="computes the square of x" -

    "SQR( {arithmetic_parameter} )"

END DEFINE

DELETE TOKEN SQRT -
    /LANGUAGE="Pascal"
DEFINE TOKEN SQRT -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="computes the square root of x; x >= 0" -

    "SQRT( {arithmetic_parameter} )"

END DEFINE

DELETE TOKEN STATIC -
    /LANGUAGE="Pascal"
DEFINE TOKEN STATIC -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="storage allocated once" -

    "STATIC"

END DEFINE

DELETE TOKEN STATUS -
    /LANGUAGE="Pascal"
DEFINE TOKEN STATUS -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="status of a file following last operation performed on it" -

    "STATUS( {file_variable} )"

END DEFINE

DELETE TOKEN STATUSV -
    /LANGUAGE="Pascal"
DEFINE TOKEN STATUSV -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="returns status of last READV or WRITEV" -

    "STATUSV"

END DEFINE

DELETE TOKEN STRING -
    /LANGUAGE="Pascal"
DEFINE TOKEN STRING -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="A string of characters" -

    "STRING( {string_length} )"

END DEFINE

DELETE TOKEN SUBRANGE -
    /LANGUAGE="Pascal"
DEFINE TOKEN SUBRANGE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="limited portion of another ordinal type" -

    "{lower_sub_bound}..{upper_sub_bound}"

END DEFINE

DELETE TOKEN SUBSTR -
    /LANGUAGE="Pascal"
DEFINE TOKEN SUBSTR -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="extracts a substring from another character string" -

    "SUBSTR( {string}, {start}, {final_length} )"

END DEFINE

DELETE TOKEN SUBSYSTEM -
    /LANGUAGE="Pascal"
DEFINE TOKEN SUBSYSTEM -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="The subsystem of which this module is a part." -

    "SUBSYSTEM:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN SUCC -
    /LANGUAGE="Pascal"
DEFINE TOKEN SUCC -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="returns the value immediately following x" -

    "SUCC( {ordinal_parameter} )"

END DEFINE

DELETE TOKEN SYSTEM -
    /LANGUAGE="Pascal"
DEFINE TOKEN SYSTEM -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="The system of which this module is a part." -

    "SYSTEM:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN TEXT -
    /LANGUAGE="Pascal"
DEFINE TOKEN TEXT -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="file of components of type char" -

    "TEXT"

END DEFINE

DELETE TOKEN "TEXT LIBRARY MODULES INCLUDED" -
    /LANGUAGE="Pascal"
DEFINE TOKEN "TEXT LIBRARY MODULES INCLUDED" -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="Any modules included from a text library." -

    "TEXT LIBRARY MODULES INCLUDED:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN TIMESTAMP -
    /LANGUAGE="Pascal"
DEFINE TOKEN TIMESTAMP -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="" -

    "TIMESTAMP"

END DEFINE

DELETE TOKEN TIME_FUNC -
    /LANGUAGE="Pascal"
DEFINE TOKEN TIME_FUNC -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="convert time portion of timestamp to a string" -

    "TIME( {timestamp_parameter} )"

END DEFINE

DELETE TOKEN TIME_PROC -
    /LANGUAGE="Pascal"
DEFINE TOKEN TIME_PROC -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="assigns current time to a string variable" -

    "TIME( {time string} )"

END DEFINE

DELETE TOKEN TITLE -
    /LANGUAGE="Pascal"
DEFINE TOKEN TITLE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="The title of this module." -

    "TITLE:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN TO_BEGIN -
    /LANGUAGE="Pascal"
DEFINE TOKEN TO_BEGIN -
    /LANGUAGE="Pascal" -
    /PLACEHOLDER=MODULE_INITIALIZATION

END DEFINE
DELETE TOKEN TO_END -
    /LANGUAGE="Pascal"
DEFINE TOKEN TO_END -
    /LANGUAGE="Pascal" -
    /PLACEHOLDER=MODULE_FINALIZATION

END DEFINE
DELETE TOKEN TRUE -
    /LANGUAGE="Pascal"
DEFINE TOKEN TRUE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="predefined constant of type BOOLEAN" -

    "TRUE"

END DEFINE

DELETE TOKEN TRUNC -
    /LANGUAGE="Pascal"
DEFINE TOKEN TRUNC -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="converts r to its integer equivalent by truncating" -

    "TRUNC( {real_parameter} )"

END DEFINE

DELETE TOKEN TRUNCATE -
    /LANGUAGE="Pascal"
DEFINE TOKEN TRUNCATE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="current file component and all following are to be deleted" -

    "TRUNCATE( {file_variable}, ERROR := [error_recovery] )"

END DEFINE

DELETE TOKEN TRUNCATE_ATTRIBUTE -
    /LANGUAGE="Pascal"
DEFINE TOKEN TRUNCATE_ATTRIBUTE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="indicates actual parameter list may be truncated" -

    "TRUNCATE"

END DEFINE

DELETE TOKEN TYPE -
    /LANGUAGE="Pascal"
DEFINE TOKEN TYPE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="TYPE {type_definition};..." -

    "TYPE"
    "    {type_definition}...;"
    " "

END DEFINE

DELETE TOKEN TYPE_CAST_OP -
    /LANGUAGE="Pascal"
DEFINE TOKEN TYPE_CAST_OP -
    /LANGUAGE="Pascal" -
    /PLACEHOLDER=TYPE_CAST_OP

END DEFINE
DELETE TOKEN UAND -
    /LANGUAGE="Pascal"
DEFINE TOKEN UAND -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="performs a binary logical AND on corresponding bits" -

    "UAND( {unsigned_parameter}, {unsigned_parameter} )"

END DEFINE

DELETE TOKEN UDEC -
    /LANGUAGE="Pascal"
DEFINE TOKEN UDEC -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="unsigned decimal representation of a parameter, <= 32 bits" -

    "UDEC( {32_bit_var}, [final_length [digits]] )"

END DEFINE

DELETE TOKEN UFB -
    /LANGUAGE="Pascal"
DEFINE TOKEN UFB -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="TRUE if last file operation gave undefined status to buffer" -

    "UFB( {file_variable} )"

END DEFINE

DELETE TOKEN UINT -
    /LANGUAGE="Pascal"
DEFINE TOKEN UINT -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="converts x to its unsigned equivalent" -

    "UINT( {ordinal_parameter} )"

END DEFINE

DELETE TOKEN UNALIGNED -
    /LANGUAGE="Pascal"
DEFINE TOKEN UNALIGNED -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="aligned on any bit boundary" -

    "UNALIGNED"

END DEFINE

DELETE TOKEN UNBOUND -
    /LANGUAGE="Pascal"
DEFINE TOKEN UNBOUND -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="doesn't access automatic vars in scope where it's declared" -

    "UNBOUND"

END DEFINE

DELETE TOKEN UNDEFINED -
    /LANGUAGE="Pascal"
DEFINE TOKEN UNDEFINED -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="tests whether r contains a reserved operand; boolean result" -

    "UNDEFINED( {real_variable} )"

END DEFINE

DELETE TOKEN UNLOCK -
    /LANGUAGE="Pascal"
DEFINE TOKEN UNLOCK -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="releases the current file component" -

    "UNLOCK( {file_variable}, ERROR := [error_recovery] )"

END DEFINE

DELETE TOKEN UNOT -
    /LANGUAGE="Pascal"
DEFINE TOKEN UNOT -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="performs a binary logical NOT on each bit of an expression" -

    "UNOT( {unsigned_parameter} )"

END DEFINE

DELETE TOKEN UNPACK -
    /LANGUAGE="Pascal"
DEFINE TOKEN UNPACK -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="copies components from a packed array to an unpacked one" -

    "UNPACK( {packed_array_var}, {unpacked_array_var}, {start_index} )"

END DEFINE

DELETE TOKEN UNSAFE -
    /LANGUAGE="Pascal"
DEFINE TOKEN UNSAFE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="object can accept values of any type; no checking" -

    "UNSAFE"

END DEFINE

DELETE TOKEN UNSIGNED -
    /LANGUAGE="Pascal"
DEFINE TOKEN UNSIGNED -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="positive integer values, ranging from 0 through 2**32-1" -

    "UNSIGNED"

END DEFINE

DELETE TOKEN UOR -
    /LANGUAGE="Pascal"
DEFINE TOKEN UOR -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="performs a binary logical OR on corresponding bits" -

    "UOR( {unsigned_parameter}, {unsigned_parameter} )"

END DEFINE

DELETE TOKEN UPDATE -
    /LANGUAGE="Pascal"
DEFINE TOKEN UPDATE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="writes contents of the file buffer into current component" -

    "UPDATE( {file_variable}, ERROR := [error_recovery] )"

END DEFINE

DELETE TOKEN UPPER -
    /LANGUAGE="Pascal"
DEFINE TOKEN UPPER -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="return upper bound of ordinal, set, or array index" -

    "UPPER( {var_or_type_parm}, {compile_time_exp} )"

END DEFINE

DELETE TOKEN UROUND -
    /LANGUAGE="Pascal"
DEFINE TOKEN UROUND -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="converts r to its unsigned equivalent by rounding" -

    "UROUND( {real_parameter} )"

END DEFINE

DELETE TOKEN UTRUNC -
    /LANGUAGE="Pascal"
DEFINE TOKEN UTRUNC -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="converts r to its unsigned equivalent by truncating" -

    "UTRUNC( {real_parameter} )"

END DEFINE

DELETE TOKEN UXOR -
    /LANGUAGE="Pascal"
DEFINE TOKEN UXOR -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="binary logical exclusive OR on the corresponding bits" -

    "UXOR( {unsigned_parameter}, {unsigned_parameter} )"

END DEFINE

DELETE TOKEN VALUE_ATTRIBUTE -
    /LANGUAGE="Pascal"
DEFINE TOKEN VALUE_ATTRIBUTE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="causes the variable to be a reference to an external constant" -

    "VALUE"

END DEFINE

DELETE TOKEN VALUE_DECLARATION_SECTION -
    /LANGUAGE="Pascal"
DEFINE TOKEN VALUE_DECLARATION_SECTION -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="VALUE {variable_identifier = initial_value}" -

    "VALUE"
    "     {value_declaration}...;"
    " "

END DEFINE

DELETE TOKEN VALUE_INITIALIZATION_CLAUSE -
    /LANGUAGE="Pascal"
DEFINE TOKEN VALUE_INITIALIZATION_CLAUSE -
    /LANGUAGE="Pascal" -
    /PLACEHOLDER="VALUE initial_value"

END DEFINE
DELETE TOKEN VAR -
    /LANGUAGE="Pascal"
DEFINE TOKEN VAR -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="VAR {variable_declaration};..." -

    "VAR"
    "    {variable_declaration}...;"
    " "

END DEFINE

DELETE TOKEN VARIANT_CLAUSE -
    /LANGUAGE="Pascal"
DEFINE TOKEN VARIANT_CLAUSE -
    /LANGUAGE="Pascal" -
    /PLACEHOLDER=VARIANT_CLAUSE

END DEFINE
DELETE TOKEN VARYING_OF_CHAR -
    /LANGUAGE="Pascal"
DEFINE TOKEN VARYING_OF_CHAR -
    /LANGUAGE="Pascal" -
    /PLACEHOLDER=VARYING_OF_CHAR

END DEFINE
DELETE TOKEN VERSION -
    /LANGUAGE="Pascal"
DEFINE TOKEN VERSION -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="The version of this module." -

    "VERSION:"
    " "
    "	[description_or_none]"

END DEFINE

DELETE TOKEN VOLATILE -
    /LANGUAGE="Pascal"
DEFINE TOKEN VOLATILE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="indicates assumptions compiler can make about object value" -

    "VOLATILE"

END DEFINE

DELETE TOKEN WEAK_EXTERNAL -
    /LANGUAGE="Pascal"
DEFINE TOKEN WEAK_EXTERNAL -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="not critical to the linking operation" -

    "WEAK_EXTERNAL( [linker_id] )"

END DEFINE

DELETE TOKEN WEAK_GLOBAL -
    /LANGUAGE="Pascal"
DEFINE TOKEN WEAK_GLOBAL -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="linked only when it is included in the link operation" -

    "WEAK_GLOBAL( [linker_id] )"

END DEFINE

DELETE TOKEN WHILE -
    /LANGUAGE="Pascal"
DEFINE TOKEN WHILE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="WHILE expression DO statement" -

    "WHILE {expression} DO"
    "    {statement}"

END DEFINE

DELETE TOKEN WITH -
    /LANGUAGE="Pascal"
DEFINE TOKEN WITH -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="WITH with_element DO statement" -

    "WITH {with_element}... DO"
    "    {statement}"

END DEFINE

DELETE TOKEN WORD -
    /LANGUAGE="Pascal"
DEFINE TOKEN WORD -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="amount of storage expressed in words" -

    "WORD( [storage_units] )"

END DEFINE

DELETE TOKEN WRITE -
    /LANGUAGE="Pascal"
DEFINE TOKEN WRITE -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="assigns data to an output file" -

    "WRITE( [file_variable] , {write_list}..., ERROR := [error_recovery] )"

END DEFINE

DELETE TOKEN WRITELN -
    /LANGUAGE="Pascal"
DEFINE TOKEN WRITELN -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="writes a line of data to a text file" -

    "WRITELN[(writeln_parameters)]"

END DEFINE

DELETE TOKEN WRITEONLY -
    /LANGUAGE="Pascal"
DEFINE TOKEN WRITEONLY -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="object can only have values assigned to it" -

    "WRITEONLY"

END DEFINE

DELETE TOKEN WRITEV -
    /LANGUAGE="Pascal"
DEFINE TOKEN WRITEV -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="writes characters to a character string variable" -

    "WRITEV( {string_var}, {write_list}..., ERROR := [error_recovery] )"

END DEFINE

DELETE TOKEN XOR -
    /LANGUAGE="Pascal"
DEFINE TOKEN XOR -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="binary logical exclusive OR on two sets or boolean values" -

    "XOR( {set_or_bool_parm}, {set_or_bool_parm} )"

END DEFINE

DELETE TOKEN ZERO -
    /LANGUAGE="Pascal"
DEFINE TOKEN ZERO -
    /LANGUAGE="Pascal" -
    /DESCRIPTION="used in assignment statements are initializers to set a variable to binary zero" -

    "ZERO"

END DEFINE