IMsCalculationState.CurrentPoint

Синтаксис

CurrentPoint: DateTime;

Описание

Свойство CurrentPoint возвращает текущую календарную точку шага расчета.

Пример

Для выполнения примера предполагается наличие контейнера моделирования с идентификатором «CONT_MODEL». В данном контейнере должна присутствовать задача прогнозирования с идентификатором «OBJ_PROBLEM».

Sub Main;

Var

mb: IMetabase;

pModelSpace: IMetabaseObjectDescriptor;

_prob: IMsProblem;

settings: IMsProblemCalculationSettings;

_calc: IMsProblemCalculation;

state: IMsCalculationState;

slice: IMsFormulaTransformSlice;

ds: IMatrixDataSource;

mt: IMatrix;

iter: IMatrixIterator;

TrVar: IMsFormulaTransformVariable;

Begin

mb := MetabaseClass.Active;

pModelSpace := mb.ItemById("CONT_MODEL");

_prob := mb.ItemByIdNamespace("OBJ_PROBLEM", pModelSpace.Key).Bind As IMsProblem;

settings := _prob.CreateCalculationSettings;

_calc := _prob.Calculate(settings);

Repeat

_calc.StepOver;

state := _calc.CalculationState;

Debug.WriteLine(state.Message);

Until state.Model <> Null;

Debug.WriteLine("Текущая точка расчета: " + state.CurrentPoint.ToString);

Debug.WriteLine("Ключ сценария: " + state.Scenario.ToString);

Debug.WriteLine("Модель: " + (state.Model As IMetabaseObject).Name);

TrVar := state.Model.Transform.Outputs.Item(0);

slice := TrVar.Slices.Item(0);

ds := state.Data(slice);

mt := ds.Execute(Null);

Debug.WriteLine("Текущие значения выходной переменной '" + TrVar.Name+"'");

Iter := mt.CreateIterator;

Iter.Move(IteratorDirection.First);

While Iter.Valid Do

Debug.WriteLine(" " + Iter.Value);

Iter.Move(IteratorDirection.Next);

End While;

Debug.WriteLine("=== Прерываем расчет ===");

_calc.Stop;

End Sub Main;

После выполнения примера в окно консоли будет выведена информация о пошаговом расчете задачи:

После расчета первой календарной точки вычисление задачи будет прервано.

Например:

Module execution started

Инициализация расчета

Загрузка данных переменной "Экспорт (всего)"

Загрузка данных переменной "Промежуточные данные"

Загрузка данных переменной "Итоговые данные"

Расчёт задачи на дату 01.01.1981 по сценарию "Базовый"

Текущая точка расчета: 01.01.1981 00:00:00

Ключ сценария: 7063

Модель: Преобразование исходных данных в промежуточные

Текущие значения выходной переменной 'Промежуточные данные'

 2

=== Прерываем расчет ===

Module execution finished

См. также:

IMsCalculationState