COBOL Manual for TNS and TNS/R Programs

Environment Division
HP COBOL Manual for TNS and TNS/R Programs—522555-006
6-16
SPECIAL-NAMES Paragraph
STANDARD-1
STANDARD-2
NATIVE
specify the USASCII character set.
EBCDIC
specifies the Extended Binary-Coded Decimal Interchange Code.
literal-phrase
defines an alphabet explicitly. An alphabet-name defined by literal-phrase
cannot be used in the CODE-SET clause in a file description entry. If you use
literal-phrase, you cannot specify a given character more than once in the
ALPHABET clause.
literal-1
literal-2
literal-3
are unsigned integer literals or nonnumeric literals, but not symbolic-character
figurative constants.
An unsigned integer literal must have a value in the range 1 through 256. It is the
ordinal number of a character position in the computer’s character set (the first
character has ordinal number 1, even though its representation is octal 00).
A nonnumeric literal is an actual character or set of characters in the computer’s
character set. If a nonnumeric literal consists of exactly one character, the literal
identifies that character. If a nonnumeric literal consists of more than one
character, the compiler handles it as an abbreviation for a consecutive series of
literal phrases that identify each of the specified characters individually, in the order
they appear in the nonnumeric literal.
Each nonnumeric literal in a THROUGH or ALSO phrase must specify exactly one
character.
ALSO
literal-3
THROUGH
literal-2
THRU
literal-1
VST029.vsd