Constants
The following constants are defined for use with many of the Flex Terminal Emulator methods and properties:
FlexConnectMethods (TN3270/TN5250)
Set the connection method.
Values:
FlexConnectMethods.Generic
FlexConnectMethods.Specific
FlexConnectMethods.Associate
Direction used in searches such as FlexScreen.FindString.
Values:
FlexDirection.FORWARD
FlexDirection.BACKWARD
Set the model.
Values:
FlexModels.Model2
FlexModels.Model3
FlexModels.Model4
FlexModels.Model5
FlexModels.Dynamic
Plane to get data in FlexScreen.GetData and FlexField.GetData methods.
Values:
FlexPlane.TEXT - Text displayed
FlexPlane.COLOR - Color of the text displayed
FlexPlane.FIELD - Field attributes
FlexPlane.EXTENDED - Field extended attributes
Used in FlexSession.FTPSendFile and FlexSession.FTPReceiveFile to set the file type.
Values:
FlexFileType.TEXT
FlexFileType.BINARY
Used in comparing color values from FlexScreen.GetData and FlexField.GetData methods.
Values:
FlexColor.DEFAULT
FlexColor.BLUE
FlexColor.GREEN
FlexColor.CYAN
FlexColor.RED
FlexColor.MAGENTA
FlexColor.YELLOW
FlexColor.WHITE
Methods to examine field attributes:
FlexFieldAttr3270.IsHighIntensity(Data)
FlexFieldAttr3270.IsHidden(Data)
FlexFieldAttr3270.IsModified(Data)
FlexFieldAttr3270.IsNumeric(Data)
FlexFieldAttr3270.IsPenSelectable(Data)
FlexFieldAttr3270.IsProtected(Data)
Example:
' Assume position 23, 15 is a field character
Data = FlexScreen.GetData(FlexScreen.Position(23,15), FlexScreen.Position(23,15), FlexPlane.FIELD)
If FlexFieldAttr3270.IsModified(Data(0)) Then
MsgBox "Field is modified."
End if
If FlexFieldAttr3270.IsHidden(Data(0)) Then
MsgBox "Field is hidden."
End if
Methods to examine extended field attributes:
FlexFieldAttr3270.GetColor(Data)
FlexFieldAttr3270.IsBlink(Data)
FlexFieldAttr3270.IsReverseVideo(Data)
FlexFieldAttr3270.IsUnderscore(Data)
Example:
' Assume position 23, 15 is a field character
Data = FlexScreen.GetData(FlexScreen.Position(23,15), FlexScreen.Position(23,15), FlexPlane.EXTENDED)
If FlexFieldAttr3270.IsReverseVideo(Data(0)) Then
MsgBox "Field is in reverse video."
End if
If FlexFieldAttr3270.GetColor(Data(0)) = FlexColor.GREEN Then
MsgBox "Field has green color."
End if
Methods to examine field attributes:
FlexFieldAttr5250.IsAlphaNumeric(Data)
FlexFieldAttr5250.IsAlphaOnly(Data)
FlexFieldAttr5250.IsDigitsOnly(Data)
FlexFieldAttr5250.IsHighIntensity(Data)
FlexFieldAttr5250.IsModified(Data)
FlexFieldAttr5250.IsNumericOnly(Data)
FlexFieldAttr5250.IsNumericShift(Data)
FlexFieldAttr5250.IsPenSelectable(Data)
FlexFieldAttr5250.IsProtected(Data)
FlexFieldAttr5250.IsSignedNumeric(Data)
Example:
' Assume position 23, 15 is a field character
Data = FlexScreen.GetData(FlexScreen.Position(23,15), FlexScreen.Position(23,15), FlexPlane.FIELD)
If FlexFieldAttr5250.IsModified(Data(0)) Then
MsgBox "Field is modified."
End if
Methods to examine extended field attributes:
FlexFieldAttr5250.GetColor(Data)
FlexFieldAttr5250.IsBlink(Data)
FlexFieldAttr5250.IsColumnSep(Data)
FlexFieldAttr5250.IsHidden(Data)
FlexFieldAttr5250.IsReverseVideo(Data)
FlexFieldAttr5250.IsUnderscore(Data)
Example:
' Assume position 23, 15 is a field character
Data = FlexScreen.GetData(FlexScreen.Position(23,15), FlexScreen.Position(23,15), FlexPlane.EXTENDED)
If FlexFieldAttr5250.IsHidden(Data(0)) Then
MsgBox "Field is hidden."
End if
If FlexFieldAttr5250.GetColor(Data(0)) = FlexColor.GREEN Then
MsgBox "Field has green color."
End if
Get the type of host for the current session.
Values:
FlexHostTypes.TN3270
FlexHostTypes.TN5250
FlexHostTypes.VT
FlexHostTypes.SCOANSI
FlexHostTypes.WYSE
OIA input inhibit condition.
Values:
FlexOiaInputInhibit.NOTINHIBITED
FlexOiaInputInhibit.SYSTEM_WAIT
FlexOiaInputInhibit.COMMCHECK
FlexOiaInputInhibit.PROGCHECK
FlexOiaInputInhibit.MACHINECHECK
FlexOiaInputInhibit.OTHER
Example:
If FlexOIA.InputInhibit=FlexOiaInputInhibit.NOTINHIBITED Then
Msgbox "Input not inhibited"
End If
OIA owner status.
Values:
FlexOiaOwner.UNKNOWN
FlexOiaOwner.APP
FlexOiaOwner.MYJOB
FlexOiaOwner.NVT
FlexOiaOwner.UNOWNED
FlexOiaOwner.SSCP
Example:
If FlexOIA.Owner=FlexOiaOwner.APP Then
Msgbox "Host application connected"
End If
Set or enable one of the available Keep Alive sequences.
Values:
FlexKeepAliveSeqs.Disabled
FlexKeepAliveSeqs.NOP
FlexKeepAliveSeqs.TimingMark
Example:
FlexSession.ConnectionSettings.KeepAliveSeq = FlexKeepAliveSeqs.NOP
FlexOperatingModes (VT/SCOANSI/WYSE)
Set the VT operating mode.
Values:
FlexOperatingModes.VT400_7bit
FlexOperatingModes.VT400_8bit
FlexOperatingModes.VT100
FlexOperatingModes.VT52
FlexOperatingModes.SCOANSI
FlexOperatingModes.WYSE
Example:
FlexSession.ConnectionSettings.OperatingMode = FlexOperatingModes.VT400_7bit
FlexNRCharsets (VT/SCOANSI/WYSE)
Set the National Replacement Character set.
Values:
FlexNRCharsets.UnitedStates
FlexNRCharsets.UnitedKingdom
FlexNRCharsets.Dutch
FlexNRCharsets.Finnish
FlexNRCharsets.French
FlexNRCharsets.FrenchCanadian
FlexNRCharsets.German
FlexNRCharsets.Italian
FlexNRCharsets.NorwegianDanish
FlexNRCharsets.Portuguese
FlexNRCharsets.Spanish
FlexNRCharsets.Swedish
FlexNRCharsets.Swiss
Example:
FlexSession.ConnectionSettings.NRCharset = FlexNRCharsets.UnitedKingdom