![](http://infostart.ru/upload/iblock/a06/a06d3239f444575769e22a3560da1842.jpg)
![](http://infostart.ru/upload/iblock/ea4/ea4e577a0b0a26a4a182e53f76bb8616.jpg)
![](http://infostart.ru/upload/iblock/b5c/b5c0a9688acae2f9f043f1e54e398fbd.jpg)
![](http://infostart.ru/upload/iblock/caf/caf6b3e1ba40309074f92ebc5a71c69e.jpg)
![](http://infostart.ru/upload/iblock/74e/74e02ad3a8c18dc53ff23b6c793e98a2.jpg)
![](http://infostart.ru/upload/iblock/9e7/9e79da3e6428050eea8eb1590df78958.jpg)
Задача = Событие.Источник.Ссылка;
ЗаписьЖурналаРегистрации("ТПЭ.Пользовательский дополнительный обработчик",
УровеньЖурналаРегистрации.Информация,
, , НСтр("ru = 'Пользовательский дополнительный обработчик Рассмотрение. Начало'"));
Если Задача.ТочкаМаршрута = БизнесПроцессы.Рассмотрение.ТочкиМаршрута.Рассмотреть тогда
Документ = ОбзорЗадачВызовСервера.ПолучитьОсновнойПредметДокумент(Задача.Предметы);
если ЗначениеЗаполнено(Документ) тогда
если Документ.ВидДокумента.Наименование = "Входящее письмо" тогда
если ЗначениеЗаполнено(Документ.СрокИсполнения) тогда
ЗадачаРассмотреть = Задача.ПолучитьОбъект();
ЗадачаРассмотреть.СрокИсполнения = НачалоДня(Документ.СрокИсполнения);
ЗадачаРассмотреть.Записать();
конецесли;
конецесли;
конецесли;
КонецЕсли;
ЗаписьЖурналаРегистрации("ТПЭ.Пользовательский дополнительный обработчик",
УровеньЖурналаРегистрации.Информация,
, , НСтр("ru = 'Пользовательский дополнительный обработчик Рассмотрение. Конец'"));
Вот результат: