Checks whether there is a character waiting to be read from the keyboard.
Syntax:
call "CBL_GET_KBD_STATUS" using key-status
returning status-code
Parameters:
|
Using call prototype (see
Key)
|
Picture
|
key-status
|
cblt-x1-compx
|
pic x comp-x.
|
status-code
|
See
Library Routines - Key
|
On Exit:
-
key-status
- The status of the keyboard:
0
|
No character available
|
1
|
Character available
|
Comments:
Unpredictable results can occur if the user attempts to use both X"AF" and CBL_ keyboard routines. This is because X"AF" invokes ADIS to perform the required keyboard function and ADIS uses the CBL_ keyboard routines.