IRubricatorInstance.RevisionsDimensionPoint

Синтаксис

RevisionsDimensionPoint(Factor: Integer; CalendarPoint: DateTime): IDimInstance;

Параметры

Factor - ключ показателя, данные ревизий которого необходимо получить.

CalendarPoint - дата, данные для которой необходимо получить.

Описание

Свойство RevisionsDimensionPoint возвращает данные справочника ревизий показателя для определенной даты.

Пример

Для выполнения примера предполагается наличие базы данных временных рядов с идентификатором «OBJ_RUBRICATOR». В базе создан показатель с ключом «1».

Sub Main;

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.RevisionsDimensionPoint(12195998, DateTime.Parse("01.01.2002 00:00:00"));

DimEl := RevDim.Elements;

DimAtt := RevDim.Attributes;

For j := 0 To DimEl.Count - 1 Do

Debug.WriteLine("Элемент: " + j.ToString);

For i := 0 To DimAtt.Count - 1 Do

DimA := DimAtt.Item(i);

Debug.WriteLine("Атрибут: " + DimA.Attribute.Name + ". Значение: " + DimA.Value(j));

End For;

End For;

End Sub Main;

После выполнения примера в окно консоли будут выведены данные справочника ревизий для показателя с ключом «1» на первое января 2002 года.

См. также:

IRubricatorInstance