Показать содержание 

Ms > Интерфейсы сборки Ms > IModelling > IModelling.GetValueByDate

IModelling.GetValueByDate

Синтаксис Fore

GetValueByDate(Input: Variant; Date: Variant): Variant;

Синтаксис Fore.NET

GetValueByDate(Input: Object; Date: Object): Object;

Параметры

Input. Ряд, значение которого необходимо получить;

Date. Дата, на которую надо получить значение.

Описание

Метод GetValueByDate возвращает значение ряда на заданную дату.

Комментарии

В качестве значения параметра Input может передаваться константа, параметр или объект типа TimeSeries, а в качестве значения параметра Date - число, строка или параметр.

Пример Fore

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

Добавьте ссылки на системные сборки: Metabase, Ms.

Sub UserProc;
Var
    Mb: IMetabase;
    ModelSpace, ModelObj: IMetabaseObject;
    Transf: IMsFormulaTransform;
    Formula: IMsFormula;
    Model: IMsModel;
    Determ: IMsDeterministicTransform;
    TransVar_1: IMsFormulaTransformVariable;
    Slice: IMsFormulaTransformSlice;
    TermInfo_1: IMsFormulaTermInfo;
    Expr: IExpression;
Begin
    // Получаем репозиторий
    Mb := MetabaseClass.Active;
    // Получаем контейнер моделирования
    ModelSpace := Mb.ItemById("MS").Bind;
    // Получаем модель
    ModelObj := Mb.ItemByIdNamespace("MODEL_D", ModelSpace.Key).Edit;
    Model := ModelObj As IMsModel;
    // Получаем параметры расчета модели
    Transf := Model.Transform;
    Formula := Transf.FormulaItem(0);
    Determ := Formula.Method As IMsDeterministicTransform;
    // Получаем первую входную переменную
    TransVar_1 := Transf.Inputs.Item(0);
    Slice := TransVar_1.Slices.Item(0);
    TermInfo_1 := Transf.CreateTermInfo;
    TermInfo_1.Slice := Slice;
    // Получаем выражение расчета модели
    Expr := Determ.Expression;
    Expr.References := "Ms";
    // Задаем выражение расчета модели
    Expr.AsString := "GetValueByDate(" + TermInfo_1.TermInnerText + ", 2005)*2";
    // Проверяем корректность выражения
    If Expr.Valid
        // Если выражение задано корректно, то сохраняем модель
        Then ModelObj.Save;
        // Если выражение некорректное, то выводим сообщение в окно консоли
        Else Debug.WriteLine("Модель не сохранена: ошибка в формуле");
    End If;
End Sub UserProc;

В результате выполнения примера будет задано новое выражение для модели детерминированного уравнения: умноженное на два значение первой входной переменной на 2005-й год.

Пример Fore.NET

Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.

Imports Prognoz.Platform.Interop.Ms;
Imports Prognoz.Platform.Interop.ForeSystem;
…
Public Shared Sub Main(Params: StartParams);
Var
    Mb: IMetabase;
    ModelSpace, ModelObj: IMetabaseObject;
    Transf: IMsFormulaTransform;
    Formula: IMsFormula;
    Model: IMsModel;
    Determ: IMsDeterministicTransform;
    TransVar_1: IMsFormulaTransformVariable;
    Slice: IMsFormulaTransformSlice;
    TermInfo_1: IMsFormulaTermInfo;
    Expr: IExpression;
Begin
    // Получаем репозиторий
    Mb := Params.Metabase;
    // Получаем контейнер моделирования
    ModelSpace := Mb.ItemById["MS"].Bind();
    // Получаем модель
    ModelObj := Mb.ItemByIdNamespace["MODEL_D", ModelSpace.Key].Edit();
    Model := ModelObj As IMsModel;
    // Получаем параметры расчета модели
    Transf := Model.Transform;
    Formula := Transf.FormulaItem[0];
    Determ := Formula.Method As IMsDeterministicTransform;
    // Получаем первую входную переменную
    TransVar_1 := Transf.Inputs.Item[0];
    Slice := TransVar_1.Slices.Item[0];
    TermInfo_1 := Transf.CreateTermInfo();
    TermInfo_1.Slice := Slice;
    // Получаем выражение расчета модели
    Expr := Determ.Expression;
    Expr.References := "Ms";
    // Задаем выражение расчета модели
    Expr.AsString := "GetValueByDate(" + TermInfo_1.TermInnerText + ", 2005)*2";
    // Проверяем корректность выражения
    If Expr.Valid
        // Если выражение задано корректно, то сохраняем модель
        Then ModelObj.Save();
        // Если выражение некорректное, то выводим сообщение в окно консоли
        Else System.Diagnostics.Debug.WriteLine("Модель не сохранена: ошибка в формуле");
    End If;
End Sub;

Пример использования в выражениях

Выражение 1:

GetValueByDate({ВВП|Анкоридж[t]}, 2005)*2

Результат: значение ряда ВВП|Анкоридж на 2005-й год будет умножено на два.

Применение: можно использовать в формулах вычисляемых рядов базы данных временных рядов и в формулах моделей контейнера моделирования, основанных на атрибутах.

Выражение 2:

GetValueByDate(X1, "2015A")*2

Результат: значение фактора X1 на 2015-й год будет умножено на два.

Применение: можно использовать в формулах моделей контейнера моделирования, основанных на переменных.

См. также:

IModelling | База данных временных рядов: калькулятор | Контейнер моделирования: редактирование регрессора/формулы