FormatProperty Method
Class: _DBC_Connector
This method return name of property by id.
Note
This method is called automaticaly from _DBC::FormatProperty() if _DBC::oConnector object defined.
=
Object.FormatProperty
Parameter
liIDProp
Property ID
Type Integer
Direction Input
Property ID. For a list of properties, see _DBC::EnumProperty().
Return value String
the return value is type property. List of property types.
ValueDescription
_DBC_ValueType_StringString
_DBC_ValueType_ByteByte
_DBC_ValueType_SI32RSigned integer 32b - reverse record
_DBC_ValueType_I32RInteger 32b - reverse record
_DBC_ValueType_BooleanBoolean


If the method fails, the return value must be _DBC_ValueType_Unknown .
Example
#INCLUDE "dbc.h"
SET PROCEDURE TO dbc.prg ADDITIVE
#DEFINE MyProperty 1000 && user cutom property (string)
LOCAL lcAlias,liIDT,loDBC,luValue
LOCAL ARRAY laProps(1)
loDBC=CREATEOBJECT("_DBC")
lcAlias=SYS(2015)
=loDBC.OpenTable(HOME(2)+"\Tastrade\Data\tastrade.dbc",lcAlias,"")

liIDT=loDBC.GetIDObject(lcAlias,_DBC_Table,"products")
* How to use connector for own properties
loDBC.oConnector=CREATEOBJECT("_my_Connector")
* Set New property
=loDBC.SetProperty(lcAlias,liIDT,MyProperty,"Wow, I can write own property")
=loDBC.GetProperty(lcAlias,liIDT,MyProperty,@luValue)
?loDBC.FormatProperty(MyProperty),luValue,loDBC.GetDefaultValue(MyProperty)

=loDBC.CloseTable(lcAlias)
loDBC.CloseTable(lcAlias)

RELEASE loDBC
RELEASE PROCEDURE dbc.prg


DEFINE CLASS _my_Connector AS _DBC_Connector

   PROCEDURE FormatProperty(liIDProp) && Convert property ID to Name
      * liIDProp   - Property ID
      RETURN IIF(liIDProp=MyProperty,"My New Property","") && default return value
   ENDPROC

   PROCEDURE GetDefaultValue(liIDProp) && Get default Value
      * liIDProp   - Property ID
      RETURN IIF(liIDProp=MyProperty,"",.NULL.) && default return value
   ENDPROC

   PROCEDURE GetValueType(liIDProp) && Return the property type
      * liIDProp - Property ID
      RETURN IIF(liIDProp=MyProperty,;
             _DBC_ValueType_String,;
             _DBC_ValueType_Unknown) && default return value
   ENDPROC
ENDDEFINE


See also
Expand/Collapse source code of procedure FormatProperty Source Code
      LPARAMETERS liIDProp
      * liIDProp   - Property ID


      RETURN "" && default return value