IMetaDictionaryLookup.WhereRevisionBetween

Синтаксис

WhereRevisionBetween(First: Integer; Last: Integer);

Параметры

First - минимальное искомое значение атрибута.

Last - максимальное искомое значение атрибут.

Описание

Метод WhereRevisionBetween осуществляет поиск между двумя значениями атрибута, указанного в свойстве RevisionAttribute или RevisionAttributes.

Пример

Для выполнения примера предполагается наличие в репозитории базы данных временных рядов с идентификатором «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