Method: IMsMethod;
Свойство Method возвращает параметры метода, используемого для расчета модели. Для определения параметров выбранного метода, данное свойство должно быть приведено к интерфейсу, описывающему метод расчета.
Для выполнения примера предполагается наличие в репозитории контейнера моделирования с идентификатором CONT_MODEL. В контейнере созданы переменные с идентификаторами Var_1 и Var_Factor, в дальнейшем используемые как моделируемая переменная и фактор соответственно.
Добавьте ссылки на системные сборки: Dimensions, Metabase, Ms.
Imports Prognoz.Platform.Interop.Dimensions;
Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.Ms;
…
Public Shared Sub Main(Params: StartParams);
Var
MB: IMetabase;
CrInf: IMetabaseObjectCreateInfo;
MObj: IMetabaseObject;
Model: IMsModel;
Trans: IMsFormulaTransform;
VarTrans: IMsFormulaTransformVariable;
Tree: IMsFormulaTransformSlicesTree;
Slice: IMsFormulaTransformSlice;
Selector: IMsFormulaTransformSelector;
Formula: IMsFormula;
Linear: IMsLinearRegressionTransform;
Varr: IMsVariable;
TransVar: IMsFormulaTransformVariable;
Begin
// Получим текущий репозиторий
MB := Params.Metabase;
CrInf := Mb.CreateCreateInfo();
CrInf.ClassId := MetabaseObjectClass.KE_CLASS_MSMODEL As Int32;
CrInf.Id := "New_LinReg";
CrInf.Name := "New_LinReg";
CrInf.Parent := Mb.ItemById["CONT_MODEL"];
CrInf.Permanent := False;
MObj := Mb.CreateObject(CrInf).Edit ();
Model := MObj As IMsModel;
Trans := Model.Transform;
//Добавим моделируемую переменную
Varr := MB.ItemByIdNamespace["Var_1", MB.ItemById["CONT_MODEL"].Key].Bind() As IMsVariable;
Model.Output.Add(Varr);
VarTrans := Trans.Outputs.Item[0];
Tree := VarTrans.SlicesTree[VarTrans];
Slice := Tree.CreateSlice(1);
Selector := Model.Transform.CreateSelector();
Selector.Slice := Slice;
Formula := Model.Transform.Transform[Selector];
Formula.Kind := MsFormulaKind.mfkLinearRegression;
Formula.Level := DimCalendarLevel.dclYear;
//Настроим параметры линейной регрессии
Linear := Formula.Method As IMsLinearRegressionTransform;
Varr := MB.ItemByIdNamespace["Var_Factor", MB.ItemById["CONT_MODEL"].Key].Bind() As IMsVariable;
//Добавим фактор
Model.Input.Add(Varr);
TransVar := Model.Transform.Inputs.Item[0];
MObj.Save();
End Sub;
В результате выполнения примера в контейнере моделирования будет создана новая модель. Для расчета модели используется метод линейной регрессии. Для модели будет задана моделируемая переменная и один фактор.
См. также: