12.6 CBL_READ_MOUSE

This routine acquires the mouse event that meets an event mask condition.

Specification

Parameter data definition

01 mouse-handle           PIC X(4).
01 mouse-event.
   02 event-mask          PIC 1(16) BIT.
   02 event-time          PIC 9(9) BINARY.
   02 mouse-cursor-position.
      03 line-position    PIC 9(4) BINARY.
      03 column-position  PIC 9(4) BINARY.
01 read-wait-flag         PIC 9(4) BINARY.
01 status-code            PIC S9(4) COMP-5.

Calling format

CALL "CBL_READ_MOUSE_EVENT"
    USING mouse-handle
          mouse-event
          read-wait-flag
    RETURNING status-code.

Interface

mouse-handle: Specifies the mouse-handle returned by CBL_INIT_MOUSE.

event-mask: Specifies the area used to store the event mask.

event-time: Specifies the area used to store the time.

read-wait-flag

Specifies read-wait flag information as follows:

0: The system waits until the mouse event occurs.
1: The system acquires information immediately even if the mouse event does not occur.

Return code

The return code is set in the status-code specified in the RETURNING clause.

status-code

0: Successful
Other than 0: Failure

12.6 CBL_READ_MOUSE_EVENT