TS/MP Pathsend and Server Programming Manual (G06.24+, H06.03+)
Pathsend Procedure Call Reference
NonStop TS/MP Pathsend and Server Programming Manual–132500
5-3
Calls From COBOL85
For further information, refer to the C/C++ Programmer’s Guide.
Calls From COBOL85
To invoke any of the procedures from within a COBOL85 program, you execute a
statement of the following form:
pathmon-process-name, pathmon-process-name-len,
server-class-name, server-class-name-len, message-buffer,
request-len, maximum-reply-len, actual-reply-len, timeout,
flags, scsend-op-num, and tag
are variables defined in the WORKING-STORAGE SECTION of the DATA
DIVISION. The types of these variables should be the COBOL85 types that
correspond to the TAL variable types specified in the Pathsend procedure-call
description later in this section. For a table of these corresponding data types, refer
to the information about invoking non-COBOL routines in the COBOL85 Manual.
If the length of a string parameter is declared in a separate parameter (as in
SERVER_CLASS_SEND_), this parameter must be passed to the procedure. If the
length is declared as part of the string parameter in the form name:length (as in
SERVERCLASS_DIALOG_BEGIN_ and SERVERCLASS_DIALOG_SEND_),
the length must not be passed explicitly.
error
is an integer variable (USAGE NATIVE-2) defined in the WORKING-STORAGE
SECTION of the DATA DIVISION.
For further information, refer to the COBOL85 Manual.
ENTER "SERVERCLASS_SEND_" USING pathmon-process-name
pathmon-process-name-len
server-class-name
server-class-name-len
message-buffer
request-len
maximum-reply-len
actual-reply-len
timeout
flags
scsend-op-num
tag
GIVING error