EditModel: IMsModel;
Метод EditModel открывает модель для редактирования.
Для выполнения примера предполагается наличие в репозитории контейнера моделирования с идентификатором «CONT_M». В контейнере присутствует метамодель с идентификатором «META_MODEL».
Sub Main;
Var
mb: IMetabase;
cm: IMetabaseObjectDescriptor;
MetaModel: IMsMetaModel;
ChainEntries: IMsCalculationChainEntries;
ChainModel: IMsCalculationChainModel;
Model: IMsModel;
Begin
mb := MetabaseClass.Active;
cm := mb.ItemById("CONT_M");
MetaModel := mb.ItemByIdNamespace("META_MODEL", cm.Key).Edit As IMsMetaModel;
ChainEntries := MetaModel.CalculationChain;
ChainModel := ChainEntries.AddExclusiveModel;
Model := ChainModel.EditModel;
(Model As IMetabaseObject).Name := "Внутренняя модель";
(MetaModel As IMetabaseObject).Save;
End Sub Main;
После выполнения примера в цепочку расчета метамодели будет добавлена внутренняя модель, которой будет дано наименование «Внутренняя модель».
См. также: