Get the starting position of the specified field.
Function GetPosition(cursor As CursorPos) As Long
Parameters
| No | Name | Type | Optional | Default | Description |
|---|---|---|---|---|---|
1 | cursor | No | - | A position inside the field for which the starting position is to be found | |
Return Code | Description | ||||
JGS_OK | The field start position was found | ||||
JGS_PARAMETERERROR | Missing or invalid parameter | ||||
JGS_NOTCONNECTED | Your application is not connected to a valid session | ||||
JGS_POSITIONERROR | The specified screen position was invalid | ||||
JGS_SYSERROR | The function failed due to a system error | ||||
JGS_NOFIELD | The specified field was not found or the host screen is not formatted | ||||
JGS_ZEROLENFIELD | The field length is 0 | ||||
Sample Code
Dim myPos as CursorPos
Dim result as Long
myPos.row = 18
myPos.column = 45
result = field.GetPosition(myPos)
If result = JGS_OK then
... ' myPos contains starting position of field
Else ...
QWS3270 Automation copyright © Jolly Giant Software Inc. All rights reserved.