The
ILE COBOL extended ACCEPT and DISPLAY statements are similar to the IBM
COBOL/2™ ACCEPT and DISPLAY statements (Format 2) with the following exceptions:
- Some WITH phrases are only syntax checked (as shown in the extended ACCEPT
and DISPLAY syntax diagrams).
- ON ESCAPE is not used as an alternative to ON EXCEPTION.
- If phrases are duplicated in a displayed or an accepted data item, the ILE COBOL compiler
issues a severe error message. The COBOL/2 compiler permits some duplication
of phrases, such as UPON and BELL.
- AUTO-SKIP may be specified with a group item on a ILE COBOL extended ACCEPT
statement but the COBOL/2 compiler generates a severe error message.
- BELL may be specified with a group item on a ILE COBOL extended ACCEPT statement
but the COBOL/2 compiler generates a severe error message.
- The ILE COBOL compiler accepts and applies the following to the appropriate
fields if they are specified with a group item. The COBOL/2 compiler generates
a severe error message.
- REQUIRED
- SECURE
- LEFT-JUSTIFY
- RIGHT-JUSTIFY
- SPACE-FILL
- TRAILING-SIGN
- UPDATE
- ZERO-FILL
- The COBOL/2 compiler justifies the signed numeric data (displayed and
accepted) to the left, and the ILE COBOL compiler justifies these data items
to the right.
- The COBOL/2 compiler handles special effects with figurative constants
when found in the DISPLAY statement (for example, DISPLAY SPACE will do the
same as DISPLAY WITH BLANK SCREEN), while the ILE COBOL compiler does not apply
any special effects to the figurative constants when found as data items to
be displayed in the extended DISPLAY statement.
- The COBOL/2 compiler uses all of the screen positions for displayable
data items, while the ILE COBOL compiler always needs one byte preceding each
displayable data item for the attribute byte. For this reason, line 1 and
column 1 cannot be used on the ILE COBOL extended ACCEPT or DISPLAY statement.
(Error message LNC1263 is issued at compilation time, and LNR7054 at run
time.)
- When one ACCEPT or DISPLAY statement contains the UNDERLINE, HIGHLIGHT
and REVERSE-VIDEO phrases in one WITH phrase, the HIGHLIGHT phrase is ignored.
A warning message (LNC0265) is generated at compile time if this combination
is coded. In an extended DISPLAY statement, the UPON CRT-UNDER phrase is equivalent
to the UNDERLINE phrase. To protect a field from being displayed on the screen,
use the SECURE option.
- Unless you specify the EXTDSPOPT(*NODFRWRT) parameter in the CRTCBLMOD
or CRTBNDCBL command, the ILE COBOL compiler buffers all extended DISPLAY statements
until the next ACCEPT statement is encountered.
- Under the *NOUNDSPCHR compiler option, values below hexadecimal 20 cause
undesirable results in extended ACCEPT and extended DISPLAY operations. To
overcome this hardware limitation, use the (default) *UNDSPCHR option.
- The ILE COBOL compiler does not provide run-time configuration options.
- The length of the data-name in the CRT STATUS clause on the COBOL/2 compiler
is 3 bytes, and the length on the ILE COBOL compiler is 6 bytes.