| Background Color | ||
|---|---|---|
| ||
| IField::VBS_GetPreviousPosition |
Get the starting position of the previous protected or unprotected field.
| Background Color |
|---|
| Function VBS_GetPreviousPosition(row As Variant, column As Variant, [ft As FieldType = UNPROTECTED]) As Long |
Parameters
| No | Name | Type | Optional | Default | Description |
|---|---|---|---|---|---|
| 1 | row | Variant | No | - | row from where the search starts |
2 | column | Variant | No | - | column from where the search starts |
3 | ft | Yes | UNPROTECTED | Field type (PROTECTED or UNPROTECTED) to search and retrieve the position for | |
Return Code | Description | ||||
JGS_OK | The field position was found | ||||
JGS_NOTCONNECTED | Your application is not connected to a valid session | ||||
JGS_PARAMETERERROR | Missing or invalid parameter | ||||
JGS_POSITIONERROR | The specified screen position is invalid | ||||
JGS_SYSERROR | The function failed due to a system error | ||||
JGS_NOFIELD | Field not found or screen is not formatted | ||||
JGS_ZEROLENFIELD | The field length was 0 | ||||
Sample Code
| Background Color | ||
|---|---|---|
| ||
| Dim row as Variant Dim column as Variant Dim result as Long row = 18 column = 45 result = field.VBS_GetPreviousPosition(row, column) If result = JGS_OK then ... ' row and column contain the starting position of previous unprotected field Else ... |
QWS3270 Automation copyright © Jolly Giant Software Inc. All rights reserved.
...