LPARAMETERS liIDProp
* liIDProp - Property ID
LOCAL liRet
liRet=IIF(INLIST(liIDProp,_DBCID_Comment,_DBCID_Path,;
_DBCID_RuleExpression,_DBCID_RuleText,_DBCID_InsertTrigger,;
_DBCID_UpdateTrigger,_DBCID_DeleteTrigger,_DBCID_PrimaryKey,;
_DBCID_DefaultValue,_DBCID_Caption,_DBCID_ChildTag,;
_DBCID_ParentTable,_DBCID_Database) OR ;
INLIST(liIDProp,_DBCID_ParentTag,_DBCID_DataSource,;
_DBCID_ConnectString,_DBCID_Password,_DBCID_UserID,;
_DBCID_ParameterList,_DBCID_ConnectName,_DBCID_SQL,;
_DBCID_Tables,_DBCID_UpdateName,_DBCID_DataType,;
_DBCID_DisplayClass,_DBCID_DisplayClassLibrary,;
_DBCID_Format,_DBCID_InputMask,;
_DBCID_DBCEventFileName),_DBC_ValueType_String,;
IIF(INLIST(liIDProp,_DBCID_SubType,_DBCID_DispLogin,;
_DBCID_Transactions,_DBCID_SourceType,;
_DBCID_UpdateType,_DBCID_WhereType),_DBC_ValueType_Byte,;
IIF(INLIST(liIDProp,_DBCID_FetchSize,_DBCID_MaxRecords),_DBC_ValueType_SI32R,;
IIF(INLIST(liIDProp,_DBCID_ConnectTimeout,_DBCID_IdleTimeout,_DBCID_QueryTimeout,;
_DBCID_WaitTime,_DBCID_PacketSize,_DBCID_UseMemoSize,;
_DBCID_Version,_DBCID_BatchUpdateCount),_DBC_ValueType_I32R,;
IIF(INLIST(liIDProp,_DBCID_Prim_Cand,_DBCID_Asynchronous,_DBCID_BatchMode,;
_DBCID_DispWarnings,_DBCID_FetchMemo,_DBCID_ShareConnection,;
_DBCID_SendUpdates,_DBCID_KeyField,_DBCID_Updatable,;
_DBCID_CompareMemo,_DBCID_FetchAsNeeded,_DBCID_Offline,;
_DBCID_Prepared,_DBCID_DBCEvents,_DBCID_AllowSimultaneousFetch,;
_DBCID_DisconnectRollback),_DBC_ValueType_Boolean,_DBC_ValueType_Unknown)))))
RETURN IIF(liRet=_DBC_ValueType_Unknown AND !ISNULL(This.oConnector),;
This.oConnector.GetValueType(liIDProp),liRet)