EvaluateInt Method
Description
Evaluates an expression which has an integer result.
Syntax
| Visual Basic |
|---|
Public Function EvaluateInt( _ ByVal objectType As Integer, _ ByVal nObject As Long, _ ByVal formula As String _ ) As Long |
Parameters
- objectType
-
SIS_OT_COMMANDChanges the properties/mode of the current command. SIS_OT_CURITEM The current open Item. SIS_OT_DEFITEMThe default Item. SIS_OT_DATASETDatasets. SIS_OT_OVERLAYOverlays. SIS_OT_WINDOWThe window. SIS_OT_NOLNamed Object Libraries. SIS_OT_FTABLEThe current Feature Table. SIS_OT_SCHEMAThe current Schema. SIS_OT_SCHEMACOLUMNA column in the current Schema. SIS_OT_THEMEThe current Theme. SIS_OT_THEMECOMPONENTA component in the current Theme. SIS_OT_PRINTERPrinter. SIS_OT_SYSTEMSystem variables. SIS_OT_OPTIONSystem wide Boolean options. - nObject
- The index of the object type.
- formula
- The expression to evaluate. See Property Expression Syntax for details.
Return Type
The evaluated integer value of the given expression.
Remarks
- The following expression function enables you to find out what data type an attribute is.
VarType(...)
Which returns an enumeration, e.g. VarType(‘my_date@’) returns 7.
- Use it as part of Sis.EvaluateInt (for $&# datatypes) and Sis.Evaluate (for @ datatypes).
- The following formula translates these numbers into descriptive types:
Choose(VarType('attr@'),'Null','Short','Long (&)','Float','Double(#)',
'Currency','Date','String($)','','','Boolean','','','Decimal','Byte'.
'Unsigned Byte','Unsigned Short','Unsigned Long','Long Long Integer','Unsigned Long Long')
Substitute attr@ for your attribute name (including the $&#@ suffix).
VarType({...}) will also work with any lambda expression inside the {}.
For example:
VarType({DATE@})
The returned value will determine the data type for the queried column:
| vbEmpty | 0 | Empty (uninitialized) |
| vbNull | 1 | Null (no valid data) |
| vbInteger | 2 | Integer |
| vbLong | 3 | Long Integer |
| vbSingle | 4 | Single |
| vbDouble | 5 | Double |
| vbCurrency | 6 | Currency value |
| vbDate | 7 | Date value |
| vbString | 8 | String |
| vbObject | 9 | Object |
| vbError | 10 | Error value |
| vbBoolean | 11 | Boolean value (Zero and Non-zero) |
| vbVariant | 12 | Variant (Array only) |
| vbDataObject | 13 | A data access object |
| vbByte | 17 | Byte |
| vbUserDefinedType | 36 | Variants that contain user-defined types |
Available: GEO D OD OM OV SISpy
Group:
Example
sis.EvaluateInt ( SIS_OT_CURITEM , 0, "ItemID&" )