IMetaDictionaryLookup.RevisionAttributes

Синтаксис

RevisionAttributes(Index: Integer): String;

Параметры

Index - индекс наименования атрибута в коллекции.

Описание

Свойство RevisionAttributes определяет коллекцию наименований атрибутов.

Комментарии

Данное свойство используется вместе со свойством WhereRevisionBetween или WhereRevisionKey.

Пример

Для выполнения примера предполагается наличие в репозитории базы данных временных рядов с идентификатором «OBJ_FC». В данной базе должны присутствовать атрибуты показателя с идентификаторами «COUNTRY», «UNIT» и «REV».

Sub Main;

Var

MB: IMetabase;

RubDesc: IMetabaseObjectDescriptor;

RubrIn: IRubricatorInstance;

DictInst: IMetaDictionaryInstance;

MetaDLookup: IMetaDictionaryLookup;

Conditions: IOrmConditions;

Cond: IOrmCondition;

i: Integer;

Res: Array Of Integer;

Begin

MB := MetabaseClass.Active;

RubDesc := MB.ItemById("OBJ_FC");

RubrIn := RubDesc.Open(Null) As IRubricatorInstance;

DictInst := RubrIn.Facts;

MetaDLookup := DictInst.CreateLookup("");

Conditions := MetaDLookup.Where;

Cond := Conditions.Add;

Cond.AttributeName := "COUNTRY";

Cond.Value := 512;

MetaDLookup.RevisionAttributes(0) := "REV";

MetaDLookup.RevisionAttributes(1) := "UNIT";

MetaDLookup.WhereRevisionBetween(60, 66);

i := MetaDLookup.LookupKeys("FACTOR").Length;

Res := New Integer[i];

Res := MetaDLookup.LookupKeys("FACTOR");

For i := 0 To Res.Length - 1 Do

Debug.WriteLine(Res[i].ToString);

End For;

End Sub Main;

После выполнения примера в окно консоли будут выведены ключи показателей, соответствующих следующим условиям: значение атрибута «COUNTRIES» у показателя равняется «512», а значение атрибутов «UNIT» и «REV» находится в диапазоне от «60» до «66».

См. также:

IMetaDictionaryLookup