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-65
Clauses in Message Description Entry
•
If you omit the FIELD-DELIMITER clause and the message format is FIXED-
DELIMITED or DELIMITED, field delimiter processing is enabled and the default
field delimiter is a comma (,).
•
When processing a message on a field-by-field basis, you can use the FIELD-
DELIMITER clause with the RESULTING COUNT clause. Refer to the
RESULTING COUNT Clause for details.
FIELD STATUS Clause
The FIELD STATUS clause identifies a Working-Storage Section data group or item
that receives status information about an associated Message Section field. The FIELD
STATUS Working-Storage Section item is updated when data is mapped through the
associated Message Section field. The data is mapped through the field as the data is
moved into or out of Working-Storage by statements such as: SEND MESSAGE,
TRANSFORM, RECEIVE UNSOLICITED MESSAGE, or REPLY TO
UNSOLICITED MESSAGE.
data-item-1
is a Working-Storage group or elementary data item. The size of data-item-1
must be at least 4 bytes or compiler error 369 is generated. The following rules
apply:
•
The first 2 bytes of data-item-1 contain the shadow portion of the field
status information. The shadow portion is used with the PRESENT IF clause to
determine if a conditionally present field is present.
•
The second 2 bytes of data-item-1 contain the field error portion of the
field status information. The field error portion is used to obtain information on
editing errors on fields where editing is specified.
•
The following format is recommended for data-item-1; this format is
recommended so you can have accessible variable names for the shadow portion
and the field error portion:
02 FIELD-STATUS-AREA.
03 SHADOW-INFO PIC 9(4) COMP.
03 FIELD-ERROR PIC 9(4) COMP.
•
You must define data-item-1 as COMP data because the shadow values and
error numbers that the TCP moves into these locations are binary values.
•
data-item-1 is always updated when data is mapped through the associated
Message Section field. If you use FIELD STATUS to determine the presence of
a conditionally present field, you can also use the field status information to
detect editing errors on the field.
FIELD STATUS [IS] data-item-1