&Вместо("ЗавершениеПриЗавершении")
Процедура пп_ЗавершениеПриЗавершении(ТочкаМаршрутаБизнесПроцесса,Отказ)
УстановитьПривилегированныйРежим(Истина);
ДатаЗавершения = ТекущаяДатаСеанса();
СрокИсполненияДатой = ДатаЗавершения;
РаботаСПроектами.ОтметитьОкончаниеВыполненияПроектнойЗадачи(ЭтотОбъект);
//Проверка значения дополнительного реквизита "Создавать задачу ознакомления"
ДопСвойство = БизнесПроцессы.Согласование.пп_ПолучитьСвойствоСоздаватьЗадачуОзнакомления();
СоздаватьЗадачуОзнакомления = УправлениеСвойствами.ЗначениеСвойства(Ссылка,ДопСвойство);
Если ЗначениеЗаполнено(СоздаватьЗадачуОзнакомления) Тогда
Если СоздаватьЗадачуОзнакомления Тогда
// Если процесс завершился положительно и нет задачи ознакомления (задача ознакомления могла быть
// создана до перехода на редакцию 2.1), то создаем задачу ознакомления с результатом.
Если РезультатСогласования = Перечисления.РезультатыСогласования.Согласовано
И РезультатыОзнакомлений.Найти(НомерИтерации, "НомерИтерации") = Неопределено Тогда
Задача = Задачи.ЗадачаИсполнителя.СоздатьЗадачу();
ЗаполнитьЗадачуОзнакомиться(Задача);
Задача.Записать();
НоваяСтрока = РезультатыОзнакомлений.Добавить();
НоваяСтрока.НомерИтерации = НомерИтерации;
НоваяСтрока.ЗадачаИсполнителя = Задача.Ссылка;
РаботаСБизнесПроцессами.ЗаписатьПроцесс(ЭтотОбъект, "ПростаяЗапись");
КонецЕсли;
КонецЕсли;
КонецЕсли;
КонецПроцедуры
&Вместо("ОзнакомитьсяПередСозданиемЗадач")
Процедура пп_ОзнакомитьсяПередСозданиемЗадач(ТочкаМаршрутаБизнесПроцесса, формируемыеЗадачи, СтандартнаяОбработка)
СтандартнаяОбработка = Ложь;
//Проверка значения дополнительного реквизита "Создавать задачу ознакомления"
ДопСвойство = БизнесПроцессы.Согласование.пп_ПолучитьСвойствоСоздаватьЗадачуОзнакомления();
СоздаватьЗадачуОзнакомления = УправлениеСвойствами.ЗначениеСвойства(Ссылка,ДопСвойство);
Если ЗначениеЗаполнено(СоздаватьЗадачуОзнакомления) Тогда
Если СоздаватьЗадачуОзнакомления Тогда
// Если процесс завершился положительно, то задачу ознакомления формируем
// после завершения процесса.
Если РезультатСогласования = Перечисления.РезультатыСогласования.Согласовано Тогда
Возврат;
КонецЕсли;
Задача = Задачи.ЗадачаИсполнителя.СоздатьЗадачу();
ЗаполнитьЗадачуОзнакомиться(Задача);
ЗадачаСсылка = Задачи.ЗадачаИсполнителя.ПолучитьСсылку();
Задача.УстановитьСсылкуНового(ЗадачаСсылка);
ФормируемыеЗадачи.Добавить(Задача);
УстановитьПривилегированныйРежим(Истина);
НоваяСтрока = РезультатыОзнакомлений.Добавить();
НоваяСтрока.НомерИтерации = НомерИтерации;
НоваяСтрока.ЗадачаИсполнителя = ЗадачаСсылка;
РаботаСБизнесПроцессами.ЗаписатьПроцесс(ЭтотОбъект, "ПростаяЗапись");
КонецЕсли;
КонецЕсли;
КонецПроцедуры
