COBOL Manual for TNS and TNS/R Programs

Procedure Division
HP COBOL Manual for TNS and TNS/R Programs—522555-006
8-69
Concatenation Expressions
Using this order of evaluation, once a truth value for an entire complex condition is
established, evaluation of the condition ceases. For example, in the complex condition
A NOT < 1 AND A NOT > 10 AND B (A) > 5
no attempt is made to fetch B(A) if A is not a valid subscript, because determination
that the first condition is FALSE guarantees that the complete complex condition is
FALSE.
Concatenation Expressions
The value of a concatenation expression is the concatenation of the value of its
operands. It is the equivalent of a literal of the same class and value, and can be used
anywhere that a literal of that class can be used, except in a COPY or REPLACE
statement.
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
•
Hexadecimal Nonnumeric Literals
•
National Literals
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
.
concatenation-expr
is a concatenation expression of the same class (alphanumeric or national) as
literal-1.
literal-1
figurative-constant
&
literal-2
figurative-constant
concatenation-expr
VST801.vsd