Sets various configurable features of Adis, including enabling or disabling individual user function, Adis or data keys, or a series of consecutive keys at run-time.
Note: This routine is supported for native COBOL only.
Syntax:
call x"AF" using function-code
parameter-block
Parameters:
-
function-code
- Call prototype: cblt-x1-compx
- Picture: pic x comp-x.
-
parameter-block
- Group containing:
01 parameter-block
03 key-setting cblt-x1-compx *> pic x comp-x.
03 sub-fn-code cblt-x1-compx *> pic x comp-x.
03 first-key-id cblt-x1-compx *> pic x comp-x.
03 number-of-keys cblt-x1-compx *> pic x comp-x.
On Entry:
-
function-code
- Value 1.
-
sub-fn-code
- One of:
1
|
Enable/disable user function keys and compatibility keys
|
2
|
Enable/disable Adis control keys and other configurables
|
3
|
Enable/disable data keys
|
4
|
Enable/disable shift keys
|
5
|
Enable/disable lock keys
|
On Exit:
-
parameter
- Bit settings indicating the type of screen as follows:
Comments:
Features are enabled or disabled until explicitly changed by another call to x"AF" or until the application terminates. The initial state of user function keys depends on the run-time operating system (see the chapter Adis for details). Calls to enable or disable functions keys are additive. For example, if you call x"AF" to enable function key F1 and then make another call to enable F10, both keys are enabled.
The chapter Adis describes the features and parameter in detail.