IMsCalculationChainModel.IsExclusive

Синтаксис

IsExclusive: Boolean;

Описание

Свойство IsExclusive возвращает признак того, является ли модель внутренней для цепочки расчета. True - модель является внутренней, False - модель является внешней.

Пример

Для выполнения примера предполагается наличие в репозитории контейнера моделирования с идентификатором «CONT_M». В контейнере присутствует метамодель с идентификатором «META_MODEL».

Sub Main;

Var

mb: IMetabase;

cm: IMetabaseObjectDescriptor;

MetaModel: IMsMetaModel;

ChainEntries: IMsCalculationChainEntries;

ChainModel: IMsCalculationChainModel;

i: Integer;

Begin

mb := MetabaseClass.Active;

cm := mb.ItemById("CONT_M");

MetaModel := mb.ItemByIdNamespace("META_MODEL", cm.Key).Bind As IMsMetaModel;

ChainEntries := MetaModel.CalculationChain;

For i := 0 To ChainEntries.Count - 1 Do

If ChainEntries.Item(i).Type = MsCalculationChainEntryType.Model Then

ChainModel := ChainEntries.Item(i) As IMsCalculationChainModel;

If ChainModel.IsExclusive Then

Debug.WriteLine(ChainModel.Name);

End If;

End If;

End For;

End Sub Main;

После выполнения примера в окно консоли будут выведены наименования внутренних моделей, входящих в щепочку расчета..

См. также:

IMsCalculationChainModel