Disables keyboard interrupts (Ctrl+Break).
Note: This routine is supported for native COBOL only.
Syntax:
call X"B0" using function-code
parameter
Parameters:
| |
Using call prototype (see
Key)
|
Picture
|
|
function-code
|
cblt-x1-compx
|
pic x comp-x.
|
|
parameter
|
cblt-x1-compx
|
pic x comp-x.
|
On Entry:
|
function-code
|
Value 4.
|
|
parameter
|
Value 1.
|
Comments:
This routine disables keyboard interrupts for the rest of the application. It should be called before any subprograms are called.