CBL_GET_KBD

Restriction: This routine is supported for native COBOL only.

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.