RevisionAttribute: String;
The RevisionAttribute property determines revision attribute name.
This property is used with the WhereRevisionBetween or WhereRevisionKey properties.
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: