IRubricator.Measures

Синтаксис

Measures: IRdsDictionary;

Описание

Свойство Measures определяет справочник репозитория НСИ, содержащий информацию о мерах.

Пример

Для выполнения примера предполагается наличие базы данных временных рядов с идентификатором «NewCatalog».

Sub Main;

Var

MB: IMetabase;

Rubr: IRubricator;

Measures: IRdsDictionary;

MeasuresInst: IRdsDictionaryInstance;

Att: IRdsAttributes;

Elem: IRdsDictionaryElements;

Data: IRdsDictionaryElementData;

Begin

Mb := MetabaseClass.Active;

Rubr := MB.ItemById("NewCatalog").Bind As IRubricator;

Measures := Rubr.Measures;

MeasuresInst := Measures.Open(Null);

Att := Measures.Attributes;

Elem := MeasuresInst.Elements;

Data := Elem.CreateElementData;

Data.Attribute(Att.Name.Key) := "Метр";

Elem.Insert(Elem.Item(0).Key, Data);

End Sub Main;

После выполнения примера в справочник, содержащий информацию о мерах для базы данных временных рядов, будет добавлен новый элемент.

См. также:

IRubricator