GetDefaultValue Method
Class: _DBC
This method return default value.
=
Object.GetDefaultValue
Parameter
liIDProp
Property ID
Type Integer
Direction Input
Property ID. For a list of properties, see _DBC::EnumProperty().
Return value Integer/String/Boolean
If is value of liIDProp unknown, then return value is .NULL. .
Example
#INCLUDE "dbc.h"
SET PROCEDURE TO dbc.prg ADDITIVE
LOCAL luValue,loDBC
loDBC=CREATEOBJECT("_DBC")
* Get default property value
luValue=loDBC.GetDefaultValue(_DBCID_Comment)
?luValue
RELEASE loDBC
RELEASE PROCEDURE dbc.prg


See also
Expand/Collapse source code of procedure GetDefaultValue Source Code
      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),"",;
            IIF(INLIST(liIDProp,_DBCID_SubType,_DBCID_ConnectTimeout,;
                _DBCID_IdleTimeout,_DBCID_QueryTimeout),0,;
            IIF(INLIST(liIDProp,_DBCID_DispLogin,_DBCID_Transactions,;
                _DBCID_BatchUpdateCount,;
                _DBCID_SourceType,_DBCID_UpdateType,_DBCID_WhereType),1,;
            IIF(liIDProp=_DBCID_MaxRecords,-1,;
            IIF(liIDProp=_DBCID_Version,10,;
            IIF(INLIST(liIDProp,_DBCID_WaitTime,_DBCID_FetchSize),100,;
            IIF(liIDProp=_DBCID_PacketSize,4096,;
            IIF(liIDProp=_DBCID_UseMemoSize,255,;
            IIF(INLIST(liIDProp,_DBCID_DispWarnings,_DBCID_ShareConnection,;
                _DBCID_CompareMemo),.T.,;
            IIF(INLIST(liIDProp,_DBCID_Prim_Cand,_DBCID_Asynchronous,_DBCID_BatchMode,;
                _DBCID_FetchMemo,_DBCID_AllowSimultaneousFetch,_DBCID_DisconnectRollback,;
                _DBCID_SendUpdates,_DBCID_KeyField,_DBCID_Updatable,;
                _DBCID_FetchAsNeeded,_DBCID_Offline,;
                _DBCID_Prepared,_DBCID_DBCEvents),.F.,.NULL.))))))))))

      RETURN IIF(ISNULL(liRet) AND !ISNULL(This.oConnector),;
                 This.oConnector.GetDefaultValue(liIDProp),liRet)