Pathway/iTS SCREEN COBOL Reference Manual (H06.10+, J06.03+)

Procedure Division
HP NonStop Pathway/iTS SCREEN COBOL Reference Manual—426750-003
6-55
DIALOG-SEND
For a DIALOG-SEND, the PATHTCP4 allocates a Pathsend buffer of length
1+max( sndlen , maxyldlen ). The value of TERMINATION-SUBSTATUS depends
on the length of the actual reply, the length of the YIELDS buffer, and the length of the
Pathsend buffer as:
Unspecified Reply Codes
Consider these cases:
•
Case 1: If the application does not handle the reply codes received from the server
and there is no ON ERROR clause, TCP causes the terminal to be suspended.
•
Case 2: If a reply code is received but the reply length received does not match the
length of the selected data item holding the reply, TCP suspends the terminal,
provided there is no ON ERROR clause specified by the program.
The difference between PATHTCP3 and PATHTCP4 is that after suspending the
terminal, PATHTCP3 logged an error message to the owning Pathmon of the server
class. In the first case, the log error was 3112 (REPLY NUMBER NOT KNOWN TO
PROGRAM) and in the second case the log error was 3115 (TRANSACTION REPLY
SIZE INVALID). These errors were server-class errors that always appeared against a
STATUS SERVER command. PATHTCP4 being a Pathsend requester does not get a
link to the server-class directly and hence any server-class error cannot be reported to
the concerned PATHMON process. Error 3112 and 3115 is changed to TERMINAL
errors in PATHTCP4 and is reported in response to STATUS TERM command.
Occasionally, an application may choose not to specify all reply codes and is capable
of suppressing error 3112. SCOBOL supports this with specifying REPLY CODE
OTHER clause. For more information, see Unspecified Reply Codes on page 6-101
under SEND statement.
Server reply shorter than
YIELDS buffer
TERMINATION-SUBSTATUS equals server reply
length.
Server reply length equals
YIELDS buffer length
TERMINATION-SUBSTATUS is undefined. This
case does not cause the TCP to invoke the ON
ERROR clause.
Server reply longer than
YIELDS buffer but shorter
than Pathsend buffer
TERMINATION-SUBSTATUS equals server reply
length.
Server reply longer than
YIELDS buffer but equals
Pathsend buffer length
TERMINATION-SUBSTATUS equals server reply
length.
Server reply longer than
YIELDS buffer and longer
than Pathsend buffer
TERMINATION-SUBSTATUS equals Pathsend
buffer length.