CBL_READ_MOUSE_EVENT

マウスイベントをキューから読み取り、イベントに関する情報を返します。

注: このルーチンはネイティブ COBOL でのみサポートされます。

構文：

call "CBL_READ_MOUSE_EVENT" using     mouse-handle
                                      event-data
                                      read-type
                            returning status-code

パラメーター：

	呼び出しプロトタイプ使用時 (「説明の読み方」を参照)	PIC
`mouse-handle`	cblt-x4-compx	pic x(4) comp-x
`event-data`	「マウスルーチン」を参照
`read-type`	cblt-x1-compx	pic x comp-x
`status-code`	「説明の読み方」を参照

入力パラメーター：

mouse-handle: 以前の CBL_INIT_MOUSE 呼び出しで取得したマウス識別子。

read-type

キュー内にイベントが存在しない場合の処理を示します。

0	直ちに戻ります。
1	イベントを待機し、戻ります。

出力パラメーター：

event-data: 「マウスルーチン」を参照

説明：

イベントキュー内にイベントが存在しない場合、このルーチンからの戻りは read-type の値によって決まります。read-type が 0 の場合は、event-data にすべて 0 を格納して直ちに戻ります。read-type が 1 の場合は、イベントがキューに置かれるまで戻りは遅延します。

CBL_ マウスルーチンは x"AF" マウスルーチンとは連動しません。