IMsFormula.LevelParam

Синтаксис Fore

LevelParam: String;

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

LevelParam: string;

Описание

Свойство LevelParam определяет параметр, задающий динамику расчета метода.

Комментарии

Для задания динамики расчета напрямую используйте свойство IMsFormula.Level.

Пример Fore

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

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

Sub UserProc;
Var
    mb: IMetabase;
    MsKey: Integer;
    Metamodel: IMsMetaModel;
    Params: IMsModelParams;
    Param: IMsModelParam;
    Model: IMsModel;
    Formula: IMsFormula;
Begin
    // Получаем текущий репозиторий
    mb := MetabaseClass.Active;
    // Получаем ключ контейнера моделирования
    MsKey := mb.GetObjectKeyById("MS");
    // Получаем метамодель
    Metamodel := mb.ItemByIdNamespace("META_LEVELPARAM", MsKey).Edit As IMsMetaModel;
    // Получаем коллекцию параметров метамодели
    Params := Metamodel.Params;
    // Очищаем коллекцию параметров метамодели
    Params.Clear;
    // Добавляем новый параметр
    Param := Params.Add;
    // Указываем тип параметра - динамика
    Param.ParamType := TsParamType.Frequency;
    // Указываем значение по умолчанию - годовая динамика
    Param.DefaultValue := DimCalendarLevelSet.Year;
    // Задаем наименование и идентификатор параметра
    Param.Name := "Динамика расчета";
    Param.Id := "Formula_Level";
    // Сохраняем изменения в метамодели
    (Metamodel As IMetabaseObject).Save;
    // Получаем модель
    Model := mb.ItemByIdNamespace("MODEL_LEVELPARAM", MsKey).Edit As IMsModel;
    // Получаем метод расчета модели
    Formula := Model.Transform.FormulaItem(0);
    // Указываем, что динамику расчета модели будет определять параметр
    Formula.LevelParam := "Formula_Level";
    // Сохраняем изменения в модели
    (Model As IMetabaseObject).Save;
End Sub UserProc;

В результате выполнения примера модель «MODEL_LEVELPARAM» будет рассчитываться по динамике, заданной параметром «Formula_Level».

Пример Fore.NET

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

Imports Prognoz.Platform.Interop.Dimensions;
Imports Prognoz.Platform.Interop.Ms;
Imports Prognoz.Platform.Interop.Transform;
…
Public Shared Sub Main(Params: StartParams);
Var
    mb: IMetabase;
    MsKey: uinteger;
    Metamodel: IMsMetaModel;
    mParams: IMsModelParams;
    Param: IMsModelParam;
    Model: IMsModel;
    Formula: IMsFormula;
Begin
    // Получаем текущий репозиторий
    mb := Params.Metabase;
    // Получаем ключ контейнера моделирования
    MsKey := mb.GetObjectKeyById("MS");
    // Получаем метамодель
    Metamodel := mb.ItemByIdNamespace["META_LEVELPARAM", MsKey].Edit() As IMsMetaModel;
    // Получаем коллекцию параметров метамодели
    mParams := Metamodel.Params;
    // Очищаем коллекцию параметров метамодели
    mParams.Clear();
    // Добавляем новый параметр
    Param := mParams.Add();
    // Указываем тип параметра - динамика
    Param.ParamType := TsParamType.tsptFrequency;
    // Указываем значение по умолчанию - годовая динамика
    Param.DefaultValue := DimCalendarLevelSet.dclsYear;
    // Задаем наименование и идентификатор параметра
    Param.Name := "Динамика расчета";
    Param.Id := "Formula_Level";
    // Сохраняем изменения в метамодели
    (Metamodel As IMetabaseObject).Save();
    // Получаем модель
    Model := mb.ItemByIdNamespace["MODEL_LEVELPARAM", MsKey].Edit() As IMsModel;
    // Получаем метод расчета модели
    Formula := Model.Transform.FormulaItem[0];
    // Указываем, что динамику расчета модели будет определять параметр
    Formula.LevelParam := "Formula_Level";
    // Сохраняем изменения в модели
    (Model As IMetabaseObject).Save();
End Sub;

См. также:

IMsFormula