VMS Help COBOL, ENVIRONMENT_DIVISION, SPECIAL-NAMES *Conan The Librarian |
The SPECIAL-NAMES paragraph: (1) associates compiler features and OpenVMS logical names with user-defined mnemonic-names, (2) defines symbolic-characters, (3) specifies the currency sign, (4) selects the decimal point, (5) relates alphabet-names to character sets or collating sequences, (6) relates class-names to character sets, (7) provides for cursor positioning for an ACCEPT (Format 5) statement, and (8) provides information on the cause of termination of an ACCEPT (Format 5) statement. Format - SPECIAL-NAMES. [ [ { CARD-READER } ] [ { PAPER-TAPE-READER } ] [ { CONSOLE } IS device-name ] [ { LINE-PRINTER } ] [ { PAPER-TAPE-PUNCH } ] [ ] [C01 IS top-of-page-name ] [ ] ... [SWITCH switch-name ] [ { IS switch-name } ] [ { [ON STATUS IS cond-name] [OFF STATUS IS cond-name] } ] [ { IS switch-name } ] [ { [OFF STATUS IS cond-name] [ON STATUS IS cond-name] } ] [ { ON STATUS IS cond-name [OFF STATUS IS cond-name] } ] [ { OFF STATUS IS cond-name [ON STATUS IS cond-name] } ] [ { ASCII } ] [ { STANDARD-1 } ] [ { STANDARD-2 } ] [ALPHABET alphabet-name IS { NATIVE } ] ... [ { EBCDIC } ] [ { {first-literal } ] ] [ { { [{ THRU } last-literal ] } ... } ] [ { { [{ THROUGH } ] } } ] [ { { [{ ALSO lit } ... ] } } ] [SYMBOLIC CHARACTERS ] [ {{{symbolic-char} ... { IS } {char-val} ... } ... } ] ... [ {{ { ARE } } } ] [ {{ [IN alphabet-name] } ... ] [CLASS class-name IS {first-literal [{THROUGH} last-literal]} ] [ { [{THRU } ]} ... ] ... [CURRENCY SIGN IS char] [DECIMAL-POINT IS COMMA] [CURSOR IS cursor-position] [CRT STATUS IS crt-status-code]. ]
Additional Information (explode) :
|