call "CBL_GET_KBD_STATUS" using     key-status
                          returning status-code 
               | Using call prototype (see Key) | Picture | |
|---|---|---|
| key-status | cblt-x1-compx | pic x comp-x. | 
| status-code | See Library Routines - Key | 
None
| 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.