IMsFormulaTransformVariable.Parameter

Parameter: IMsModelParamAttributes;

Parameter: Prognoz.Platform.Interop.Ms.IMsModelParamAttributes;

Sub UserProc;
Var
    mb: IMetabase;
    cm: IMetabaseObjectDescriptor;
    Model: IMsModel;
    Transform: IMsFormulaTransform;
    InputsVar: IMsFormulaTransformVariables;
    Varabl: IMsFormulaTransformVariable;
    i: Integer;
Begin
    // Получаем текущий репозиторий
    mb := MetabaseClass.Active;
    // Получаем контейнер моделирования
    cm := mb.ItemById("CONT_MODEL");
    // Получаем модель
    Model := mb.ItemByIdNamespace("MODEL", cm.Key).Bind As IMsModel;
    // Настраиваем параметры модели
    Transform := Model.Transform;
    // Настраиваем переменные метода
    InputsVar := Transform.Inputs;
    Debug.WriteLine("Переменные, которые являются параметрами:");
    For i := 0 To InputsVar.Count - 1 Do
        Varabl := InputsVar.Item(i);
        If Varabl.Parameter.Parameter.Id <> "" Then
            Debug.WriteLine("  " + Varabl.Id);
        End If;
    End For;
End Sub UserProc;

Imports Prognoz.Platform.Interop.Ms;
…
Public Shared Sub Main(Params: StartParams);
Var
    mb: IMetabase;
    cm: IMetabaseObjectDescriptor;
    Model: IMsModel;
    Transform: IMsFormulaTransform;
    InputsVar: IMsFormulaTransformVariables;
    Varabl: IMsFormulaTransformVariable;
    i: Integer;
Begin
    // Получаем текущий репозиторий
    mb := Params.Metabase;
    // Получаем контейнер моделирования
    cm := mb.ItemById["CONT_MODEL"];
    // Получаем модель
    Model := mb.ItemByIdNamespace["MODEL", cm.Key].Bind() As IMsModel;
    // Настраиваем параметры модели
    Transform := Model.Transform;
    // Настраиваем переменные метода
    InputsVar := Transform.Inputs;
    System.Diagnostics.Debug.WriteLine("Переменные, которые являются параметрами:");
    For i := 0 To InputsVar.Count - 1 Do
        Varabl := InputsVar.Item[i];
        If Varabl.Parameter.Parameter.Id <> "" Then
            System.Diagnostics.Debug.WriteLine("  " + Varabl.Id);
        End If;
    End For;
End Sub;