IRubricatorInstance.RevisionsDimension

Syntax

RevisionsDimension(Factor: Integer): IDimInstance;

Parameters

Factor. Factor key, which revision data must be obtained.

Description

The RevisionsDimension property returns revision dictionary data of factor.

Comments

As the Factor parameter value the following negative values can also be passed:

-1. The property returns labels of time series database revisions.
-2. The property returns all available revisions and revision labels for the time series database.

No other negative values should be entered.

Example

Executing the example requires a time series database with the OBJ_RUBRICATOR identifier.

    Var
        MB: IMetabase;
        RubDesc: IMetabaseObjectDescriptor;
        RubrIn: IRubricatorInstance;
        RevDim: IDimInstance;
        DimEl: IDimElements;
        DimAtt: IDimAttributesInstance;
        DimA: IDimAttributeInstance;
        i, j: Integer;
    Begin
        MB := MetabaseClass.Active;
        RubDesc := MB.ItemById("OBJ_RUBRICATOR");
        RubrIn := RubDesc.Open(Null) As IRubricatorInstance;
        RevDim := RubrIn.RevisionsDimension(-1);
        DimEl := RevDim.Elements;
        DimAtt := RevDim.Attributes;
        For j := 0 To DimEl.Count - 1 Do
            Debug.WriteLine("Element: " + j.ToString);
            For i := 0 To DimAtt.Count - 1 Do
                DimA := DimAtt.Item(i);
                Debug.WriteLine("Attribute: " + DimA.Attribute.Name + ". Value: " + DimA.Value(j));
            End For;
        End For;

After executing the example the console window displays labels of time series database revisions.