LPARAMETERS liIDProp,luValue
* liIDProp - Property ID
* luValue - Property value
RETURN 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),luValue+CHR(0),;
IIF(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),luValue+CHR(0),;
IIF(INLIST(liIDProp,_DBCID_SubType,_DBCID_DispLogin,;
_DBCID_Transactions,_DBCID_BatchUpdateCount,_DBCID_SourceType,;
_DBCID_UpdateType,_DBCID_WhereType),CHR(luValue),;
IIF(INLIST(liIDProp,_DBCID_FetchSize,_DBCID_MaxRecords),;
IIF(luValue=-1,CHR(255)+CHR(255)+CHR(255)+CHR(255),DFO_IToC4Rev(luValue)),;
IIF(INLIST(liIDProp,_DBCID_ConnectTimeout,_DBCID_IdleTimeout,_DBCID_QueryTimeout,;
_DBCID_WaitTime,_DBCID_PacketSize,_DBCID_UseMemoSize,;
_DBCID_Version),DFO_IToC4Rev(luValue),;
IIF(INLIST(liIDProp,_DBCID_Prim_Cand,_DBCID_Asynchronous,_DBCID_BatchMode,;
_DBCID_DispWarnings,_DBCID_FetchMemo,_DBCID_ShareConnection,_DBCID_DisconnectRollback,;
_DBCID_SendUpdates,_DBCID_KeyField,_DBCID_Updatable,;
_DBCID_CompareMemo,_DBCID_FetchAsNeeded,_DBCID_Offline,;
_DBCID_Prepared,_DBCID_DBCEvents,;
_DBCID_AllowSimultaneousFetch),IIF(luValue,CHR(1),CHR(0)),luValue))))))