1c/Tasks
1
0
Fork 0
mirror of https://github.com/BlizD/Tasks.git synced 2025-01-26 03:52:19 +02:00
Code Issues Releases Activity

№286 Servicedesk: отправка уведомления о входящем письме по задаче

Browse Source
This commit is contained in:
Anton Ivanov 2018-02-11 11:13:17 +03:00
parent e890211b21
commit f7eccebc0f
2 changed files with 31 additions and 31 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/cf/CommonModules/УправлениеЭлектроннойПочтой/Ext/Module.bsl
View File

@ -875,7 +875,7 @@
узОбщийМодульСервер.ЗаполнитьПредметВПисьме_ЗадачаПоТемеПисьма(УчетнаяЗапись,Письмо,Сообщение);
Предмет = Письмо.Предмет;
Письмо.ДополнительныеСвойства.Вставить("узОтправитьУведомлениеКонтрагенту",Истина);
Письмо.ДополнительныеСвойства.Вставить("узОтправитьУведомлениеОВходящемПисьме",Истина);
Письмо.Записать();
//- #286 Иванов А.Б. 2017-12-17

60
src/cf/CommonModules/узОбщийМодульСервер/Ext/Module.bsl
View File

@ -789,36 +789,36 @@
КонецФункции
Процедура ОтправитьУведомлениеПередЗаписьюВходящегоПисьма(Источник) Экспорт
Возврат;
//пЗадача = Источник.Предмет;
//
//Если НЕ ЗначениеЗаполнено(пЗадача) Тогда
// Возврат;
//Конецесли;
//
//Если НЕ Источник.ДополнительныеСвойства.Свойство("узОтправитьУведомлениеКонтрагенту") Тогда
// Возврат;
//Конецесли;
//
//СобытияВИстории = Новый Структура();
//СобытияВИстории.Вставить("СтарыйИсполнитель",пЗадача.Исполнитель);
//СобытияВИстории.Вставить("СтарыйСтатус",пЗадача.Статус);
//СобытияВИстории.Вставить("УчетнаяЗапись",Источник.УчетнаяЗапись);
//
//ТЗСобытияВИсторииДляУведомлений = Новый ТаблицаЗначений;
//ТЗСобытияВИсторииДляУведомлений.Колонки.Добавить("ВидСобытия",Новый ОписаниеТипов("ПеречислениеСсылка.узВидыСобытий"));
//ТЗСобытияВИсторииДляУведомлений.Колонки.Добавить("МассивИзмененнийПоКомментариям",Новый ОписаниеТипов("Массив"));
//
//ВидСобытия = ПредопределенноеЗначение("Перечисление.узВидыСобытий.ВходящееПисьмо");
//
//СтрокаТЗСобытияВИсторииДляУведомлений = ТЗСобытияВИсторииДляУведомлений.Добавить();
//СтрокаТЗСобытияВИсторииДляУведомлений.ВидСобытия = ВидСобытия;
//СтрокаТЗСобытияВИсторииДляУведомлений.МассивИзмененнийПоКомментариям = Новый Массив();
//
//СобытияВИстории.Вставить("ТЗСобытияВИсторииДляУведомлений",ТЗСобытияВИсторииДляУведомлений);
//
//ЗадачаОбъект = пЗадача.ПолучитьОбъект();
//ЗадачаОбъект.ОтправитьУведомлениеНаПочту(СобытияВИстории);
//Возврат;
пЗадача = Источник.Предмет;
Если НЕ ЗначениеЗаполнено(пЗадача) Тогда
Возврат;
Конецесли;
Если НЕ Источник.ДополнительныеСвойства.Свойство("узОтправитьУведомлениеОВходящемПисьме") Тогда
Возврат;
Конецесли;
СобытияВИстории = Новый Структура();
СобытияВИстории.Вставить("СтарыйИсполнитель",пЗадача.Исполнитель);
СобытияВИстории.Вставить("СтарыйСтатус",пЗадача.Статус);
СобытияВИстории.Вставить("УчетнаяЗапись",Источник.УчетнаяЗапись);
ТЗСобытияВИсторииДляУведомлений = Новый ТаблицаЗначений;
ТЗСобытияВИсторииДляУведомлений.Колонки.Добавить("ВидСобытия",Новый ОписаниеТипов("ПеречислениеСсылка.узВидыСобытий"));
ТЗСобытияВИсторииДляУведомлений.Колонки.Добавить("МассивИзмененнийПоКомментариям",Новый ОписаниеТипов("Массив"));
ВидСобытия = ПредопределенноеЗначение("Перечисление.узВидыСобытий.ВходящееПисьмо");
СтрокаТЗСобытияВИсторииДляУведомлений = ТЗСобытияВИсторииДляУведомлений.Добавить();
СтрокаТЗСобытияВИсторииДляУведомлений.ВидСобытия = ВидСобытия;
СтрокаТЗСобытияВИсторииДляУведомлений.МассивИзмененнийПоКомментариям = Новый Массив();
СобытияВИстории.Вставить("ТЗСобытияВИсторииДляУведомлений",ТЗСобытияВИсторииДляУведомлений);
ЗадачаОбъект = пЗадача.ПолучитьОбъект();
ЗадачаОбъект.ОтправитьУведомлениеНаПочту(СобытияВИстории);
КонецПроцедуры