iTS 1.0+)

Data Division

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

5-56

Field-Characteristic Clauses

PROCEDURE DIVISION.

MOVE 0 TO WS-STATE-SHAD. (3)

ACCEPT LOCATION-REC-SCREEN (4)

IF WS-STATE-SHAD EQUAL 4 (5)

MOVE 5 TO WS-STATE-SHAD (6)

DISPLAY LOCATION-REC-SCREEN SHADOWED. (7)

TO, FROM, USING Clauses

The TO, FROM, USING clauses are collectively referred to as data association clauses.

These clauses specify a Working-Storage Section or Linkage Section data item that is

associated with the screen field for moving data to and from the screen field. The

clauses determine the general type of a field.

specifies that data is to be moved from the screen field into the data-name-1

area; this is an input association.

FROM

specifies that data is to be moved from the data-name-1 area into the screen

field; this is an output association.

USING

is equivalent to specifying both TO and FROM with the same data name.

data-name-1

is a Working-Storage data item associated with an elementary screen field; the field

cannot be a subscripted item.

(1) Specifies shadow

(2) Declares shadow item

(3) Stores 0 in shadow item

(4) ACCEPT statement stores 0 or 1 in RETURN and ENTER bits

(5) Tests shadow item

(6) Sets SELECT bit

(7) Displays only the screen fields referred to that have a SELECT bit set to 1

{ TO } data-name-1

{ FROM }

{ USING }