The CBL_GET_CSR_POS routine is one of a set of library routines that facilitate reading and writing attributes on the screen. This routine returns the cursor position.
CALL "CBL_GET_CSR_POS" 
    USING SCREEN-POSITION
    RETURNING STATUS-CODE
               	 | SCREEN-POSITION Group item | Group item is defined as follows: 01  SCREEN-POSITION.
    03  ROW-NUMBER      PIC X COMP-X.
    03  COLUMN-NUMBER   PIC X COMP-X.On exit, contains the screen position of the cursor. The top left corner is row 0, column 0. | 
| STATUS-CODE Any numeric type | Returns 1 if successful, or 0 if not successful | 
This library routine uses SCREEN-POSITION (in row and column coordinates) to determine the position of the cursor on the screen.