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-90
Clauses in Message Description Entry
MESSAGE SECTION.
01 MSG-Name-Record
FORMAT IS DELIMITED
FIELD-DELIMITER IS ";".
05 MS-Name PIC X(100)
USING WS-Name
RESULTING COUNT IS WS-Name-Length.
If the incoming name field contains:
SMITH John X.;
Start of Field⁄
The resulting location in Working-StorageWorking-Storage, WS-Name, would contain:
SMITH John X.
Start of Field⁄
The value in WS-Name-Length would be equal to 13.
TO/FROM/USING Clauses
The TO, FROM, and USING clauses associate a Working-Storage Section or Linkage
Section data item with a Message Section item. This association allows the data to be
mapped through the Message Section as it is moved into or out of Working-Storage by
statements such as: SEND MESSAGE, TRANSFORM, RECEIVE UNSOLICITED
MESSAGE, or REPLY TO UNSOLICITED MESSAGE.
data-name-1
identifies the Working-Storage or Linkage Section data area from which message
data is received or to which message data is moved. The data-name-1 item must
be described as either alphanumeric (PIC X) or as binary (PIC 9 COMP or PIC S9
COMP); it must not be described as numeric (PIC 9).
TO
specifies that data is to be moved from the message field to the area indicated by
data-name-1.
FROM
specifies that data is to be moved from the area indicated by data-name-1 to the
message field.
USING
specifies that data is to be moved either from the message field to the
data-name-1 data area or from the data-name-1 data area to the message
field, or both.
{ TO } data-name-1
{ FROM }
{ USING }