CBL_GET_KBD_STATUS

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 Entry:

None

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.