Pathway/iTS SCREEN COBOL Reference Manual (G06.24+, H06.03+, Pathway/iTS 1.0+)

Data Division
Compaq NonStop™ Pathway/iTS SCREEN COBOL Reference Manual—426750-001
5-40
Field-Characteristic Clauses
CONVERT BLANKS Clause
The CONVERT BLANKS clause allows the USER CONVERSION clause to be
invoked when the terminal operator enters blanks or fill characters.
In the following example, the conversion procedure for FIELD1 is invoked when the
terminal operator enters data other than blanks or fill characters. The conversion
procedure for FIELD2 is invoked when the operator enters data, blanks, or fill
characters. The conversion procedure for FIELD3 is invoked when the terminal
operator enters data, blanks, or fill characters, or when the field is skipped.
SCREEN SECTION
01 MENU1
05 FIELD1 PIC X(20)
AT 4, 45
TO WS-1
USER CONVERSION 1.
05 FIELD2 PIC X(20)
AT 5, 45
TO WS-2
CONVERT BLANKS
USER CONVERSION 1.
05 FIELD3 PIC X(20)
AT 6, 45
TO WS-3
WHEN ABSENT CLEAR
CONVERT BLANKS
USER CONVERSION 1.
FILL Clause
The FILL clause declares a padding character for the field. When output to the field
does not fill the full width specified, the padding character fills in to the right of the
field.
nonnumeric-literal
is one character long. If a FILL clause is used with a field that allows only double-
byte data (PIC N), the fill character must be a double-byte character. If a FILL
CONVERT BLANKS
Note. When a user presses the Tab key to bypass a field, the MDT (modified data tag) does
not get set (in other words, it is off). In such situations, use the CONVERT BLANKS clause in
conjunction with the WHEN ABSENT CLEAR clause to force blanks in a field. This allows the
USER CONVERSION clause to be invoked.
FILL nonnumeric-literal