X"91" function 11
Sets the programmable COBOL switches.
Syntax:
call x"91" using result
function-code
parameter
Parameters:
|
Using call prototype (see
Library Routines - Key) |
Picture (32-bit systems) |
result |
cblt-x1-compx |
pic x comp-x. |
function-code |
cblt-x1-compx |
pic x comp-x. |
parameter |
Group containing: |
Group containing: |
|
switch-flag |
|
cblt-x1-compx occurs 8 |
|
pic x comp-x occurs 8 |
|
debug-flag |
|
cblt-x1-compx |
|
pic x comp-x. |
On Entry:
function-code |
Value 11 |
switch-flag |
The values (0 or 1) to set in switches 0 through 7. |
debug-flag |
If set to 1, the ANSI Debug module is enabled. |
On Exit:
result |
Set to zero if the call was successful, nonzero otherwise. |
Comments:
To update one switch without affecting the others, you should read
the switches with X"91" function 12, update
parameter, and then call this function.
See Also: