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

Data Division
Compaq NonStop™ Pathway/iTS SCREEN COBOL Reference Manual426750-001
5-43
Field-Characteristic Clauses
9 is less than 10 if the screen PICTURE clause is numeric. An input string "9" is greater
than "10" if the screen PICTURE clause is nonnumeric.
When the MUST BE clause is processed, a numeric literal is scaled to match the
PICTURE clause defined for the associated data item. For example, if you have a
PICTURE clause of PIC 999.99 in the Screen Section data item and a MUST BE clause
of MUST BE 100, the MUST BE clause is scaled to MUST BE 100.00. You do not
have to include the decimal places in the MUST BE clause unless you want to specify
the value to two decimal places.
The MUST BE clause by itself does not make a screen field required. For a field to be
required, three clauses are necessary:
LENGTH clause—specifies that a length greater than zero is required (This clause
must be specified for the TCP to verify the MUST BE clause.)
MUST BE clause—specifies acceptable values if the field is present
MDTON (Modified Data Tag On) attribute—specifies data validation even if the
field is unchanged
You can use the THROUGH/THRU clause with level 88 data items associated with
double-byte character-set literals. Byte-by-byte comparisons of all items in the
THROUGH/THRU clause are performed. Double-byte character set data used in the
THROUGH/THRU clause is treated as a byte string.
OCCURS Clause
The OCCURS clause specifies multiple occurrences of screen fields. This clause can
define a column, a row, or a rectangular array of fields. Each occurrence of the field is
identical except for location, and each is associated with a particular occurrence of a
Working-Storage data item having an OCCURS clause.
columns-phrase is:
IN literal-1 COLUMNS { OFFSET } { literal-k } ,...
{ SKIPPING }
lines-phrase is:
ON literal-2 LINES [ SKIPPING literal-3 ]
IN...COLUMNS, ON...LINES
determines the number of field occurrences, the location of each field occurrence,
and the ordering of the field occurrences.
OCCURS { lines-phrase [ columns-phrase ] }
{ columns-phrase [ lines-phrase ] }
[ DEPENDING [ ON ] data-name-1 ]