Insert(Index: Integer; Name: String; Desc: IMetabaseObjectDescriptor): IBProcessParam;
Index. Индекс позиции в коллекции.
Name. Наименование создаваемого параметра.
Desc. Описание справочника репозитория, который будет лежать в основе параметра.
Метод Insert в заданной позиции создаёт новый параметр процесса на основе указанных наименования и справочника репозитория.
Метод возвращает настройки созданного параметра.
Для выполнения примера в репозитории предполагается наличие процесса с идентификатором PROCESS и справочника с идентификатором D_SCENARIO.
Добавьте ссылки на системные сборки: BPM, Metabase. Также добавьте ссылку на сборку, которая необходима для работы с процессами.
Sub UserProc;
Var
Mb: IMetabase;
MObj: IMetabaseObjectDescriptor;
Process: IBProcess;
Params: IBProcessParams;
Param: IBProcessParam;
Begin
Mb := MetabaseClass.Active;
MObj := Mb.ItemById("PROCESS");
// Получение структуры процесса
Process := BProcessCollection.EditByKey(MObj.Key);
Params := Process.Params;
// Создание параметра
Param := Params.Insert(0, "Сценарий выполнения", Mb.ItemById("D_SCENARIO"));
Param.CheckElementsRights := True;
// Сохранение изменений
Process.Save;
End Sub UserProc;
При выполнении примера в процессе будет создан новый параметр, связанный с указанным справочником. Параметр будет вставлен в первую позицию в коллекции.
См. также: