COBOL Manual for TNS and TNS/R Programs

Environment Division
HP COBOL Manual for TNS and TNS/R Programs—522555-006
6-75
RECEIVE-CONTROL Paragraph
LOGICAL-OPEN and LOGICAL-CLOSE are conventions that enable a program to
keep track of its active requesters simply and directly. LOGICAL-OPEN selects only
the first OPEN message from each new requester. OPEN messages from requester
backups are automatically handled by the run-time routines and not passed to the
program. Similarly, LOGICAL-CLOSE selects only the final CLOSE message from a
requester. If both are asserted, the program receives a single OPEN message
whenever a process or process pair bids for requester access and a single CLOSE
message whenever an active requester relinquishes its access. Because the specific
message type causes all messages of its class to be passed to the program, the
assertion of OPEN (or SYSTEM, which implies OPEN) overrides LOGICAL-OPEN, and
the assertion of CLOSE (or SYSTEM) overrides LOGICAL-CLOSE.
Table 6-10. REPORT Clause Message Types in the CRE (page 1 of 2)
Message Type
Message Type Code
MeaningCRE COBOL85
BREAK -105 -20 Break on device
CLOSE -104 -31 Close
CONTROL -32 -32 CONTROL system request
CONTROLBUF -35 -35 CONTROLBUF system
request
CPU-DOWN -02 -02 Local processor failure
CPU-UP -03 -03 Local processor reload
DEVICE-INFO -106 -40 Device type inquiry
DEVICEINFO2-COMPLETION -41 -41 Nowait device type inquiry
FILE-GETINFOBYNAME-
COMPLETION
-108 N. A. Nowait
FILE_GETINFOBYNAME_
completion
FILENAME-FINDNEXT-
COMPLETION
-109 N. A. Nowait
FILENAME_FINDNEXT_
completion
JOB-PROCESS-CREATION -112 -09 Job process creation
LOGICAL-CLOSE N. A. N. A. Logical close
LOGICAL-OPEN N. A. N. A. Logical open
MEMORY-LOCK-
COMPLETION
-23 -23 Memory lock completion
MEMORY-LOCK-FAILURE -24 -24 Memory lock failure
MESSAGE-CANCELLED -38 -38 Message cancelled
MESSAGE-MISSED -13 -13 System message buffer
overrun
NEWPROCESS-
COMPLETION
-12 -12 NEWPROCESSNOWAIT
completion