Appendix I. ACCEPT/DISPLAY and COBOL/2 Considerations
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.