iTS 1.0+)

Data Division

Compaq NonStop™ Pathway/iTS SCREEN COBOL Reference Manual—426750-001

5-53

Field-Characteristic Clauses

the screen field. The SHADOWED clause associates the shadow Working-Storage item

with the screen field.

Screen Section Working-Storage Section

05 SCREEN-ITEMA ... :

PIC X(10) :

USING WS-ITEMA 01 WS-ITEMA PIC X(10).

SHADOWED BY WS-A-SHADOW 01 WS-A-SHADOW PIC 9 COMP.

If the screen field defined with a SHADOWED clause has an OCCURS clause,

data-name-1 given in the SHADOWED clause should be a data item having an

OCCURS clause with the same maximum number of occurrences as the occurrences in

the OCCURS clause of this corresponding field in the Screen Section.

The shadow item contains three subfields (bits). The diagram below shows the bits that

constitute a shadow item.

The rightmost bit is the SELECT bit for the screen field. This bit is examined by the

DISPLAY, TURN, RESET, and SET NEW-CURSOR statements that include the

SHADOWED modifier. When the SHADOWED modifier is used in the statement, a

field listed in the statement is not affected unless the SELECT bit in its shadow item is

set to 1. This bit is set programmatically by the user by moving a value to the shadow

item.

The bits to the left of the SELECT bit are the RETURN and ENTER bits. When a

shadowed screen field is specified in an ACCEPT statement, a 1 or a 0 is stored into

each of these bits. The values stored depend on the information received from the

terminal. The values and the associated conditions are listed in Table 5-6

. If the

modified data tag (MDT) is set on (MDTON), the RETURN bit is always set on an

ACCEPT statement.

... RETURN ENTER

SELECT

not used

bit 0 bit 5 bit 6 bit 7

010CDT .CDD