Translate page

VBS_Set_Text_(Method)

Copy the text to the start of the specified field.

Function VBS_SetText(row as Variant, column as Variant, text As String) As Long

Parameters

NoNameTypeOptionalDefaultDescription
1

row

VariantNo-

Screen row inside the field to copy the text to. The copy will always begin at the start of the field. Any row inside the field will provide the same result.

2

column

Variant

No

-

Screen column inside the field (see above).

3

text

String

No

-

Text to copy to the field. Must be a null terminated string.

Return Code

Description

JGS_OK

The text was copied successfully

JGS_NOTCONNECTED

Your application is not currently connected to a valid session

JGS_PARAMETERERROR

Missing or invalid parameter

JGS_INHIBITED

Field is protected or the data is invalid (such as alphabetic text into numeric field, or trying to copy field attribute byte)

JGS_TRUNCATED

The string was copied successfully, but one or more characters were truncated

JGS_POSITIONERROR

The screen position you specified was invalid

JGS_SYSERROR

The function failed due to a system error

JGS_NOFIELD

The screen is not formatted (no fields exist)

Sample Code

Dim row as Variant
Dim column as Variant
Dim myText as String
Dim result as Long
row = 18
column = 45
myText = "Jolly Giant Software"
result = field.VBS_SetText(row, column, myText)

QWS3270 Automation copyright © Jolly Giant Software Inc. All rights reserved.