Сделать активным. Отмечает указанный бизнес-процесс как активный.
// Отмечает указанный бизнес-процесс как активный.
//
// Параметры:
// ПараметрКоманды - Массив, СтрокаГруппировкиДинамическогоСписка, БизнесПроцессСсылка - Бизнес процесс.
//
Процедура СделатьАктивным(Знач ПараметрКоманды) Экспорт
ТекстВопроса = "";
ЧислоЗадач = 0;
Если ТипЗнч(ПараметрКоманды) = Тип("Массив") Тогда
Если ПараметрКоманды.Количество() = 0 Тогда
ПоказатьПредупреждение(,НСтр("ru= 'Не выбран ни один бизнес-процесс.'"));
Возврат;
КонецЕсли;
Если ПараметрКоманды.Количество() = 1 И ТипЗнч(ПараметрКоманды[0]) = Тип("СтрокаГруппировкиДинамическогоСписка") Тогда
ПоказатьПредупреждение(,НСтр("ru= 'Не выбран ни один бизнес-процесс.'"));
Возврат;
КонецЕсли;
ЧислоЗадач = БизнесПроцессыИЗадачиВызовСервера.КоличествоНевыполненныхЗадачБизнесПроцессов(ПараметрКоманды);
Если ПараметрКоманды.Количество() = 1 Тогда
ТекстВопроса = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
НСтр("ru = 'Бизнес-процесс ""%1"" и все его задачи (%2) будут сделаны активными. Продолжить?'"),
Строка(ПараметрКоманды[0]), ЧислоЗадач);
Иначе
ТекстВопроса = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
НСтр("ru = 'Бизнес-процессы (%1) и их задачи (%2) будут сделаны активными. Продолжить?'"),
ПараметрКоманды.Количество(), ЧислоЗадач);
КонецЕсли;
Иначе
Если ТипЗнч(ПараметрКоманды) = Тип("СтрокаГруппировкиДинамическогоСписка") Тогда
ПоказатьПредупреждение(,НСтр("ru= 'Не выбран ни один бизнес-процесс.'"));
Возврат;
КонецЕсли;
ЧислоЗадач = БизнесПроцессыИЗадачиВызовСервера.КоличествоНевыполненныхЗадачБизнесПроцесса(ПараметрКоманды);
ТекстВопроса = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
НСтр("ru = 'Бизнес-процесс ""%1"" и все его задачи (%2) будут сделаны активными. Продолжить?'"),
Строка(ПараметрКоманды), ЧислоЗадач);
КонецЕсли;
Оповещение = Новый ОписаниеОповещения("СделатьАктивнымЗавершение", ЭтотОбъект, ПараметрКоманды);
ПоказатьВопрос(Оповещение, ТекстВопроса, РежимДиалогаВопрос.ДаНет, , КодВозвратаДиалога.Нет, НСтр("ru = 'Остановка бизнес-процесса'"));
КонецПроцедуры
///////////////////////////////////////////////////////////////////////////////////////////////////////
// Copyright (c) 2019, ООО 1С-Софт
// Все права защищены. Эта программа и сопроводительные материалы предоставляются
// в соответствии с условиями лицензии Attribution 4.0 International (CC BY 4.0)
// Текст лицензии доступен по ссылке:
// https://creativecommons.org/licenses/by/4.0/legalcode
///////////////////////////////////////////////////////////////////////////////////////////////////////
СделатьАктивнымЗавершение (БСП)
СделатьАктивнымБизнесПроцессы (БСП)
СделатьАктивнымБизнесПроцесс (БСП)
АктивныеДлительныеОперации (БСП)
ЗапланироватьНеАктивныеЗадания (БСП)
НаличиеАктивныхСоединений (БСП)
УстановитьФлагАктивностиПользователяВОбласти (БСП)