WhereRevisionBetween(First: Integer; Last: Integer);
First. Key of the first revision.
Last. Key of the last revision.
The WhereRevisionBetween method searches for factors, which have been changed during the interval between two revisions.
Executing the example requires that the repository contains a time series database with the OBJ_RUBRICATOR identifier.
Sub Main;
Var
MB: IMetabase;
RubDesc: IMetabaseObjectDescriptor;
Factors: Array;
RubrIn: IRubricatorInstance;
FactsLookup: IRubricatorFactsLookup;
f: IRubricatorFactor;
Record: IRubricatorRecord;
a: Array;
i: Integer;
Begin
MB := MetabaseClass.Active;
RubDesc := MB.ItemById("OBJ_RUBRICATOR");
RubrIn := RubDesc.Open(Null) As IRubricatorInstance;
FactsLookup := RubrIn.CreateFactsLookup;
FactsLookup.WhereFactorKey := 12195998;
FactsLookup.WhereRevisionBetween(1, 13);
Factors := FactsLookup.GetFactors;
If Factors <> Null Then
f := Factors[0];
Record := f.FactData As IRubricatorRecord;
a := Record.Record.Value As Array;
If a <> Null Then
For i := 0 To a.Length - 1 Do
Debug.WriteLine(a[i] As String);
End For;
End If;
End If;
End Sub Main;
After executing the example the factor with the 12195998 key changed between the first and thirteenth revision is searched. If the factor is found, the console window displays the record that contains information on the factor.
See also: