Pathway/iTS SCREEN COBOL Reference Manual (H06.10+, J06.03+)
Procedure Division
HP NonStop Pathway/iTS SCREEN COBOL Reference Manual—426750-003
6-96
SEND Statement
and receives a reply from that server process. The SEND statement includes the
message and a list of reply specifications.
In processing the SEND statement, the TCP retains the reply code values to use when
the server sends the reply. Upon receipt of a reply, the TCP compares the reply code
value to the list of reply code values and determines which reply was received and,
consequently, determines the structure of the data. The TCP then copies the reply into
the SCREEN COBOL program.
identifier-1
is a data item to be sent to the server. The data item represented by this identifier
cannot exceed 32,000 bytes. If
identifier-1
is a variable-length data item, the
SEND statement sends only the currently defined occurrence (a variable-length
data item is an item defined with an OCCURS DEPENDING ON clause).
If this parameter is omitted, zero bytes are sent to the server. A reply will still be
returned from the server.
server-class-name
identifies the server class for which a message is intended. The
server-class-
name
can be a nonnumeric literal or a data item. The size of the field containing
server-class-name
can be 1 through 15 characters.
This is the logical server class name used in the PATHCOM ADD SERVER
command.
pathmon-name
is the name of the PATHMON process that controls links to the server class named
in the server-class-name parameter. For TS/MP 2.3, it is the pathway domain
name, whose member pathmons have the server class (named in the server-class-
name parameter) configured under them. For more information on TS/MP 2.3, see
the
TS/MP Release Supplement
Manual
.
The
pathmon-name
can be a non-numeric literal or a data item. The field
containing
pathmon-name
can have up to 15 characters, but the TCP passes only
the first six characters in network communications.
SEND [
identifier-1
] ,... TO
server-class-name
[ UNDER PATHWAY
pathmon-name
]
[ AT SYSTEM
system-name
]
[ REPLY { CODE {
reply-code-value
} ...
YIELDS [ VARYING ] {
identifier-2
} ... } ...
CODE OTHER YIELDS [ VARYING ] {
identifier-2
} ...
[ ON ERROR
imperative-statement
]