This routine returns the line and column positions of the current mouse cursor on the current screen.
Specification
01 mouse-handle PIC X(4). 01 mouse-cursor-position. 02 line-position PIC S9(4) BINARY. 02 column-position PIC S9(4) BINARY. 01 status-code PIC S9(4) COMP-5.
CALL "CBL_GET_MOUSE_POSITION" USING mouse-handle mouse-cursor-position RETURNING status-code.
Interface
Specifies the mouse-handle returned by CBL_INIT_MOUSE.
Specifies the area used to store the numeric value indicating the line position of the mouse cursor. The top-left corner of the screen is assumed to be the origin (where the line and column numbers are 0).
Specifies the area used to store the numeric value indicating the column position of the mouse cursor. The top-left corner of the screen is assumed to be the origin (where the line and column numbers are 0).
Return code
The return code is set in the status-code specified in the RETURNING clause.
0: Successful
Other than 0: Failure