Бизнес-процессы и задачи ERP

Форум Программирование Общие вопросы программирования (Dev)

1С:ERP Управление предприятием 2 Бизнес-процессы

1. pusal 03.04.23 18:30 Сейчас в теме

Всем привет!
Пытаюсь создать собственный бизнес-процесс в ERP, используя уже существующий объект "ЗадачаИсполнителю".
Бизнес процесс стартует при проведении документа "Заявка на расходование ДС", но не продвигается по карте при выполнении первой задачи исполнителя.
Чего ему не хватает?
Буду благодарен за любые наводки на решение, спасибо.

Код модуля объекта бизнес-процесса:

Процедура СогласованиеФАПриСозданииЗадач(ТочкаМаршрутаБизнесПроцесса, ФормируемыеЗадачи, Отказ)

    НоваяЗадача = Задачи.ЗадачаИсполнителя.СоздатьЗадачу();
	НоваяЗадача.БизнесПроцесс = ЭтотОбъект.Ссылка;
	НоваяЗадача.ТочкаМаршрута = БизнесПроцессы.псСогласованиеЗаявкиНаРасходованиеДС.ТочкиМаршрута.СогласованиеФА;
	НоваяЗадача.Дата = ТекущаяДата();
	НоваяЗадача.Наименование = "Согласовать заявку на Расходование ДС " + Предмет.Контрагент + " на сумму" + Предмет.СуммаДокумента + " " + Предмет.Валюта;
	НоваяЗадача.Исполнитель = Справочники.псПараметрыСистемы.ФинансовыйАналитик.ЗначениеПараметра;
	НоваяЗадача.Автор = Предмет.Автор;
	НоваяЗадача.СрокИсполнения = ТекущаяДата()+86400*7;
	НоваяЗадача.АвторСтрокой = Предмет.Автор;
	НоваяЗадача.ГруппаИсполнителейЗадач = Предмет.Автор;
	НоваяЗадача.Предмет = ЭтотОбъект.Ссылка.Предмет;
	
	ФормируемыеЗадачи.Добавить(НоваяЗадача);
   	СтандартнаяОбработка = Ложь;

КонецПроцедуры

Процедура ЗавелРуководительЦФОПроверкаУсловия(ТочкаМаршрутаБизнесПроцесса, Результат)

	Результат = Ложь;

КонецПроцедуры

Процедура СогласованиеРуководителяПриСозданииЗадач(ТочкаМаршрутаБизнесПроцесса, ФормируемыеЗадачи, Отказ)

    НоваяЗадача = Задачи.ЗадачаИсполнителя.СоздатьЗадачу();
	НоваяЗадача.БизнесПроцесс = ЭтотОбъект.Ссылка;
	НоваяЗадача.ТочкаМаршрута = БизнесПроцессы.псСогласованиеЗаявкиНаРасходованиеДС.ТочкиМаршрута.СогласованиеРуководителя;
	НоваяЗадача.Дата = ТекущаяДата();
	НоваяЗадача.Наименование = "Согласовать заявку на Расходование ДС " + Предмет.Контрагент + " на сумму" + Предмет.СуммаДокумента + " " + Предмет.Валюта;
	НоваяЗадача.Исполнитель = Справочники.псПараметрыСистемы.ФинансовыйАналитик.ЗначениеПараметра;
	НоваяЗадача.Автор = Предмет.Автор;
	НоваяЗадача.СрокИсполнения = ТекущаяДата()+86400*7;
	НоваяЗадача.АвторСтрокой = Предмет.Автор;
	НоваяЗадача.ГруппаИсполнителейЗадач = Предмет.Автор;
	НоваяЗадача.Предмет = ЭтотОбъект.Ссылка.Предмет;
	
	ФормируемыеЗадачи.Добавить(НоваяЗадача);
   	СтандартнаяОбработка = Ложь;

КонецПроцедуры

Процедура СогласованиеФАОбработкаПроверкиВыполнения(ТочкаМаршрутаБизнесПроцесса, Задача, Результат)
	
	ЗадачаОбъект = Задача.ПолучитьОбъект();
	ЗадачаОбъект.ВыполнитьЗадачу();
	
КонецПроцедуры

Показать

Прикрепленные файлы: