IRdsAttributes.InDate

Syntax

InDate: IRdsAttribute;

Description

The InDate property returns a system attribute of a dictionary, which assignment is Element Action Start Date.

Comments

The attribute has the Date type, it cannot contain empty and multiple values. It is hidden by default. The attribute identifier is INDATE.

The attribute is available if the TimeDependent property is set to True, and it is used to fix changes of attribute values.

Example

Executing the example requires the MDM repository NSI_1 that contains an MDM dictionary with the Dict_1 identifier. Element changes by time are set for a dictionary.

Sub Main;

Var

MB: IMetabase;

Dict: IRdsDictionary;

DictInst: IRdsDictionaryInstance;

Elements: IRdsDictionaryElements;

Attrs: IRdsAttributes;

Hist: IRdsDictionaryElementHistory;

i, j, InDate, OutDate, Name: Integer;

Begin

MB := MetabaseClass.Active;

Dict := MB.ItemByIdNamespace("Dict_1", MB.ItemById("NSI_1").Key).Bind As IRdsDictionary;

Attrs := Dict.Attributes;

InDate := Attrs.InDate.Key;

OutDate := Attrs.OutDate.Key;

Name := Attrs.Name.Key;

DictInst := Dict.Open(Null);

Elements := DictInst.Elements;

For i := 1 To Elements.Count - 1 Do

Hist := Elements.Item(i).History;

Debug.WriteLine(Elements.Item(i).Name);

For j := 0 To Hist.Count - 1 Do

Debug.Write(Start: + Hist.Attribute(j, InDate));

Debug.Write( Finish: + Hist.Attribute(j, OutDate));

Debug.WriteLine( Value on this interval: + Hist.Attribute(j, Name));

End For;

End For;

End Sub Main;

After executing the example history of values of the Name attribute is displayed in the console for all dictionary elements.

See also:

IRdsAttributes