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

Procedure Division
Compaq NonStop™ Pathway/iTS SCREEN COBOL Reference Manual—426750-001
6-82
SEND MESSAGE Statement
The offset of the specified field from the beginning of its record dictates the offset of
the reply-code field from the beginning of the reply-message.
The length of the specified field dictates the length of the reply-code field.
The data type of the specified field dictates the data type of the reply-code field.
The reply-code in all reply-messages must be the same length and have the
same offset; reply codes need not have the same name.
YIELDS reply-message
specifies either a message template in the Message Section or an 01 level data item
in Working-Storage. It describes the data expected from the intelligent device in
reply to the SEND MESSAGE statement. A reply-message can be associated
with one or more reply-code values.
If reply-message and reply-code are both omitted, no reply is expected.If
only one reply-message is specified and code-field is omitted, any reply is
expected to have the format of the reply-message.
CODE reply-code
specifies a literal or a data item that indicates which reply-message is expected.
No reply-code is needed if there is only one reply-message.
The position of the reply-code in the CODE reply-code clause corresponds
to a TERMINATION-STATUS value. One or more reply-code values can be
associated with each reply-message.
A nonnumeric literal must be enclosed within quotation marks.
ESCAPE ON UNSOLICITED [ MESSAGE ]
specifies that the SEND MESSAGE statement is to be aborted on the arrival of an
unsolicited message. You detect the receipt of an unsolicited message by checking
for the appropriate condition code value in TERMINATION-STATUS following the
completion of the SEND MESSAGE statement. This is an accepted way of
completing a SEND MESSAGE operation and is not handled in the ON ERROR
clause.
The TERMINATION-SUBSTATUS special register has a value following a SEND
MESSAGE that completes for an unsolicited message. This value specifies the state
of the front-end process at the time that the unsolicited message was received.
TIMEOUT timeout-value
specifies a time limit in seconds for output to the intelligent device. The
timeout-value can be a numeric literal or a numeric data item; valid values are
0 through 32,767 seconds.
When a timeout error occurs, it is logged to the Pathway log. If the TCP attribute
SENDMSGTIMEOUT is set to OFF, only the first SENDMSGTIMEOUT timeout
error is logged for the TCP. When the ON ERROR clause is used with a SEND