The EXHIBIT statement causes an (optionally conditional) display of the literals, and/or identifiers (optionally preceded
by the identifier name) specified in the statement.
General Format
Syntax Rules
- Each identifier specified in the EXHIBIT statement can be any class of data. TALLY and RETURN-CODE are the only special registers
that can be used as identifiers.
- The EXHIBIT CHANGED statement is not supported in class programs when compiling to
.NET COBOL code.
General Rules
- Literals and identifiers displayed by the EXHIBIT statement are separated by a space on the displayed line.
- Each literal can be any figurative constant other than ALL.
- If the literal is numeric, it must be an unsigned integer.
- Each execution of an EXHIBIT NAMED statement displays each identifier or literal specified, with each identifier (including
any qualifiers and subscripts) followed by an "=" (equal sign) and its current value. They all appear on a single line in
the order in which they appear in the statement.
- Each execution of an EXHIBIT CHANGED NAMED statement displays each identifier or literal specified, with each identifier (including
any qualifiers and subscripts) followed by an "=" (equal sign) and its current value. They all appear on a single line in
the order in which they appear in the statement. However, the display for each identifier (name and value) is conditional
on the value of that identifier having changed since the last execution of the current EXHIBIT statement. If one or more of
the identifier values have not changed, neither the name nor the value is printed for those identifiers. If none of the identifier
values has changed, and no literals are specified, no display takes place (display of a blank line is suppressed).
- Each execution of an EXHIBIT CHANGED statement displays the current value of each identifier or literal specified. They all
appear on a single line in the order in which they appear in the statement. However, the value display for each identifier
is conditional on the value of that identifier having changed since the last execution of the current EXHIBIT statement. If
one or more of the identifier values have not changed, the value for those identifiers is not printed; spaces are inserted
instead. If none of the identifier values has changed, and no literals are specified, a blank line is displayed (display of
a blank line is not suppressed).
- Each execution of an EXHIBIT statement with neither the CHANGED nor the NAMED option displays each identifier or literal specified.
They all appear on a single line in the order in which they appear in the statement.