Guardian Application Conversion Guide

Being Opened by and Communicating With a High-PIN Requester
Converting COBOL85 Applications
096047 Tandem Computers Incorporated 4–23
Converting the RECEIVE-CONTROL Paragraph
The RECEIVE-CONTROL paragraph allows a program to read system messages by
defining the receive-control and reply tables. The parts of the RECEIVE-CONTROL
paragraph that you might need to convert are:
The REPORT clause, which specifies the system messages a program reads from
$RECEIVE
The MESSAGE SOURCE clause, which identifies the process that sent a system
message
The REPORT Clause. The REPORT clause in the RECEIVE-CONTROL paragraph
specifies the specific system messages that your program reads from $RECEIVE.
You might need to convert this clause to specify the D-series messages you want to
read from $RECEIVE.
Table 4-2 shows the REPORT clause message-type keywords and the corresponding
C-series and D-series system messages that each keyword allows a program to read
from $RECEIVE.
The following paragraphs identify the system messages that are most likely affected
by converting a server. These messages include the Open and Close system messages
and the status-change system messages.
Reading Open and Close System Messages. If your server maintains an opener table, then
it will read all Open and Close system messages. Your existing program uses the
following keywords to read these messages:
COBOL85 Keyword C-Series System Message (ENV is OLD or Omitted)
OPEN -30 Process open
CLOSE -31 Process close
For these keywords, no conversion is necessary because the same keywords are used
to read the corresponding system messages generated by the D-series enhanced
interface when you recompile your program with CRE. The correspondence between
the keywords and the system messages is shown below:
COBOL85 Keyword D-Series System Message (ENV is COMMON or LIBRARY)
OPEN -103 Process open
CLOSE -104 Process close