COBOL Manual for TNS/E Programs (H06.08+, J06.03+)

literal-1
is either a simple nonnumeric literal, a hexadecimal nonnumeric literal, or a national literal.
For information about these literals, see:
• Simple Nonnumeric Literals (page 72)
• Hexadecimal Nonnumeric Literals (page 72)
• National Literals (page 73)
literal-2
is either a simple nonnumeric literal, a hexadecimal nonnumeric literal, or a national literal of
the same class (alphanumeric or national) as literal-1.
figurative-constant
is a figurative constant that does not include the word ALL. For information about figurative
constants, see Figurative Constants (page 74).
concatenation-expr
is a concatenation expression of the same class (alphanumeric or national) as literal-1.
Table 57 Maximum Length of Result of Concatenation Expression
Length of ResultClass of Operands
160 alphanumeric character positionsAlphanumeric
80 national character positionsNational
A figurative constant occupies one character position.
Table 58 Class of Result of Concatenation Expression
Class of ResultNumber of Operands That Are Figurative
Constants
Same class as the operands (neither of which is a figurative constant)0
Same class as the other operand (which is not a figurative constant)1
Alphanumeric2
Example 71 Concatenation Expressions
"A zero-terminated string" & X"0"
"Another way of getting a zero-terminated string" & LOW-VALUE
"A string terminated by the zero digit" & ZERO
BLANK & BLANK & "Two leading blanks in the result"
"The symbolic constant" & COPYRIGHT & "is defined in SPECIAL-NAMES paragraph"
Concatenation Expressions 277