Get the index of a field at the specified row and column. An index of -1 means there is no field at the row and column. This action is only valid when using IBM 5250 or 5555 emulation.
Parameters
Row |
The row containing the field. |
Column |
A column in the field. |
Format
Get_Field_Index (Row, Column)
Example
Script( Get_Field_Index_Test )
String( strMessage )
Number( nRow )
Number( nColumn )
Number( nFieldIndex )
Activate( From_Menu )
nRow = Ask_Number( "Enter the row number containing the field", "Get_Field_Index", 1, 999, 1 )
nColumn = Ask_Number( "Enter a column number in the field", "Get_Field_Index", 1, 999, 1 )
nFieldIndex = Get_Field_Index( nRow, nColumn )
strMessage = String_Combine( "Field at row ", Number_To_String_Decimal( nRow ) )
strMessage = String_Combine( strMessage, ", column " )
strMessage = String_Combine( strMessage, Number_To_String_Decimal( nColumn ) )
strMessage = String_Combine( strMessage, ": " )
strMessage = String_Combine( strMessage, Number_To_String_Decimal( nFieldIndex ) )
Message( strMessage, 12 )
Return
See Also
Get_Screen_Columns, Get_Screen_Rows, Get_Position_Column, Get_Position_Row, Get_Session_Number, Get_Time, Get_Time_Since_Reset, Get_Num_Fields, Get_Field_Index_Row_Text, Get_Field_Index_Column_Text, Get_Field_Row, Get_Field_Column, Get_Field_Length, Get_Num_Field_Data_IDs, Get_Num_Field_Symbology_IDs, Get_Field_Com_Data_Field
Was this article useful?
The topic was:
Inaccurate
Incomplete
Not what I expected
Other