Returns the screen position of the mouse pointer.
Restriction: This routine is supported for native COBOL only.
Syntax:
call "CBL_GET_MOUSE_POSITION" using mouse-handle
mouse-position
returning status-code
Parameters
-
mouse-handle
- Call prototype (see
Key): cblt-x4-compx
- Picture: pic x(4) comp-x.
-
mouse-position
- Group predefined as
cblt-mouse-pos containing
01 cblt-mouse-pos typedef.
03 cblte-mpos-row cblt-x2-compx. *> pic x(2) comp-5.
03 cblte-mpos-col cblt-x2-compx. *> pic x(2) comp-5.
-
status-code
- See
Library Routines - Key.
On Entry:
mouse-handle
|
Mouse identifier, obtained by earlier call to CBL_INIT_MOUSE.
|
On Exit:
mouse-position
|
The screen position of the mouse pointer.
|
Comments:
The CBL_ mouse routines do not work with the x"AF" mouse routines.