Translate page

SetString (Method).



Copy a text string to a specified position in the QWS3270 screen.

Function SetString(cursor As CursorPos, text As String) As Long

Parameters

NoNameTypeOptionalDefaultDescription
1cursorCursorPosNo-

 

2

text

String

No

-

 

Return Code

Description

JGS_OK

The text was successfully copied

JGS_NOTCONNECTED

Your application is currently not connected to any valid session

JGS_PARAMETERERROR

Missing or invalid parameter

JGS_SYSERROR

The function failed due to a system error

JGS_INHIBITED

The position in the screen is protected or the text string contains invalid data (such as a field attribute)

JGS_TRUNCATED

The text string was truncated during the copy

JGS_POSITIONERROR

The specified position in the screen was invalid

Sample Code

Dim myPos as CursorPos
Dim myText as String
Dim result as Long
myPos.row = 18
myPos.column = 45
myText = "Jolly Giant Software"
result = screen.SetString(myPos, myText)



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