ICalcAlgorithm.Included

Синтаксис

Included(CalcObject: ICalcObject): Boolean;

Отсутствует;

Параметры

CalcObject. Объект алгоритма расчёта.

Описание

Свойство Included определяет включение/исключение объекта из расчёта алгоритма.

Комментарии

Возможные значения:

Пример

Для выполнения примера предполагается наличие в репозитории алгоритма расчёта с идентификатором ALGORITHM. В алгоритме расчёта должно содержаться не менее двух объектов.

Добавьте ссылку на пользовательскую сборку «Ядро алгоритма расчёта», которая содержится в компоненте «Алгоритмы расчёта», и ссылки на системные сборки: Algo, Metabase.

Sub UserProc;
Var
    MB: IMetabase;
    MObj: IMetabaseObjectDescriptor;
    Algo: ICalcObject;
    List: ICalcObjectsList;
    CalcAlgo: ICalcAlgorithm;
    Block: ICalcObject;
Begin
    MB := MetabaseClass.Active;
    // Получим алгоритм расчёта
    MObj := MB.ItemById("ALGORITHM");
    Algo := CalcObjectFactory.CreateCalcObject(MObj, True);
    CalcAlgo := Algo As ICalcAlgorithm;
    // Получим список объектов алгоритма расчёта
    List := CalcAlgo.Items;
    // Исключим из расчёта первый объект
    Block := List.Item(0) As ICalcObject;
    CalcAlgo.Included(Block) := False;
    // Выполним проверку на наличие изменений в алгоритме расчёта
    If CalcAlgo.IsDirty Then
        // Выведем в консоль наименование исключенного объекта
        Debug.WriteLine("«" + Block.Name + "»" + " исключен из расчёта");
        // Сохраним изменения в алгоритме расчёта
        CalcAlgo.Save;
    End If;
End Sub UserProc;

Не предусмотрен.

В результате выполнения примера из расчёта будет исключен первый объект алгоритма расчёта. В консоль будет выведено наименование исключенного объекта, например:

«Блок функции» исключен из расчёта

См. также:

ICalcAlgorithm