MetaModel: IMsMetaModel;
The MetaModel property returns a metamodel included into metamodel calculation chain.
Executing the example requires a modeling container with the CONT_MODEL identifier. Metamodels with the BASE_MMODEL and ADD_MMODEL identifiers must be available in this container.
Sub Main;
Var
MB: IMetabase;
MObj: IMetabaseObject;
Meta: IMsMetaModel;
New_Meta: IMsMetaModel;
CalculationChain: IMsCalculationChainMetaModel;
Begin
MB := MetabaseClass.Active;
MObj := MB.ItemByIdNamespace("BASE_MMODEL", MB.ItemById("CONT_MODEL").Key).Edit;
Meta := MObj As IMsMetaModel;
New_Meta := MB.ItemByIdNamespace("ADD_MMODEL", MB.ItemById("CONT_MODEL").Key).Bind As IMsMetaModel;
CalculationChain := Meta.CalculationChain.AddMetaModel(New_Meta);
Debug.WriteLine(CalculationChain.Name);
MObj.Save;
End Sub Main;
After executing the example, the ADD_MMODEL metamodel is added to the calculation chain of the BASE_MMODEL metamodel, and its name is displayed in the console window.
See also: