ILanerCalculateSerie.RevisionKey

Синтаксис

RevisionKey: Integer;

Описание

Свойство доступно только для чтения.

Свойство RevisionKey возвращает ключ ревизии, в которой был создан вычисляемый ряд.

Пример

Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с идентификатором «Button1», компонента TabSheetBox и компонента UiErAnalyzer с наименованием «UiErAnalyzer1», являющегося источником данных для TabSheetBox. В «UiErAnalyzer1» должна быть загружена рабочая книга базы данных временных рядов. В базе должен присутствовать  показатель с ключом «108310».

Пример будет выполняться при нажатии на кнопку.

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);

Var

ErAn: IEaxAnalyzer;

Laner: ILaner;

LanSers: ILanerSeries;

RubInst: IRubricatorInstance;

RubFact: IRubricatorFactor;

Rev: IRubricatorRevision;

CalcSer: ILanerCalculateSerie;

Begin

ErAn := UiErAnalyzer1.ErAnalyzer;

Laner := ErAn.Laner;

Laner.BeginUpdate;

LanSers := Laner.Series;

RubInst := Laner.RubricatorInstance;

RubFact := RubInst.GetFactData(108310).Factor;

Rev := RubInst.OpenRevision("New Revision");

CalcSer := LanSers.AddCalculateSerieAsSource(RubFact, Rev.Key);

CalcSer.Name := "CalculateSerieAsSource (" + CalcSer.SourceStub.Name + ")";

CalcSer.SaveLikeSource := True;

Debug.WriteLine(CalcSer.RevisionKey);

Laner.EndUpdate;

End Sub Button1OnClick;

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

См. также:

ILanerCalculateSerie