Value: Variant;
The Value property determines the record value.
Executing the example requires that the repository contains a time series database with the OBJ_FC identifier. The time series database must contain an indicator with the 1 key.
Add links to the Metabase, Rds, Cubes system assemblies.
Sub UserProc;
Var
MB: IMetabase;
RubDesc: IMetabaseObjectDescriptor;
RubrIn: IRubricatorInstance;
FactD: IRubricatorFactData;
Record: IRubricatorRecord;
DataMember: IMetaDataMember;
a: Array;
i: Integer;
Begin
MB := MetabaseClass.Active;
RubDesc := MB.ItemById("OBJ_FC");
RubrIn := RubDesc.Open(Null) As IRubricatorInstance;
FactD := RubrIn.GetFactData(1);
Record := FactD As IRubricatorRecord;
DataMember := Record.Record As IMetaDataMember;
a := DataMember.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 a record of a system table that contains information about an indicator with the 1 key.
See also: