Prototype
subroutine EcsGetCursorPosition(integer:Row, integer:Column)
Description
Field-oriented. Copies the row and column of the current cursor position into integer variables.
Parameters
Row |
Output |
An integer that will receive the Row number for the current cursor position. The first line on the screen is row 1. |
Column |
Output |
An integer that will receive the Column number for the current cursor position. The first character on a line on the screen is column 1. |
Return Value
ECS_E_NOTINIT |
Not initialized - command was ignored |
ECS_E_NOTCONN |
Not connected to an active session |
ECS_E_ERRORFREE |
No errors were generated |
Example
###***********************************
### Action to get the cursor position
###***********************************
action GetCursorPosition is
call EcsGetCursorPosition ( SessionRows_IV, SessionColumns_IV )
copy errorlevel to ErrorLevel_IV
copy "EcsGetCursorPosition" to Call_SV
if ( ErrorLevel_IV = ECS_E_ERRORFREE ) then
copy "Cursor position is Row: " SessionRows_IV ", Column: " SessionColumns_IV to Message_SV
action DisplayMessage
else
action DisplayError
end if
