ILE COBOL Language Reference
The ILE COBOL extended ACCEPT and DISPLAY statements are similar to the IBM
COBOL/2(TM) 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.
[ Top of Page | Previous Page | Next Page | Table of Contents | Index ]
(C) Copyright IBM Corporation 1992, 2006. All Rights Reserved.