VBS_GetSize (Method).

Function VBS_GetSize(rows As Variant, columns As Variant) As Long

No	Name	Type	Optional	Default	Description
1	rows	Variant	No	-	Number of rows in the screen
2	columns	Variant	No	-	Number of columns in the screen
Return Code			Description
JGS_OK			The function was successful
JGS_NOTCONNECTED			Your application is currently not connected to a valid host session
JGS_PARAMETERERROR			Missing or invalid parameter
JGS_SYSERROR			The function failed due to a system error

Dim rows as Variant
Dim columns as Variant
Dim result as Long
result =-screen.VBS_GetSize(rows, columns)

QWS3270 Documentation