カーソル位置を返します。
call "CBL_GET_CSR_POS" using screen-position returning status-code
01 cblt-screen-position typedef. 03 cblte-scrp-row cblt-x1-compx. *> pic x comp-x. 03 cblte-scrp-col cblt-x1-compx. *> pic x comp-x.
なし
screen-position | カーソルの画面位置。画面の左上隅が行 0、列 0 になります。カーソルが非表示の場合、cblte-scrp-row と cblte-scrp-col の両方が 255 に設定されています。 |