Initializes mouse support. This routine must be called before other mouse routines can be called.
Note: This routine is supported for native COBOL only.
Syntax:
call "CBL_INIT_MOUSE" using mouse-handle
mouse-buttons
returning status-code
Parameters:
|
Using call prototype (see
Key)
|
Picture
|
mouse-handle
|
cblt-x4-compx
|
pic x(4) comp-x.
|
mouse-buttons
|
cblt-x2-compx
|
pic x(2) comp-x.
|
status-code
|
See
Library Routines - Key
|
On Exit:
mouse-handle
|
Mouse identifier. You pass this to any mouse routines you call subsequently.
|
mouse-buttons
|
The number of buttons on the mouse.
|
Comments:
If status-code (or RETURN-CODE) contains a nonzero status on return from this routine, mouse handling is not available and calls to any of the mouse routines should not be made.
The CBL_ mouse routines do not work with the x"AF" mouse routines.