Pathway/iTS SCREEN COBOL Reference Manual (H06.10+, J06.03+)
Procedure Division
HP NonStop Pathway/iTS SCREEN COBOL Reference Manual—426750-003
6-116
SEND MESSAGE Statement
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
MESSAGE statement, only the first 3161 timeout encountered by each TCP
configured under a PATHMON process is logged. An additional 3161 timeout is
logged when the primary TCP fails and the backup TCP takes over and encounters
the timeout. The TCPs filter out all other 3161 timeout errors. If the ON ERROR
clause is not used and a 3161 timeout occurs, the corresponding terminal is
suspended after the timeout is logged.
If the output does not complete in the specified number of seconds,
TERMINATION- STATUS is set to 1, TERMINATION-SUBSTATUS is set to 40,
the operation is cancelled, and any ON ERROR clause is executed.
When the SCREEN COBOL program that contains the SEND MESSAGE
statement is communicating with devices using a queued (CONTROL 26) protocol,
the TERMINATION-SUBSTATUS special register has a value following a SEND
MESSAGE that completes for a TIMEOUT.
If this clause is omitted, there is no time limit.
USER [ CONVERSION ]
numeric-literal
specifies a user conversion procedure associated with either a
send-message
or
a
reply-message
. For a detailed discussion of user conversion procedures, see
the
Pathway/iTS TCP and Terminal Programming Guide
.
ON ERROR
imperative-statement
specifies action to be taken should an error occur in sending the message. If an
error is detected, the
imperative-statement
is executed.
If ON ERROR is omitted and an error is detected, the system takes standard
action. Depending on the error, the system either waits for a resource to become
available or suspends execution of the program.
If ON ERROR is included in the SEND MESSAGE statement, TERMINATION-
STATUS is set to a specified number.
If there are no errors, TERMINATION-STATUS contains the relative position of the
matching reply. Thus, you should write error processing routines to execute only
when an error occurs.
Appendix D, Errors for Message Section Statements, lists errors that can occur
during execution of the SEND MESSAGE statement.
The following rules apply:
•
A
send-message
or
reply-message
cannot exceed 32,000 bytes.
Note. Error messages can be placed in the log by the PATHMON process even if an ON
ERROR clause is included in a SEND MESSAGE statement.










