Pathway/iTS SCREEN COBOL Reference Manual (H06.10+, J06.03+)

Data Division
HP NonStop Pathway/iTS SCREEN COBOL Reference Manual—426750-003
5-32
Input-Control Character Clauses
numeric-literal
is one integer that must be within the range of 0 through 255. numeric-literal
is the decimal value of an 8-bit binary number.
If a process is responding in place of a terminal, SCREEN COBOL interprets the
8-bit pattern as a nonkeyboard character.
OFF
specifies that FIELD-SEPARATOR is not available for the current screen.
If this clause is omitted, the field-separator character is a comma (,).
If used, the FIELD-SEPARATOR clause must be specified at the 01 screen level. The
character defined for FIELD-SEPARATOR cannot be specified for another input-control
character. In the following example, the FIELD-SEPARATOR clause defines S as the
keyboard character to be used.
SCREEN SECTION.
01 EMP-RECORD-SCREEN BASE SIZE 24, 80
FIELD-SEPARATOR IS "S" .
GROUP-SEPARATOR Clause
The GROUP-SEPARATOR clause defines the character used during the processing of
an ACCEPT statement to indicate one of the following:
•
Last item in an OCCURS clause
•
End of a field, if the field preceding the group separator has no multiple
occurrences
The GROUP-SEPARATOR clause is recognized only by terminals operating in
conversational mode.
" nonnumeric-literal "
is one alphanumeric character enclosed in quotation marks.
numeric-literal
is one integer that must be within the range of of 0 through 255.
numeric-literal is the decimal value of an 8-bit binary number.
If a process is responding in place of a terminal, SCREEN COBOL interprets the
8-bit pattern as a nonkeyboard character.
GROUP-SEPARATOR [ IS ] { " nonnumeric-literal " }
{ numeric-literal }
{ OFF }