IRubricatorRecord.Record

Executing the example requires that the repository contains a time series database with the OBJ_RUBRICATOR identifier that includes an indicator with the 1 key.

Sub UserProc;
Var
    MB: IMetabase;
    RubrInst: IRubricatorInstance;
    FactD: IRubricatorFactData;
    Record: IRubricatorRecord;
    a: Array;
    i: Integer;
Begin
    MB := MetabaseClass.Active;
    RubrInst := MB.ItemById("OBJ_RUBRICATOR").Open(Null) As IRubricatorInstance;
    FactD := RubrInst.GetFactData(1);
    Record := FactD 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 Sub UserProc;

After executing the example the console window displays data of the record that contains information on the indicator with the specified key.

IRubricatorRecord.Record

Syntax

Description

Example