IMetaDictionaryLookup.WhereRevisionKey

Syntax

WhereRevisionKey: Integer;

Description

The WhereRevisionKey property searches for target value of the attribute specified in the RevisionAttribute or RevisionAttributes properties (taking into account only the first name of the attribute in the collection).

Example

Executing the example requires that the repository contains a time series database with the OBJ_FC identifier. This database must have time series attributes with the COUNTRY and UNIT identifiers.

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.RevisionAttribute := "UNIT";

MetaDLookup.WhereRevisionKey := 3436;

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;

After executing the example, the console window displays time series keys that correspond to the following conditions: the COUNTRIES time series attribute value equals to 512, and the UNIT attribute value equals to 3436.

See also:

IMetaDictionaryLookup