◄Key► ◄Up► ◄Contents► ◄Index► ◄Back► ──────────────────────────────────────────────────────────────────────────── Construct: Special-names Paragraph Function: Links names used in the program to external switches, and selects some options of the COBOL environment. Syntax: ►►───SPECIAL-NAMES.───────► ┌──────────────────────────────────────────────────────────┐ ▼ │ ►──┬──────────────────────────────────────────────────────────┬──► ├─function-name─┬┬┬──┬─mnemonic-name─┬───────────────┬───┬─┘ ├─SWITCH 1──────┤│└IS┘ └─on-off-phrase─┘ │ ├─SWITCH 2──────┤│ │ ├─SWITCH 3──────┤└─on-off-phrase─────────────────────────┘ ├─SWITCH 4──────┤ ├─SWITCH 5──────┤ ├─SWITCH 6──────┤ ├─SWITCH 7──────┤ ├─SWITCH 8──────┤ ├─SWITCH-1──────┤ ├─SWITCH-2──────┤ ├─SWITCH-3──────┤ ├─SWITCH-4──────┤ ├─SWITCH-5──────┤ ├─SWITCH-6──────┤ ├─SWITCH-7──────┤ └─SWITCH-8──────┘ ►┬────────────────────────────────────────────────────────────────────┬─► │ ┌─────────────────────────────────────────────────────────────────┐│ │ ▼ ││ └─ALPHABET alphabet-name-1─┬──┬┬─STANDARD-1─┬───────────────────────┬┘ └IS┘├─STANDARD-2─┤ │ ├─NATIVE─────┤ │ ├─ASCII──────┤ │ ├─EBCDIC─────┘ │ │ ┌────────────────────────────────┐ │ │ ▼ │ │ └─literal-1─┬──────────────────────┬─┘ ├┬─THROUGH─┬─literal-2─┤ │└─THRU────┘ │ │ ┌─────────────┐ │ │ ▼ │ │ └─ALSO literal-3───────┘ ┌───────────────────────────────────────────────────────────────────┐ ▼ │ ►┬───────────────────────────────────────────────────────────────────┬► │ ┌────────────────────────────────┐ │ │ ├──────────────┐ ┌────────┐ │ │ ▼ │ ▼ │ │ └─SYMBOLIC─┬──────────┬─symbolic-char-1─┬─────┬─integer-1─┬────────┬┘ └CHARACTERS┘ ├─IS──┤ │ │ └─ARE─┘ │ │ ┌───────────┘ │ └─IN alphabet-name-2─┘ ┌──────────────────────────────────────────────────────────┐ ▼ │ ►─┬──────────────────────────────────────────────────────────┬───► │ ┌────────────────────────────────┐ │ │ ▼ │ │ └─CLASS class-name─┬──┬─literal-4─┬──────────────────────┬─┘ └IS┘ └┬─THROUGH─┬─literal-5─┘ └─THRU────┘ ►┬────────────────────────────────────────────┬───────► └─CALL-CONVENTION integer─┬──┬─menmonic-name─┘ └IS┘ ►─┬───────────────────────────────┬─┬──────────────────────────┬─► └─CURRENCY─┬────┬┬──┬─literal-6─┘ └─DECIMAL-POINT─┬──┬─COMMA─┘ └SIGN┘└IS┘ └IS┘ ►┬────────────────────────────────────────┬───────────► └─┬───────┬─SIGN─┬──┬┬────────┬─SEPARATE─┘ └NUMERIC┘ └IS┘└TRAILING┘ ►┬───────────────────┬─┬──────────────────────────┬───► └─CONSOLE─┬──┬─CRT──┘ └──CURSOR─┬──┬─data-name-1─┘ └IS┘ └IS┘ ►┬─────────────────────────────┬─┬────┬───────────────►◄ └─CRT STATUS─┬──┬─data-name-2─┘ └─. ─┘ └IS┘ where on-off-phrase is: ►─┬─ON─┬──────┬┬──┬─cond-1─┬─────────────────────────┬─┬────► │ └STATUS┘└IS┘ └─OFF─┬──────┬┬──┬─cond-2─┘ │ │ └STATUS┘└IS┘ │ └─OFF─┬──────┬┬──┬─cond-2─┬────────────────────────┬─┘ └STATUS┘└IS┘ └─ON─┬──────┬┬──┬─cond-1─┘ └STATUS┘└IS┘ -♦-