#238 @GenVP Подключение механизма шаблонов БСП к рассылке уведомлений

2025-03-19 21:07:53 +02:00 · 2020-08-21 12:24:21 +03:00 · 2020-08-21 12:24:21 +03:00 · fac376976f
commit fac376976f
parent 333274ff09
18 changed files with 990 additions and 17 deletions
--- a/src/cf/Catalogs/узЗадачи/Ext/ManagerModule.bsl
+++ b/src/cf/Catalogs/узЗадачи/Ext/ManagerModule.bsl
@ -346,3 +346,228 @@
 	
 КонецФункции 
 //- #104 Дзеса Ігор (capitoshko) 08.10.2018 
+
+//+ГЕНА
+Функция СловарьДляСообщений()
+	
+	СообщенияСловаря = Новый ТаблицаЗначений;
+	СообщенияСловаря.Колонки.Добавить("Код"); // Фиксированный код в словаре
+	СообщенияСловаря.Колонки.Добавить("Имя"); // Копируется в текст письма как параметр
+	СообщенияСловаря.Колонки.Добавить("Текст"); // Получается из словаря
+	
+	СтрокаТЗ = СообщенияСловаря.Добавить();
+	СтрокаТЗ.Код = 22;
+	СтрокаТЗ.Имя = "узСловарь_Добрый_день";
+	
+	СтрокаТЗ = СообщенияСловаря.Добавить();
+	СтрокаТЗ.Код = 23;
+	СтрокаТЗ.Имя = "узСловарь_Номер_задачи";
+	
+	СтрокаТЗ = СообщенияСловаря.Добавить();
+	СтрокаТЗ.Код = 24;
+	СтрокаТЗ.Имя = "узСловарь_Описание_задачи";
+	
+	СтрокаТЗ = СообщенияСловаря.Добавить();
+	СтрокаТЗ.Код = 25;
+	СтрокаТЗ.Имя = "узСловарь_Комментарии";
+	
+	СтрокаТЗ = СообщенияСловаря.Добавить();
+	СтрокаТЗ.Код = 26;
+	СтрокаТЗ.Имя = "узСловарь_Реквизиты_задачи";
+	
+	СтрокаТЗ = СообщенияСловаря.Добавить();
+	СтрокаТЗ.Код = 27;
+	СтрокаТЗ.Имя = "узСловарь_Исполнитель";
+	
+	СтрокаТЗ = СообщенияСловаря.Добавить();
+	СтрокаТЗ.Код = 28;
+	СтрокаТЗ.Имя = "узСловарь_Статус";
+	
+	СтрокаТЗ = СообщенияСловаря.Добавить();
+	СтрокаТЗ.Код = 29;
+	СтрокаТЗ.Имя = "узСловарь_Важность";
+	
+	СтрокаТЗ = СообщенияСловаря.Добавить();
+	СтрокаТЗ.Код = 30;
+	СтрокаТЗ.Имя = "узСловарь_Основная_задача";
+	
+	МассивКодовСообщений = СообщенияСловаря.ВыгрузитьКолонку("Код");
+	СтруктураСообщений = узОбщийМодульСервер.ПолучитьСтруктуруСообщений(МассивКодовСообщений);
+	Для Каждого СтрокаТЗ Из СообщенияСловаря Цикл
+		СтрокаТЗ.Текст = СтруктураСообщений["Текст" + СтрокаТЗ.Код];
+	КонецЦикла;
+	
+	Возврат СообщенияСловаря;
+	
+КонецФункции
+//-ГЕНА
+
+//+ГЕНА
+Функция ДополнительныеПараметрыДляСообщений()
+	
+	ДопПараметры = Новый ТаблицаЗначений;
+	ДопПараметры.Колонки.Добавить("Код"); // Фиксированное имя переменной
+	ДопПараметры.Колонки.Добавить("Имя"); // Копируется в текст письма как параметр
+	ДопПараметры.Колонки.Добавить("Текст"); // Представление
+	
+	СтрокаТЗ = ДопПараметры.Добавить();
+	СтрокаТЗ.Код = "узНомерЗадачи";
+	СтрокаТЗ.Имя = "узНомер_задачи";
+	СтрокаТЗ.Текст = НСтр("ru = 'Номер задачи'; en = 'Task number'");
+	
+	СтрокаТЗ = ДопПараметры.Добавить();
+	СтрокаТЗ.Код = "узТемаПисьмаСобытие";
+	СтрокаТЗ.Имя = "узТема_письма_событие";
+	СтрокаТЗ.Текст = НСтр("ru = 'Тема письма (событие)'; en = 'Email subject (event)'");
+	
+	СтрокаТЗ = ДопПараметры.Добавить();
+	СтрокаТЗ.Код = "узИзмененияПоКомментариям";
+	СтрокаТЗ.Имя = "узИзменения_по_комментариям";
+	СтрокаТЗ.Текст = НСтр("ru = 'Список изменений по комментариям'; en = 'List of changes by comments'");
+	
+	Возврат ДопПараметры;
+	
+КонецФункции
+//-ГЕНА
+
+//+ГЕНА
+// СтандартныеПодсистемы.ШаблоныСообщений
+// Вызывается при подготовке шаблонов сообщений и позволяет переопределить список реквизитов и вложений.
+//
+// Параметры:
+//  Реквизиты               - ДеревоЗначений - список реквизитов шаблона.
+//         ** Имя            - Строка - Уникальное имя общего реквизита.
+//         ** Представление  - Строка - Представление общего реквизита.
+//         ** Тип            - Тип    - Тип реквизита. По умолчанию строка.
+//         ** Формат         - Строка - Формат вывода значения для чисел, дат, строк и булевых значений.
+//  Вложения                - ТаблицаЗначений - печатные формы и вложения
+//         ** Имя            - Строка - Уникальное имя вложения.
+//         ** Представление  - Строка - Представление варианта.
+//         ** ТипФайла       - Строка - Тип вложения, который соответствует расширению файла: "pdf", "png", "jpg", mxl" и др.
+//  ДополнительныеПараметры - Структура - дополнительные сведения о шаблоне сообщений.
+//
+Процедура ПриПодготовкеШаблонаСообщения(Реквизиты, Вложения, ДополнительныеПараметры) Экспорт
+	
+	ПараметрыСообщения = ДополнительныеПараметры.ПараметрыСообщения;
+	
+	// Группа ".Словарь транслируемых слов"
+	
+	СообщенияСловаря = СловарьДляСообщений();
+	
+	// Кэширование таблицы для передачи в ПриФормированииСообщения при отправке сообщения
+	ПараметрыСообщения.Вставить("узСообщенияСловаря", СообщенияСловаря);
+	
+	СтрокаСловарь = Реквизиты.Добавить();
+	СтрокаСловарь.Имя = "узСловарь";
+	СтрокаСловарь.Представление = НСтр("ru = '# Словарь транслируемых слов'; en = '# Dictionary of translated words'");
+	
+	Для Каждого СтрокаСообщения Из СообщенияСловаря Цикл
+		СтрокаКод = СтрокаСловарь.Строки.Добавить();
+		СтрокаКод.Имя = "узЗадачи." + СтрокаСообщения.Имя;
+		СтрокаКод.Представление = СтрокаСообщения.Текст;
+	КонецЦикла;
+	
+	// Группа ".Доп. параметры"
+	
+	СообщенияДопПараметров = ДополнительныеПараметрыДляСообщений();
+	
+	// Кэширование таблицы для передачи в ПриФормированииСообщения при отправке сообщения
+	ПараметрыСообщения.Вставить("узСообщенияДопПараметров", СообщенияДопПараметров);
+	
+	СтрокаДопПараметры = Реквизиты.Добавить();
+	СтрокаДопПараметры.Имя = "узДопПараметры";
+	СтрокаДопПараметры.Представление = НСтр("ru = '# Динамические параметры'; en = '# Dynamic parameters'");
+	
+	Для Каждого СтрокаСообщения Из СообщенияДопПараметров Цикл
+		СтрокаКод = СтрокаДопПараметры.Строки.Добавить();
+		СтрокаКод.Имя = "узЗадачи." + СтрокаСообщения.Имя;
+		СтрокаКод.Представление = СтрокаСообщения.Текст;
+	КонецЦикла;
+	
+КонецПроцедуры
+//_ГЕНА
+
+//+ГЕНА
+// Вызывается в момент создания сообщений по шаблону для заполнения значений реквизитов и вложений.
+//
+// Параметры:
+//  Сообщение - Структура - структура с ключами:
+//    * ЗначенияРеквизитов - Соответствие - список используемых в шаблоне реквизитов.
+//      ** Ключ     - Строка - имя реквизита в шаблоне;
+//      ** Значение - Строка - значение заполнения в шаблоне.
+//    * ЗначенияОбщихРеквизитов - Соответствие - список используемых в шаблоне общих реквизитов.
+//      ** Ключ     - Строка - имя реквизита в шаблоне;
+//      ** Значение - Строка - значение заполнения в шаблоне.
+//    * Вложения - Соответствие - значения реквизитов 
+//      ** Ключ     - Строка - имя вложения в шаблоне;
+//      ** Значение - ДвоичныеДанные, Строка - двоичные данные или адрес во временном хранилище вложения.
+//  ПредметСообщения - ЛюбаяСсылка - ссылка на объект являющийся источником данных.
+//  ДополнительныеПараметры - Структура -  Дополнительная информация о шаблоне сообщения.
+//
+Процедура ПриФормированииСообщения(Сообщение, ПредметСообщения, ДополнительныеПараметры) Экспорт
+	
+	ПараметрыСообщения = ДополнительныеПараметры.ПараметрыСообщения;
+	
+	Реквизиты = Сообщение.ЗначенияРеквизитов;
+	
+	Если ПараметрыСообщения.Свойство("узСообщенияСловаря") Тогда
+		СообщенияСловаря = ПараметрыСообщения.узСообщенияСловаря;
+	Иначе
+		СообщенияСловаря = СловарьДляСообщений();
+	КонецЕсли;
+	Для Каждого СтрокаСообщения Из СообщенияСловаря Цикл
+		Если Реквизиты[СтрокаСообщения.Имя] = "" Тогда
+			Реквизиты[СтрокаСообщения.Имя] = СтрокаСообщения.Текст;
+		КонецЕсли;
+	КонецЦикла;
+	
+	Если ПараметрыСообщения.Свойство("узСообщенияДопПараметров") Тогда
+		СообщенияДопПараметров = ПараметрыСообщения.узСообщенияДопПараметров;
+	Иначе
+		СообщенияДопПараметров = ДополнительныеПараметрыДляСообщений();
+	КонецЕсли;
+	
+	Для Каждого СтрокаСообщения Из СообщенияДопПараметров Цикл
+		Если Реквизиты[СтрокаСообщения.Имя] = "" Тогда
+			Если ПараметрыСообщения.Свойство(СтрокаСообщения.Код) Тогда
+				Реквизиты[СтрокаСообщения.Имя] = ПараметрыСообщения[СтрокаСообщения.Код];
+			КонецЕсли;
+		КонецЕсли;
+	КонецЦикла;
+	
+КонецПроцедуры
+//-ГЕНА
+
+//+ГЕНА
+// Заполняет список получателей SMS при отправке сообщения сформированного по шаблону.
+//
+// Параметры:
+//   ПолучателиSMS - ТаблицаЗначений - список получается SMS.
+//     * НомерТелефона - Строка - номер телефона, куда будет отправлено сообщение SMS.
+//     * Представление - Строка - представление получателя сообщения SMS.
+//     * Контакт       - Произвольный - контакт, которому принадлежит номер телефона.
+//  ПредметСообщения - ЛюбаяСсылка, Структура - ссылка на объект являющийся источником данных, либо структура,
+//    * Предмет               - ЛюбаяСсылка - ссылка на объект являющийся источником данных
+//    * ПроизвольныеПараметры - Соответствие - заполненный список произвольных параметров.//
+//
+Процедура ПриЗаполненииТелефоновПолучателейВСообщении(ПолучателиSMS, ПредметСообщения) Экспорт
+КонецПроцедуры
+//-ГЕНА
+
+//+ГЕНА
+// Заполняет список получателей письма при отправки сообщения сформированного по шаблону.
+//
+// Параметры:
+//   ПолучателиПисьма - ТаблицаЗначений - список получается письма.
+//     * Адрес           - Строка - адрес электронной почты получателя.
+//     * Представление   - Строка - представление получается письма.
+//     * Контакт         - Произвольный - контакт, которому принадлежит адрес электрнной почты.
+//  ПредметСообщения - ЛюбаяСсылка, Структура - ссылка на объект являющийся источником данных, либо структура,
+//                                              если шаблон содержит произвольные параметры:
+//    * Предмет               - ЛюбаяСсылка - ссылка на объект являющийся источником данных
+//    * ПроизвольныеПараметры - Соответствие - заполненный список произвольных параметров.
+//
+Процедура ПриЗаполненииПочтыПолучателейВСообщении(ПолучателиПисьма, ПредметСообщения) Экспорт
+КонецПроцедуры
+// Конец СтандартныеПодсистемы.ШаблоныСообщений
+//-ГЕНА
--- a/src/cf/Catalogs/узЗадачи/Ext/ObjectModule.bsl
+++ b/src/cf/Catalogs/узЗадачи/Ext/ObjectModule.bsl
@ -513,6 +513,10 @@
 	ДопПараметры.Вставить("ТекстПисьма",ПараметрыПисьма.ТекстПисьма);
 	ДопПараметры.Вставить("ТемаПисьма",ПараметрыПисьма.ТемаПисьма);
 	ДопПараметры.Вставить("ПользовательКому",Исполнитель);
+	//+ГЕНА
+	ДопПараметры.Вставить("ТипТекста", ПараметрыПисьма.ТипТекста);
+	ДопПараметры.Вставить("ТекстПисьмаHTML", ПараметрыПисьма.ТекстПисьмаHTML);
+	//-ГЕНА
 	
 	//+ #190 SZ 16.03.2020
 	// Отправлем почту если это разрешено реквизитом узНеОтправлятьУведомленияНаПочту
@ -582,6 +586,10 @@
 	ДопПараметры.Вставить("ТекстПисьма",ПараметрыПисьма.ТекстПисьма);
 	ДопПараметры.Вставить("ТемаПисьма",ПараметрыПисьма.ТемаПисьма);
 	ДопПараметры.Вставить("ПользовательКому",СтарыйИсполнитель);
+	//+ГЕНА
+	ДопПараметры.Вставить("ТипТекста", ПараметрыПисьма.ТипТекста);
+	ДопПараметры.Вставить("ТекстПисьмаHTML", ПараметрыПисьма.ТекстПисьмаHTML);
+	//-ГЕНА
 	
 	//+ #190 SZ 16.03.2020
 	// Отправлем почту если это разрешено реквизитом узНеОтправлятьУведомленияНаПочту
@ -629,6 +637,11 @@
 	ДопПараметры.Вставить("ТемаПисьма",ПараметрыПисьма.ТемаПисьма);
 	ДопПараметры.Вставить("Статус",Статус);
 	ДопПараметры.Вставить("МассивПользователейКому",МассивНаблюдателей);
+	//+ГЕНА
+	ДопПараметры.Вставить("ТипТекста", ПараметрыПисьма.ТипТекста);
+	ДопПараметры.Вставить("ТекстПисьмаHTML", ПараметрыПисьма.ТекстПисьмаHTML);
+	//-ГЕНА
+	
 	узОбщийМодульСервер.ОтправитьПисьмо(ДопПараметры);
 	
 	//Павлюков
@ -663,6 +676,14 @@
 	КонецЕсли;	
 	РезультатФункции.Вставить("ЭтоОтправкаКонтрагентам",ЭтоОтправкаКонтрагентам);
 	
+	//+ГЕНА
+	// Получение индивидуального шаблона
+	ШаблонСообщения = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Контрагент, "узШаблонСообщения");
+	Если ЗначениеЗаполнено(ШаблонСообщения) Тогда
+		РезультатФункции.Вставить("ШаблонСообщения", ШаблонСообщения);
+	КонецЕсли;
+	//-ГЕНА
+	
 	ПараметрыПисьма = ПолучитьПараметрыПисьма(РезультатФункции);
 	
 	МассивКонтрагентов = Новый Массив();
@ -678,6 +699,10 @@
 	ДопПараметры.Вставить("ТЗАдресаЭлектроннойПочты",ТЗАдресаЭлектроннойПочты); 
 	ДопПараметры.Вставить("ЭтоОтправкаКонтрагентам",ЭтоОтправкаКонтрагентам);
 	ДопПараметры.Вставить("Задача",Ссылка);
+	//+ГЕНА
+	ДопПараметры.Вставить("ТипТекста", ПараметрыПисьма.ТипТекста);
+	ДопПараметры.Вставить("ТекстПисьмаHTML", ПараметрыПисьма.ТекстПисьмаHTML);
+	//-ГЕНА
 	
 	пУчетнаяЗапись = ПолучитьУчетнуюЗаписьДляОтправкиУведомленийДляКонтрагентов();
 	Если ЗначениеЗаполнено(пУчетнаяЗапись) Тогда
@ -837,7 +862,9 @@
 			КонецЕсли;
 			Если ЭтоОтправкаКонтрагентам Тогда
 				НеобходимоОтправитьУведомление = Истина;
-				ТемаПисьмаСобытие = "Ваша заявка зарегистрирована: ";
+				//ГЕНА TODO
+				ТемаПисьмаСобытие = НСтр("ru = 'Ваша заявка зарегистрирована:'; en = 'Your request is registered'");
+				//ГЕНА TODO
 			КонецЕсли;			
 		ИначеЕсли ВидСобытия = НастройкиСобытий.ВидыСобытий_НовыйИсполнитель Тогда
 			Если ЭтоОтправкаИсполнителю Тогда
@ -854,7 +881,7 @@
 			Если ЭтоОтправкаИсполнителю
 				ИЛИ ЭтоОтправкаНаблюдателям Тогда
 				НеобходимоОтправитьУведомление = Истина;
-				ТемаПисьмаСобытие = узОбщийМодульСервер.ПолучитьТекстСообщения("Добален комментарий по задаче:",33);
+				ТемаПисьмаСобытие = узОбщийМодульСервер.ПолучитьТекстСообщения("Добавлен комментарий по задаче:",33); //ГЕНА ошибка в слове
 				МассивИзмененнийПоКомментариям = СтрокаТЗСобытияВИсторииДляУведомлений.МассивИзмененнийПоКомментариям 
 			КонецЕсли;
 		ИначеЕсли ВидСобытия = НастройкиСобытий.ВидыСобытий_ИзмененКомментарий Тогда
@ -879,14 +906,14 @@
 		ИначеЕсли ВидСобытия = НастройкиСобытий.ВидыСобытий_ВыполненаЗадача Тогда
 			Если ЭтоОтправкаКонтрагентам Тогда
 				НеобходимоОтправитьУведомление = Истина;
-				ТемаПисьмаСобытие = "Ваша заявка выполнена:";
+				ТемаПисьмаСобытие = НСтр("ru = 'Ваша заявка выполнена:'; en = 'Your request has been completed'"); // ГЕНА
 			Конецесли;				
 		Конецесли;
 	Иначе
 		Если ЭтоОтправкаКонтрагентам
 			И ТЗСобытияВИсторииДляУведомлений.Найти(НастройкиСобытий.ВидыСобытий_ВыполненаЗадача,"ВидСобытия") <> Неопределено Тогда
 			НеобходимоОтправитьУведомление = Истина;
-			ТемаПисьмаСобытие = "Ваша заявка выполнена:";
+			ТемаПисьмаСобытие = НСтр("ru = 'Ваша заявка выполнена:'; en = 'Your request has been completed'"); // ГЕНА
 		ИначеЕсли ТЗСобытияВИсторииДляУведомлений.Найти(НастройкиСобытий.ВидыСобытий_НовыйИсполнитель,"ВидСобытия") <> Неопределено Тогда
 			Если ЭтоОтправкаИсполнителю Тогда
 				НеобходимоОтправитьУведомление = Истина;
@ -999,17 +1026,17 @@
 	ДопПараметры.Вставить("ТемаПисьма",ТемаПисьма);
 	ДопПараметры.Вставить("НомерЗадачи",НомерЗадачи);
 	
-	ТекстПисьма = ПолучитьТекстПисьма(ДопПараметры);
-	
+	//ГЕНА
 	РезультатФункции = Новый Структура();
 	РезультатФункции.Вставить("ТемаПисьма",ТемаПисьма);
-	РезультатФункции.Вставить("ТекстПисьма",ТекстПисьма);
+	РезультатФункции.Вставить("ТипТекста", ПредопределенноеЗначение("Перечисление.ТипыТекстовЭлектронныхПисем.ПростойТекст"));
+	ПолучитьТекстПисьма(ДопПараметры, РезультатФункции);
+	//-ГЕНА
 	
 	Возврат РезультатФункции;	
 КонецФункции 

-Функция ПолучитьТекстПисьма(ДопПараметры) 
-	Перем пТекстПисьма;
+Процедура ПолучитьТекстПисьма(ДопПараметры, РезультатФункции) // ГЕНА
 	
 	ЭтоОтправкаКонтрагентам = Ложь;
 	Если ДопПараметры.Свойство("ЭтоОтправкаКонтрагентам")
@ -1017,14 +1044,31 @@
 		ЭтоОтправкаКонтрагентам = Истина;
 	Конецесли;
 	
+	//+ГЕНА
 	Если ЭтоОтправкаКонтрагентам Тогда
-		пТекстПисьма = ПолучитьТекстПисьма_Контрагентам(ДопПараметры);
+		ВидШаблона = Перечисления.узВидыШаблоновСообщений.ЗадачаКонтрагент;
 	Иначе
-		пТекстПисьма = ПолучитьТекстПисьма_Общее(ДопПараметры);
-	Конецесли;
+		ВидШаблона = Перечисления.узВидыШаблоновСообщений.ЗадачаОбщий;
+	КонецЕсли;
+	ТекстИТемаПисьма = ПолучитьТекстПисьмаПоШаблону(ДопПараметры, ВидШаблона);
 	
-	Возврат пТекстПисьма;
-КонецФункции 
+	Если ТекстИТемаПисьма = Неопределено Тогда
+		Если ЭтоОтправкаКонтрагентам Тогда
+			пТекстПисьма = ПолучитьТекстПисьма_Контрагентам(ДопПараметры);
+		Иначе
+			пТекстПисьма = ПолучитьТекстПисьма_Общее(ДопПараметры);
+		Конецесли;
+		РезультатФункции.Вставить("ТекстПисьма", пТекстПисьма);
+		РезультатФункции.Вставить("ТекстПисьмаHTML", "");
+	Иначе
+		РезультатФункции.Вставить("ТипТекста", ТекстИТемаПисьма.ТипТекста);
+		РезультатФункции.Вставить("ТемаПисьма", ТекстИТемаПисьма.Тема);
+		РезультатФункции.Вставить("ТекстПисьма", ТекстИТемаПисьма.Текст);
+		РезультатФункции.Вставить("ТекстПисьмаHTML", ТекстИТемаПисьма.ТекстHTML);
+	КонецЕсли;
+	//-ГЕНА
+	
+КонецПроцедуры

 Функция ПолучитьТекстПисьма_Контрагентам(ДопПараметры)
 	Перем ТекстПисьма;
@ -1460,3 +1504,74 @@
 	
 КонецПроцедуры

+//+ГЕНА
+Функция ПолучитьТекстПисьмаПоШаблону(ДопПараметры, ВидШаблона)
+	
+	ШаблонСообщения = Неопределено;
+	Если НЕ ДопПараметры.Свойство("ШаблонСообщения", ШаблонСообщения) Тогда
+		// Получение текущего шаблона сообщения
+		Запрос = Новый Запрос;
+		Запрос.Текст =
+		"ВЫБРАТЬ
+		|	узТекущиеШаблоныСообщений.ШаблонСообщения КАК ШаблонСообщения
+		|ИЗ
+		|	РегистрСведений.узТекущиеШаблоныСообщений КАК узТекущиеШаблоныСообщений
+		|ГДЕ
+		|	узТекущиеШаблоныСообщений.ВидШаблона = &ВидШаблона";
+		Запрос.УстановитьПараметр("ВидШаблона", ВидШаблона);
+		
+		РезультатЗапроса = Запрос.Выполнить();
+		Если НЕ РезультатЗапроса.Пустой() Тогда
+			Выборка = РезультатЗапроса.Выбрать();
+			Выборка.Следующий();
+			ШаблонСообщения = Выборка.ШаблонСообщения;
+		КонецЕсли;
+	КонецЕсли;
+	Если ШаблонСообщения = Неопределено Тогда
+		// Письмо по шаблону не формируется
+		Возврат Неопределено;
+	КонецЕсли;
+	
+	// Заполнение динамических параметров по данным задачи
+	Если ДопПараметры.МассивИзмененнийПоКомментариям.Количество() = 0 Тогда
+		ТекстИзмененнийПоКомментариям = "";
+	Иначе
+		ТекстИзмененнийПоКомментариям = Символы.ПС + " - " + СтрСоединить(ДопПараметры.МассивИзмененнийПоКомментариям, Символы.ПС + " - ");
+	КонецЕсли;
+	
+	ДопПараметрыИзЗадачи = Новый Структура;
+	ДопПараметрыИзЗадачи.Вставить("узТемаПисьмаСобытие", ДопПараметры.ТемаПисьмаСобытие);
+	ДопПараметрыИзЗадачи.Вставить("узНомерЗадачи", ДопПараметры.НомерЗадачи);
+	ДопПараметрыИзЗадачи.Вставить("узИзмененияПоКомментариям", ТекстИзмененнийПоКомментариям);
+	
+	ДополнительныеПараметры = Новый Структура;
+	ДополнительныеПараметры.Вставить("ПараметрыСообщения", ДопПараметрыИзЗадачи);
+	
+	ДанныеСообщения = ШаблоныСообщений.СформироватьСообщение(ШаблонСообщения, Ссылка, Новый УникальныйИдентификатор, ДополнительныеПараметры);
+	
+	ТекстИТемаПисьма = Новый Структура;
+	ТекстИТемаПисьма.Вставить("Тема", ДанныеСообщения.Тема);
+	
+	Если ДанныеСообщения.ДополнительныеПараметры.ФорматПисьма = Перечисления.СпособыРедактированияЭлектронныхПисем.HTML Тогда
+		ТипТекста = ПредопределенноеЗначение("Перечисление.ТипыТекстовЭлектронныхПисем.HTML");
+		
+		ТекстHTML = ДанныеСообщения.Текст;
+		ДокHTML = Новый ФорматированныйДокумент;
+		ДокHTML.УстановитьHTML(ДанныеСообщения.Текст, Новый Структура);
+		Текст = ДокHTML.ПолучитьТекст();
+		
+	Иначе
+		ТипТекста = ПредопределенноеЗначение("Перечисление.ТипыТекстовЭлектронныхПисем.ПростойТекст");
+		ТекстHTML = "";
+		Текст = ДанныеСообщения.Текст;
+	КонецЕсли;
+	
+	ТекстИТемаПисьма.Вставить("ТекстHTML", ТекстHTML);
+	ТекстИТемаПисьма.Вставить("Текст", Текст);
+	ТекстИТемаПисьма.Вставить("ТипТекста", ТипТекста);
+	
+	Возврат ТекстИТемаПисьма;
+	
+КонецФункции
+//-ГЕНА
+
--- a/src/cf/Catalogs/узКонтрагенты.xml
+++ b/src/cf/Catalogs/узКонтрагенты.xml
@ -208,6 +208,46 @@
 					<DataHistory>Use</DataHistory>
 				</Properties>
 			</Attribute>
+			<Attribute uuid="62ab0af1-2add-4511-a201-892859516859">
+				<Properties>
+					<Name>узШаблонСообщения</Name>
+					<Synonym>
+						<v8:item>
+							<v8:lang>ru</v8:lang>
+							<v8:content>Шаблон сообщения</v8:content>
+						</v8:item>
+					</Synonym>
+					<Comment/>
+					<Type>
+						<v8:Type>cfg:CatalogRef.ШаблоныСообщений</v8:Type>
+					</Type>
+					<PasswordMode>false</PasswordMode>
+					<Format/>
+					<EditFormat/>
+					<ToolTip/>
+					<MarkNegatives>false</MarkNegatives>
+					<Mask/>
+					<MultiLine>false</MultiLine>
+					<ExtendedEdit>false</ExtendedEdit>
+					<MinValue xsi:nil="true"/>
+					<MaxValue xsi:nil="true"/>
+					<FillFromFillingValue>false</FillFromFillingValue>
+					<FillValue xsi:nil="true"/>
+					<FillChecking>DontCheck</FillChecking>
+					<ChoiceFoldersAndItems>Items</ChoiceFoldersAndItems>
+					<ChoiceParameterLinks/>
+					<ChoiceParameters/>
+					<QuickChoice>Auto</QuickChoice>
+					<CreateOnInput>Auto</CreateOnInput>
+					<ChoiceForm/>
+					<LinkByType/>
+					<ChoiceHistoryOnInput>Auto</ChoiceHistoryOnInput>
+					<Use>ForItem</Use>
+					<Indexing>DontIndex</Indexing>
+					<FullTextSearch>Use</FullTextSearch>
+					<DataHistory>Use</DataHistory>
+				</Properties>
+			</Attribute>
 			<TabularSection uuid="8ae48793-54bd-4d6b-aa27-34f7687dbb35">
 				<InternalInfo>
 					<xr:GeneratedType name="CatalogTabularSection.узКонтрагенты.ДополнительныеРеквизиты" category="TabularSection">
--- a/src/cf/Catalogs/узКонтрагенты/Forms/ФормаЭлемента/Ext/Form.xml
+++ b/src/cf/Catalogs/узКонтрагенты/Forms/ФормаЭлемента/Ext/Form.xml
@ -39,6 +39,11 @@
 			<ContextMenu name="узНеОтправлятьУведомленияНаПочтуКонтекстноеМеню" id="23"/>
 			<ExtendedTooltip name="узНеОтправлятьУведомленияНаПочтуРасширеннаяПодсказка" id="24"/>
 		</CheckBoxField>
+		<InputField name="узШаблонСообщения" id="28">
+			<DataPath>Объект.узШаблонСообщения</DataPath>
+			<ContextMenu name="узШаблонСообщенияКонтекстноеМеню" id="29"/>
+			<ExtendedTooltip name="узШаблонСообщенияРасширеннаяПодсказка" id="30"/>
+		</InputField>
 		<Pages name="ГруппаСтраницы" id="12">
 			<Title>
 				<v8:item>
--- a/src/cf/CommonModules/узОбщийМодульСервер/Ext/Module.bsl
+++ b/src/cf/CommonModules/узОбщийМодульСервер/Ext/Module.bsl
@ -20,9 +20,20 @@
 	ДокОбъект.ОтправительПредставление = "1с: Управление задачами";
 	//- #102 Дзеса Ігор
 	ДокОбъект.СтатусПисьма = ПредопределенноеЗначение("Перечисление.СтатусыИсходящегоЭлектронногоПисьма.Исходящее");
-	ДокОбъект.Текст = ТекстПисьма;
 	ДокОбъект.Тема = ТемаПисьма;
-	ДокОбъект.ТипТекста = ПредопределенноеЗначение("Перечисление.ТипыТекстовЭлектронныхПисем.ПростойТекст");
+	//+ГЕНА
+	Если ДопПараметры.Свойство("ТипТекста") Тогда
+		ДокОбъект.ТипТекста = ДопПараметры.ТипТекста;
+	Иначе
+		ДокОбъект.ТипТекста = ПредопределенноеЗначение("Перечисление.ТипыТекстовЭлектронныхПисем.ПростойТекст");
+	КонецЕсли;
+	Если ДокОбъект.ТипТекста = ПредопределенноеЗначение("Перечисление.ТипыТекстовЭлектронныхПисем.HTML")
+	 ИЛИ ДокОбъект.ТипТекста = ПредопределенноеЗначение("Перечисление.ТипыТекстовЭлектронныхПисем.HTMLСКартинками") Тогда
+		ДокОбъект.ТекстHTML = ДопПараметры.ТекстПисьмаHTML;
+	Иначе
+		ДокОбъект.Текст = ТекстПисьма;
+	КонецЕсли;
+	//-ГЕНА
 	ДокОбъект.УчетнаяЗапись = ПредопределенноеЗначение("Справочник.УчетныеЗаписиЭлектроннойПочты.СистемнаяУчетнаяЗаписьЭлектроннойПочты");
 	
 	Если ДопПараметры.Свойство("УчетнаяЗапись") Тогда
--- a/src/cf/Configuration.xml
+++ b/src/cf/Configuration.xml
@ -1601,6 +1601,7 @@
 			<Enum>узОтображениеФайловЗадачНаДоске</Enum>
 			<Enum>узОтображениеЧеклистаЗадачНаДоске</Enum>
 			<Enum>узОформлениеТекста</Enum>
+			<Enum>узВидыШаблоновСообщений</Enum>
 			<Report>АнализВерсийОбъектов</Report>
 			<Report>АнализЖурналаРегистрации</Report>
 			<Report>БизнесПроцессы</Report>
@ -1788,6 +1789,7 @@
 			<InformationRegister>узСостояниеВзаимодействийПоЗадачам</InformationRegister>
 			<InformationRegister>узСпринтыЗадач</InformationRegister>
 			<InformationRegister>узСтатусыЗадач</InformationRegister>
+			<InformationRegister>узТекущиеШаблоныСообщений</InformationRegister>
 			<AccumulationRegister>узФактПоЗадачам</AccumulationRegister>
 			<ChartOfCharacteristicTypes>ДополнительныеРеквизитыИСведения</ChartOfCharacteristicTypes>
 			<ChartOfCharacteristicTypes>ОбъектыАдресацииЗадач</ChartOfCharacteristicTypes>
--- a/src/cf/DataProcessors/ПанельАдминистрированияБСП/Forms/Органайзер/Ext/Form.xml
+++ b/src/cf/DataProcessors/ПанельАдминистрированияБСП/Forms/Органайзер/Ext/Form.xml
@ -620,6 +620,11 @@
 									<CommandName>Catalog.ШаблоныСообщений.StandardCommand.OpenList</CommandName>
 									<ExtendedTooltip name="НастроитьШаблоныСообщенийРасширеннаяПодсказка" id="1804"/>
 								</Button>
+								<Button name="узКнопкаТекущиеШаблоныСообщений" id="1810">
+									<Type>Hyperlink</Type>
+									<CommandName>InformationRegister.узТекущиеШаблоныСообщений.StandardCommand.OpenList</CommandName>
+									<ExtendedTooltip name="узКнопкаТекущиеШаблоныСообщенийРасширеннаяПодсказка" id="1811"/>
+								</Button>
 							</ChildItems>
 						</UsualGroup>
 					</ChildItems>
--- a/src/cf/DefinedTypes/ПредметШаблонаСообщения.xml
+++ b/src/cf/DefinedTypes/ПредметШаблонаСообщения.xml
@ -17,6 +17,7 @@
 			</Synonym>
 			<Comment/>
 			<Type>
+				<v8:Type>cfg:CatalogRef.узЗадачи</v8:Type>
 				<v8:Type>cfg:CatalogRef.ИдентификаторыОбъектовМетаданных</v8:Type>
 			</Type>
 		</Properties>
--- a/src/cf/Enums/узВидыШаблоновСообщений.xml
+++ b/src/cf/Enums/узВидыШаблоновСообщений.xml
@ -0,0 +1,121 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<MetaDataObject xmlns="http://v8.1c.ru/8.3/MDClasses" xmlns:app="http://v8.1c.ru/8.2/managed-application/core" xmlns:cfg="http://v8.1c.ru/8.1/data/enterprise/current-config" xmlns:cmi="http://v8.1c.ru/8.2/managed-application/cmi" xmlns:ent="http://v8.1c.ru/8.1/data/enterprise" xmlns:lf="http://v8.1c.ru/8.2/managed-application/logform" xmlns:style="http://v8.1c.ru/8.1/data/ui/style" xmlns:sys="http://v8.1c.ru/8.1/data/ui/fonts/system" xmlns:v8="http://v8.1c.ru/8.1/data/core" xmlns:v8ui="http://v8.1c.ru/8.1/data/ui" xmlns:web="http://v8.1c.ru/8.1/data/ui/colors/web" xmlns:win="http://v8.1c.ru/8.1/data/ui/colors/windows" xmlns:xen="http://v8.1c.ru/8.3/xcf/enums" xmlns:xpr="http://v8.1c.ru/8.3/xcf/predef" xmlns:xr="http://v8.1c.ru/8.3/xcf/readable" xmlns:xs="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" version="2.10">
+	<Enum uuid="8d71b509-627b-4757-9c71-28a6af2e7a93">
+		<InternalInfo>
+			<xr:GeneratedType name="EnumRef.узВидыШаблоновСообщений" category="Ref">
+				<xr:TypeId>4b7fe104-5611-4a23-a5f8-f8cfa30f753d</xr:TypeId>
+				<xr:ValueId>e26b517b-6812-4390-96fb-07b610095ce0</xr:ValueId>
+			</xr:GeneratedType>
+			<xr:GeneratedType name="EnumManager.узВидыШаблоновСообщений" category="Manager">
+				<xr:TypeId>aef29a2b-40d4-4ddf-86d5-63b8d83780e5</xr:TypeId>
+				<xr:ValueId>4c919dc7-205d-42f5-a960-a9d5f2bce70b</xr:ValueId>
+			</xr:GeneratedType>
+			<xr:GeneratedType name="EnumList.узВидыШаблоновСообщений" category="List">
+				<xr:TypeId>8c0d97fa-d8f1-4f50-934b-64547f9cac5a</xr:TypeId>
+				<xr:ValueId>e61deff7-c093-4c98-a590-4cf24e70512a</xr:ValueId>
+			</xr:GeneratedType>
+		</InternalInfo>
+		<Properties>
+			<Name>узВидыШаблоновСообщений</Name>
+			<Synonym>
+				<v8:item>
+					<v8:lang>ru</v8:lang>
+					<v8:content>Виды шаблонов сообщений</v8:content>
+				</v8:item>
+			</Synonym>
+			<Comment/>
+			<UseStandardCommands>false</UseStandardCommands>
+			<StandardAttributes>
+				<xr:StandardAttribute name="Order">
+					<xr:LinkByType/>
+					<xr:FillChecking>DontCheck</xr:FillChecking>
+					<xr:MultiLine>false</xr:MultiLine>
+					<xr:FillFromFillingValue>false</xr:FillFromFillingValue>
+					<xr:CreateOnInput>Auto</xr:CreateOnInput>
+					<xr:MaxValue xsi:nil="true"/>
+					<xr:ToolTip/>
+					<xr:ExtendedEdit>false</xr:ExtendedEdit>
+					<xr:Format/>
+					<xr:ChoiceForm/>
+					<xr:QuickChoice>Auto</xr:QuickChoice>
+					<xr:ChoiceHistoryOnInput>Auto</xr:ChoiceHistoryOnInput>
+					<xr:EditFormat/>
+					<xr:PasswordMode>false</xr:PasswordMode>
+					<xr:DataHistory>Use</xr:DataHistory>
+					<xr:MarkNegatives>false</xr:MarkNegatives>
+					<xr:MinValue xsi:nil="true"/>
+					<xr:Synonym/>
+					<xr:Comment/>
+					<xr:FullTextSearch>Use</xr:FullTextSearch>
+					<xr:ChoiceParameterLinks/>
+					<xr:FillValue xsi:nil="true"/>
+					<xr:Mask/>
+					<xr:ChoiceParameters/>
+				</xr:StandardAttribute>
+				<xr:StandardAttribute name="Ref">
+					<xr:LinkByType/>
+					<xr:FillChecking>DontCheck</xr:FillChecking>
+					<xr:MultiLine>false</xr:MultiLine>
+					<xr:FillFromFillingValue>false</xr:FillFromFillingValue>
+					<xr:CreateOnInput>Auto</xr:CreateOnInput>
+					<xr:MaxValue xsi:nil="true"/>
+					<xr:ToolTip/>
+					<xr:ExtendedEdit>false</xr:ExtendedEdit>
+					<xr:Format/>
+					<xr:ChoiceForm/>
+					<xr:QuickChoice>Auto</xr:QuickChoice>
+					<xr:ChoiceHistoryOnInput>Auto</xr:ChoiceHistoryOnInput>
+					<xr:EditFormat/>
+					<xr:PasswordMode>false</xr:PasswordMode>
+					<xr:DataHistory>Use</xr:DataHistory>
+					<xr:MarkNegatives>false</xr:MarkNegatives>
+					<xr:MinValue xsi:nil="true"/>
+					<xr:Synonym/>
+					<xr:Comment/>
+					<xr:FullTextSearch>Use</xr:FullTextSearch>
+					<xr:ChoiceParameterLinks/>
+					<xr:FillValue xsi:nil="true"/>
+					<xr:Mask/>
+					<xr:ChoiceParameters/>
+				</xr:StandardAttribute>
+			</StandardAttributes>
+			<Characteristics/>
+			<QuickChoice>true</QuickChoice>
+			<ChoiceMode>BothWays</ChoiceMode>
+			<DefaultListForm/>
+			<DefaultChoiceForm/>
+			<AuxiliaryListForm/>
+			<AuxiliaryChoiceForm/>
+			<ListPresentation/>
+			<ExtendedListPresentation/>
+			<Explanation/>
+			<ChoiceHistoryOnInput>Auto</ChoiceHistoryOnInput>
+		</Properties>
+		<ChildObjects>
+			<EnumValue uuid="a16614e2-29fe-4b8a-b29b-fae5283357d3">
+				<Properties>
+					<Name>ЗадачаОбщий</Name>
+					<Synonym>
+						<v8:item>
+							<v8:lang>ru</v8:lang>
+							<v8:content>Задача: Общий</v8:content>
+						</v8:item>
+					</Synonym>
+					<Comment/>
+				</Properties>
+			</EnumValue>
+			<EnumValue uuid="01902cc7-606f-48cf-a4e8-936a6485106e">
+				<Properties>
+					<Name>ЗадачаКонтрагент</Name>
+					<Synonym>
+						<v8:item>
+							<v8:lang>ru</v8:lang>
+							<v8:content>Задача: Контрагент</v8:content>
+						</v8:item>
+					</Synonym>
+					<Comment/>
+				</Properties>
+			</EnumValue>
+		</ChildObjects>
+	</Enum>
+</MetaDataObject>
--- a/src/cf/Ext/ParentConfigurations.bin
+++ b/src/cf/Ext/ParentConfigurations.bin
--- a/src/cf/InformationRegisters/узТекущиеШаблоныСообщений.xml
+++ b/src/cf/InformationRegisters/узТекущиеШаблоныСообщений.xml
@ -0,0 +1,261 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<MetaDataObject xmlns="http://v8.1c.ru/8.3/MDClasses" xmlns:app="http://v8.1c.ru/8.2/managed-application/core" xmlns:cfg="http://v8.1c.ru/8.1/data/enterprise/current-config" xmlns:cmi="http://v8.1c.ru/8.2/managed-application/cmi" xmlns:ent="http://v8.1c.ru/8.1/data/enterprise" xmlns:lf="http://v8.1c.ru/8.2/managed-application/logform" xmlns:style="http://v8.1c.ru/8.1/data/ui/style" xmlns:sys="http://v8.1c.ru/8.1/data/ui/fonts/system" xmlns:v8="http://v8.1c.ru/8.1/data/core" xmlns:v8ui="http://v8.1c.ru/8.1/data/ui" xmlns:web="http://v8.1c.ru/8.1/data/ui/colors/web" xmlns:win="http://v8.1c.ru/8.1/data/ui/colors/windows" xmlns:xen="http://v8.1c.ru/8.3/xcf/enums" xmlns:xpr="http://v8.1c.ru/8.3/xcf/predef" xmlns:xr="http://v8.1c.ru/8.3/xcf/readable" xmlns:xs="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" version="2.10">
+	<InformationRegister uuid="425ed256-f9dc-441c-bb58-663d3d547f65">
+		<InternalInfo>
+			<xr:GeneratedType name="InformationRegisterRecord.узТекущиеШаблоныСообщений" category="Record">
+				<xr:TypeId>7e878ac1-f340-4356-8d3e-0669b263f82e</xr:TypeId>
+				<xr:ValueId>8b7da67d-300b-4342-a11b-72977dfe61b4</xr:ValueId>
+			</xr:GeneratedType>
+			<xr:GeneratedType name="InformationRegisterManager.узТекущиеШаблоныСообщений" category="Manager">
+				<xr:TypeId>431ffed4-c4b9-4f09-8970-49c93a3dc9a6</xr:TypeId>
+				<xr:ValueId>6a93965f-62a8-4829-9760-fbcad870833d</xr:ValueId>
+			</xr:GeneratedType>
+			<xr:GeneratedType name="InformationRegisterSelection.узТекущиеШаблоныСообщений" category="Selection">
+				<xr:TypeId>364e171f-109e-4909-9f07-e83f33eea4a4</xr:TypeId>
+				<xr:ValueId>2addd4c1-d0dd-4a64-8dd2-9f333ccd80fa</xr:ValueId>
+			</xr:GeneratedType>
+			<xr:GeneratedType name="InformationRegisterList.узТекущиеШаблоныСообщений" category="List">
+				<xr:TypeId>f3abff3a-d355-4b87-9f9a-5b246b671547</xr:TypeId>
+				<xr:ValueId>c8cda38c-bb1c-414e-b12a-dfeca0d48638</xr:ValueId>
+			</xr:GeneratedType>
+			<xr:GeneratedType name="InformationRegisterRecordSet.узТекущиеШаблоныСообщений" category="RecordSet">
+				<xr:TypeId>abaa86c1-4af0-4403-9313-d682fd2a8a14</xr:TypeId>
+				<xr:ValueId>33f64af4-c026-43ed-8194-56429a98698c</xr:ValueId>
+			</xr:GeneratedType>
+			<xr:GeneratedType name="InformationRegisterRecordKey.узТекущиеШаблоныСообщений" category="RecordKey">
+				<xr:TypeId>aecad1ee-0b69-453c-bf47-8b5970807455</xr:TypeId>
+				<xr:ValueId>e51e27a1-a11f-4acd-bf21-362adbb7c552</xr:ValueId>
+			</xr:GeneratedType>
+			<xr:GeneratedType name="InformationRegisterRecordManager.узТекущиеШаблоныСообщений" category="RecordManager">
+				<xr:TypeId>f2c240f3-71c2-405d-a13d-7eaf8c2922f3</xr:TypeId>
+				<xr:ValueId>042c7ddc-c494-4c1b-9698-ce2ca146f698</xr:ValueId>
+			</xr:GeneratedType>
+		</InternalInfo>
+		<Properties>
+			<Name>узТекущиеШаблоныСообщений</Name>
+			<Synonym>
+				<v8:item>
+					<v8:lang>ru</v8:lang>
+					<v8:content>Текущие шаблоны сообщений</v8:content>
+				</v8:item>
+				<v8:item>
+					<v8:lang>en</v8:lang>
+					<v8:content>Current message templates</v8:content>
+				</v8:item>
+			</Synonym>
+			<Comment/>
+			<UseStandardCommands>true</UseStandardCommands>
+			<EditType>InDialog</EditType>
+			<DefaultRecordForm>InformationRegister.узТекущиеШаблоныСообщений.Form.ФормаЗаписи</DefaultRecordForm>
+			<DefaultListForm/>
+			<AuxiliaryRecordForm/>
+			<AuxiliaryListForm/>
+			<StandardAttributes>
+				<xr:StandardAttribute name="Active">
+					<xr:LinkByType/>
+					<xr:FillChecking>DontCheck</xr:FillChecking>
+					<xr:MultiLine>false</xr:MultiLine>
+					<xr:FillFromFillingValue>false</xr:FillFromFillingValue>
+					<xr:CreateOnInput>Auto</xr:CreateOnInput>
+					<xr:MaxValue xsi:nil="true"/>
+					<xr:ToolTip/>
+					<xr:ExtendedEdit>false</xr:ExtendedEdit>
+					<xr:Format/>
+					<xr:ChoiceForm/>
+					<xr:QuickChoice>Auto</xr:QuickChoice>
+					<xr:ChoiceHistoryOnInput>Auto</xr:ChoiceHistoryOnInput>
+					<xr:EditFormat/>
+					<xr:PasswordMode>false</xr:PasswordMode>
+					<xr:DataHistory>Use</xr:DataHistory>
+					<xr:MarkNegatives>false</xr:MarkNegatives>
+					<xr:MinValue xsi:nil="true"/>
+					<xr:Synonym/>
+					<xr:Comment/>
+					<xr:FullTextSearch>Use</xr:FullTextSearch>
+					<xr:ChoiceParameterLinks/>
+					<xr:FillValue xsi:nil="true"/>
+					<xr:Mask/>
+					<xr:ChoiceParameters/>
+				</xr:StandardAttribute>
+				<xr:StandardAttribute name="LineNumber">
+					<xr:LinkByType/>
+					<xr:FillChecking>DontCheck</xr:FillChecking>
+					<xr:MultiLine>false</xr:MultiLine>
+					<xr:FillFromFillingValue>false</xr:FillFromFillingValue>
+					<xr:CreateOnInput>Auto</xr:CreateOnInput>
+					<xr:MaxValue xsi:nil="true"/>
+					<xr:ToolTip/>
+					<xr:ExtendedEdit>false</xr:ExtendedEdit>
+					<xr:Format/>
+					<xr:ChoiceForm/>
+					<xr:QuickChoice>Auto</xr:QuickChoice>
+					<xr:ChoiceHistoryOnInput>Auto</xr:ChoiceHistoryOnInput>
+					<xr:EditFormat/>
+					<xr:PasswordMode>false</xr:PasswordMode>
+					<xr:DataHistory>Use</xr:DataHistory>
+					<xr:MarkNegatives>false</xr:MarkNegatives>
+					<xr:MinValue xsi:nil="true"/>
+					<xr:Synonym/>
+					<xr:Comment/>
+					<xr:FullTextSearch>Use</xr:FullTextSearch>
+					<xr:ChoiceParameterLinks/>
+					<xr:FillValue xsi:nil="true"/>
+					<xr:Mask/>
+					<xr:ChoiceParameters/>
+				</xr:StandardAttribute>
+				<xr:StandardAttribute name="Recorder">
+					<xr:LinkByType/>
+					<xr:FillChecking>DontCheck</xr:FillChecking>
+					<xr:MultiLine>false</xr:MultiLine>
+					<xr:FillFromFillingValue>false</xr:FillFromFillingValue>
+					<xr:CreateOnInput>Auto</xr:CreateOnInput>
+					<xr:MaxValue xsi:nil="true"/>
+					<xr:ToolTip/>
+					<xr:ExtendedEdit>false</xr:ExtendedEdit>
+					<xr:Format/>
+					<xr:ChoiceForm/>
+					<xr:QuickChoice>Auto</xr:QuickChoice>
+					<xr:ChoiceHistoryOnInput>Auto</xr:ChoiceHistoryOnInput>
+					<xr:EditFormat/>
+					<xr:PasswordMode>false</xr:PasswordMode>
+					<xr:DataHistory>Use</xr:DataHistory>
+					<xr:MarkNegatives>false</xr:MarkNegatives>
+					<xr:MinValue xsi:nil="true"/>
+					<xr:Synonym/>
+					<xr:Comment/>
+					<xr:FullTextSearch>Use</xr:FullTextSearch>
+					<xr:ChoiceParameterLinks/>
+					<xr:FillValue xsi:nil="true"/>
+					<xr:Mask/>
+					<xr:ChoiceParameters/>
+				</xr:StandardAttribute>
+				<xr:StandardAttribute name="Period">
+					<xr:LinkByType/>
+					<xr:FillChecking>ShowError</xr:FillChecking>
+					<xr:MultiLine>false</xr:MultiLine>
+					<xr:FillFromFillingValue>false</xr:FillFromFillingValue>
+					<xr:CreateOnInput>Auto</xr:CreateOnInput>
+					<xr:MaxValue xsi:nil="true"/>
+					<xr:ToolTip/>
+					<xr:ExtendedEdit>false</xr:ExtendedEdit>
+					<xr:Format/>
+					<xr:ChoiceForm/>
+					<xr:QuickChoice>Auto</xr:QuickChoice>
+					<xr:ChoiceHistoryOnInput>Auto</xr:ChoiceHistoryOnInput>
+					<xr:EditFormat/>
+					<xr:PasswordMode>false</xr:PasswordMode>
+					<xr:DataHistory>Use</xr:DataHistory>
+					<xr:MarkNegatives>false</xr:MarkNegatives>
+					<xr:MinValue xsi:nil="true"/>
+					<xr:Synonym/>
+					<xr:Comment/>
+					<xr:FullTextSearch>Use</xr:FullTextSearch>
+					<xr:ChoiceParameterLinks/>
+					<xr:FillValue xsi:nil="true"/>
+					<xr:Mask/>
+					<xr:ChoiceParameters/>
+				</xr:StandardAttribute>
+			</StandardAttributes>
+			<InformationRegisterPeriodicity>Nonperiodical</InformationRegisterPeriodicity>
+			<WriteMode>Independent</WriteMode>
+			<MainFilterOnPeriod>false</MainFilterOnPeriod>
+			<IncludeHelpInContents>false</IncludeHelpInContents>
+			<DataLockControlMode>Managed</DataLockControlMode>
+			<FullTextSearch>DontUse</FullTextSearch>
+			<EnableTotalsSliceFirst>false</EnableTotalsSliceFirst>
+			<EnableTotalsSliceLast>false</EnableTotalsSliceLast>
+			<RecordPresentation/>
+			<ExtendedRecordPresentation/>
+			<ListPresentation/>
+			<ExtendedListPresentation/>
+			<Explanation/>
+			<DataHistory>DontUse</DataHistory>
+			<UpdateDataHistoryImmediatelyAfterWrite>false</UpdateDataHistoryImmediatelyAfterWrite>
+			<ExecuteAfterWriteDataHistoryVersionProcessing>false</ExecuteAfterWriteDataHistoryVersionProcessing>
+		</Properties>
+		<ChildObjects>
+			<Resource uuid="c5beb4a1-0023-4814-90ef-719a5907940a">
+				<Properties>
+					<Name>ШаблонСообщения</Name>
+					<Synonym>
+						<v8:item>
+							<v8:lang>ru</v8:lang>
+							<v8:content>Шаблон сообщения</v8:content>
+						</v8:item>
+					</Synonym>
+					<Comment/>
+					<Type>
+						<v8:Type>cfg:CatalogRef.ШаблоныСообщений</v8:Type>
+					</Type>
+					<PasswordMode>false</PasswordMode>
+					<Format/>
+					<EditFormat/>
+					<ToolTip/>
+					<MarkNegatives>false</MarkNegatives>
+					<Mask/>
+					<MultiLine>false</MultiLine>
+					<ExtendedEdit>false</ExtendedEdit>
+					<MinValue xsi:nil="true"/>
+					<MaxValue xsi:nil="true"/>
+					<FillFromFillingValue>false</FillFromFillingValue>
+					<FillValue xsi:nil="true"/>
+					<FillChecking>DontCheck</FillChecking>
+					<ChoiceFoldersAndItems>Items</ChoiceFoldersAndItems>
+					<ChoiceParameterLinks/>
+					<ChoiceParameters/>
+					<QuickChoice>Auto</QuickChoice>
+					<CreateOnInput>Auto</CreateOnInput>
+					<ChoiceForm/>
+					<LinkByType/>
+					<ChoiceHistoryOnInput>Auto</ChoiceHistoryOnInput>
+					<Indexing>DontIndex</Indexing>
+					<FullTextSearch>Use</FullTextSearch>
+					<DataHistory>Use</DataHistory>
+				</Properties>
+			</Resource>
+			<Dimension uuid="8a082fd5-b7df-4f26-b5cf-47501ac28903">
+				<Properties>
+					<Name>ВидШаблона</Name>
+					<Synonym>
+						<v8:item>
+							<v8:lang>ru</v8:lang>
+							<v8:content>Вид шаблона</v8:content>
+						</v8:item>
+					</Synonym>
+					<Comment/>
+					<Type>
+						<v8:Type>cfg:EnumRef.узВидыШаблоновСообщений</v8:Type>
+					</Type>
+					<PasswordMode>false</PasswordMode>
+					<Format/>
+					<EditFormat/>
+					<ToolTip/>
+					<MarkNegatives>false</MarkNegatives>
+					<Mask/>
+					<MultiLine>false</MultiLine>
+					<ExtendedEdit>false</ExtendedEdit>
+					<MinValue xsi:nil="true"/>
+					<MaxValue xsi:nil="true"/>
+					<FillFromFillingValue>true</FillFromFillingValue>
+					<FillValue xsi:nil="true"/>
+					<FillChecking>DontCheck</FillChecking>
+					<ChoiceFoldersAndItems>Items</ChoiceFoldersAndItems>
+					<ChoiceParameterLinks/>
+					<ChoiceParameters/>
+					<QuickChoice>Auto</QuickChoice>
+					<CreateOnInput>Auto</CreateOnInput>
+					<ChoiceForm/>
+					<LinkByType/>
+					<ChoiceHistoryOnInput>Auto</ChoiceHistoryOnInput>
+					<Master>false</Master>
+					<MainFilter>true</MainFilter>
+					<DenyIncompleteValues>true</DenyIncompleteValues>
+					<Indexing>DontIndex</Indexing>
+					<FullTextSearch>Use</FullTextSearch>
+					<DataHistory>Use</DataHistory>
+				</Properties>
+			</Dimension>
+			<Form>ФормаЗаписи</Form>
+		</ChildObjects>
+	</InformationRegister>
+</MetaDataObject>
--- a/src/cf/InformationRegisters/узТекущиеШаблоныСообщений/Forms/ФормаЗаписи.xml
+++ b/src/cf/InformationRegisters/узТекущиеШаблоныСообщений/Forms/ФормаЗаписи.xml
@ -0,0 +1,21 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<MetaDataObject xmlns="http://v8.1c.ru/8.3/MDClasses" xmlns:app="http://v8.1c.ru/8.2/managed-application/core" xmlns:cfg="http://v8.1c.ru/8.1/data/enterprise/current-config" xmlns:cmi="http://v8.1c.ru/8.2/managed-application/cmi" xmlns:ent="http://v8.1c.ru/8.1/data/enterprise" xmlns:lf="http://v8.1c.ru/8.2/managed-application/logform" xmlns:style="http://v8.1c.ru/8.1/data/ui/style" xmlns:sys="http://v8.1c.ru/8.1/data/ui/fonts/system" xmlns:v8="http://v8.1c.ru/8.1/data/core" xmlns:v8ui="http://v8.1c.ru/8.1/data/ui" xmlns:web="http://v8.1c.ru/8.1/data/ui/colors/web" xmlns:win="http://v8.1c.ru/8.1/data/ui/colors/windows" xmlns:xen="http://v8.1c.ru/8.3/xcf/enums" xmlns:xpr="http://v8.1c.ru/8.3/xcf/predef" xmlns:xr="http://v8.1c.ru/8.3/xcf/readable" xmlns:xs="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" version="2.10">
+	<Form uuid="2708b0b8-9f8a-4773-b287-8ae28c7b8571">
+		<Properties>
+			<Name>ФормаЗаписи</Name>
+			<Synonym>
+				<v8:item>
+					<v8:lang>ru</v8:lang>
+					<v8:content>Форма записи</v8:content>
+				</v8:item>
+			</Synonym>
+			<Comment/>
+			<FormType>Managed</FormType>
+			<IncludeHelpInContents>false</IncludeHelpInContents>
+			<UsePurposes>
+				<v8:Value xsi:type="app:ApplicationUsePurpose">PlatformApplication</v8:Value>
+				<v8:Value xsi:type="app:ApplicationUsePurpose">MobilePlatformApplication</v8:Value>
+			</UsePurposes>
+		</Properties>
+	</Form>
+</MetaDataObject>
--- a/src/cf/InformationRegisters/узТекущиеШаблоныСообщений/Forms/ФормаЗаписи/Ext/Form.xml
+++ b/src/cf/InformationRegisters/узТекущиеШаблоныСообщений/Forms/ФормаЗаписи/Ext/Form.xml
@ -0,0 +1,84 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Form xmlns="http://v8.1c.ru/8.3/xcf/logform" xmlns:app="http://v8.1c.ru/8.2/managed-application/core" xmlns:cfg="http://v8.1c.ru/8.1/data/enterprise/current-config" xmlns:dcscor="http://v8.1c.ru/8.1/data-composition-system/core" xmlns:dcsset="http://v8.1c.ru/8.1/data-composition-system/settings" xmlns:ent="http://v8.1c.ru/8.1/data/enterprise" xmlns:lf="http://v8.1c.ru/8.2/managed-application/logform" xmlns:style="http://v8.1c.ru/8.1/data/ui/style" xmlns:sys="http://v8.1c.ru/8.1/data/ui/fonts/system" xmlns:v8="http://v8.1c.ru/8.1/data/core" xmlns:v8ui="http://v8.1c.ru/8.1/data/ui" xmlns:web="http://v8.1c.ru/8.1/data/ui/colors/web" xmlns:win="http://v8.1c.ru/8.1/data/ui/colors/windows" xmlns:xr="http://v8.1c.ru/8.3/xcf/readable" xmlns:xs="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" version="2.10">
+	<WindowOpeningMode>LockOwnerWindow</WindowOpeningMode>
+	<AutoCommandBar name="ФормаКоманднаяПанель" id="-1"/>
+	<ChildItems>
+		<InputField name="ВидШаблона" id="1">
+			<DataPath>Запись.ВидШаблона</DataPath>
+			<ContextMenu name="ВидШаблонаКонтекстноеМеню" id="2"/>
+			<ExtendedTooltip name="ВидШаблонаРасширеннаяПодсказка" id="3"/>
+		</InputField>
+		<InputField name="КодЯзыка" id="4">
+			<ListChoiceMode>true</ListChoiceMode>
+			<ChoiceList>
+				<xr:Item>
+					<xr:Presentation/>
+					<xr:CheckState>0</xr:CheckState>
+					<xr:Value xsi:type="FormChoiceListDesTimeValue">
+						<Presentation>
+							<v8:item>
+								<v8:lang>ru</v8:lang>
+								<v8:content>Русский</v8:content>
+							</v8:item>
+							<v8:item>
+								<v8:lang>en</v8:lang>
+								<v8:content>Russian</v8:content>
+							</v8:item>
+						</Presentation>
+						<Value xsi:type="xs:string">ru</Value>
+					</xr:Value>
+				</xr:Item>
+				<xr:Item>
+					<xr:Presentation/>
+					<xr:CheckState>0</xr:CheckState>
+					<xr:Value xsi:type="FormChoiceListDesTimeValue">
+						<Presentation>
+							<v8:item>
+								<v8:lang>ru</v8:lang>
+								<v8:content>Английский</v8:content>
+							</v8:item>
+							<v8:item>
+								<v8:lang>en</v8:lang>
+								<v8:content>English</v8:content>
+							</v8:item>
+						</Presentation>
+						<Value xsi:type="xs:string">en</Value>
+					</xr:Value>
+				</xr:Item>
+				<xr:Item>
+					<xr:Presentation/>
+					<xr:CheckState>0</xr:CheckState>
+					<xr:Value xsi:type="FormChoiceListDesTimeValue">
+						<Presentation>
+							<v8:item>
+								<v8:lang>ru</v8:lang>
+								<v8:content>&lt; все &gt;</v8:content>
+							</v8:item>
+							<v8:item>
+								<v8:lang>en</v8:lang>
+								<v8:content>&lt; all &gt;</v8:content>
+							</v8:item>
+						</Presentation>
+						<Value xsi:type="xs:string"/>
+					</xr:Value>
+				</xr:Item>
+			</ChoiceList>
+			<ContextMenu name="КодЯзыкаКонтекстноеМеню" id="5"/>
+			<ExtendedTooltip name="КодЯзыкаРасширеннаяПодсказка" id="6"/>
+		</InputField>
+		<InputField name="ШаблонСообщения" id="7">
+			<DataPath>Запись.ШаблонСообщения</DataPath>
+			<ContextMenu name="ШаблонСообщенияКонтекстноеМеню" id="8"/>
+			<ExtendedTooltip name="ШаблонСообщенияРасширеннаяПодсказка" id="9"/>
+		</InputField>
+	</ChildItems>
+	<Attributes>
+		<Attribute name="Запись" id="1">
+			<Type>
+				<v8:Type>cfg:InformationRegisterRecordManager.узТекущиеШаблоныСообщений</v8:Type>
+			</Type>
+			<MainAttribute>true</MainAttribute>
+			<SavedData>true</SavedData>
+		</Attribute>
+	</Attributes>
+</Form>
--- a/src/cf/Roles/узПолныеПрава/Ext/Rights.xml
+++ b/src/cf/Roles/узПолныеПрава/Ext/Rights.xml
@ -2363,6 +2363,65 @@
 			<value>true</value>
 		</right>
 	</object>
+	<object>
+		<name>InformationRegister.узТекущиеШаблоныСообщений</name>
+		<right>
+			<name>Read</name>
+			<value>true</value>
+		</right>
+		<right>
+			<name>Update</name>
+			<value>true</value>
+		</right>
+		<right>
+			<name>View</name>
+			<value>true</value>
+		</right>
+		<right>
+			<name>Edit</name>
+			<value>true</value>
+		</right>
+		<right>
+			<name>TotalsControl</name>
+			<value>true</value>
+		</right>
+		<right>
+			<name>ReadDataHistory</name>
+			<value>true</value>
+		</right>
+		<right>
+			<name>ReadDataHistoryOfMissingData</name>
+			<value>true</value>
+		</right>
+		<right>
+			<name>UpdateDataHistory</name>
+			<value>true</value>
+		</right>
+		<right>
+			<name>UpdateDataHistoryOfMissingData</name>
+			<value>true</value>
+		</right>
+		<right>
+			<name>UpdateDataHistorySettings</name>
+			<value>true</value>
+		</right>
+		<right>
+			<name>UpdateDataHistoryVersionComment</name>
+			<value>true</value>
+		</right>
+		<right>
+			<name>ViewDataHistory</name>
+			<value>true</value>
+		</right>
+		<right>
+			<name>EditDataHistoryVersionComment</name>
+			<value>true</value>
+		</right>
+		<right>
+			<name>SwitchToDataHistoryVersion</name>
+			<value>true</value>
+		</right>
+	</object>
 	<object>
 		<name>DataProcessor.узЗагрузкаИзмененийИзХранилища</name>
 		<right>
--- a/src/cf/Roles/узПользователь/Ext/Rights.xml
+++ b/src/cf/Roles/узПользователь/Ext/Rights.xml
@ -1729,6 +1729,13 @@
 			<value>true</value>
 		</right>
 	</object>
+	<object>
+		<name>InformationRegister.узТекущиеШаблоныСообщений</name>
+		<right>
+			<name>Read</name>
+			<value>true</value>
+		</right>
+	</object>
 	<object>
 		<name>DataProcessor.узЗагрузкаИзмененийИзХранилища</name>
 		<right>
--- a/src/cf/Roles/узПользовательОграничениеДоступаИзменение/Ext/Rights.xml
+++ b/src/cf/Roles/узПользовательОграничениеДоступаИзменение/Ext/Rights.xml
@ -1862,6 +1862,13 @@
 			<value>true</value>
 		</right>
 	</object>
+	<object>
+		<name>InformationRegister.узТекущиеШаблоныСообщений</name>
+		<right>
+			<name>Read</name>
+			<value>true</value>
+		</right>
+	</object>
 	<object>
 		<name>DataProcessor.узЗагрузкаИзмененийИзХранилища</name>
 		<right>
--- a/src/cf/Roles/узПользовательОграничениеДоступаЧтение/Ext/Rights.xml
+++ b/src/cf/Roles/узПользовательОграничениеДоступаЧтение/Ext/Rights.xml
@ -2011,6 +2011,13 @@
 			<value>true</value>
 		</right>
 	</object>
+	<object>
+		<name>InformationRegister.узТекущиеШаблоныСообщений</name>
+		<right>
+			<name>Read</name>
+			<value>true</value>
+		</right>
+	</object>
 	<object>
 		<name>DataProcessor.узЗагрузкаИзмененийИзХранилища</name>
 		<right>
--- a/src/cf/Subsystems/узУправлениеЗадачами.xml
+++ b/src/cf/Subsystems/узУправлениеЗадачами.xml
@ -134,6 +134,8 @@
 				<xr:Item xsi:type="xr:MDObjectRef">Enum.узОтображениеФайловЗадачНаДоске</xr:Item>
 				<xr:Item xsi:type="xr:MDObjectRef">Enum.узОтображениеПисемПоЗадачамНаДоске</xr:Item>
 				<xr:Item xsi:type="xr:MDObjectRef">Enum.узОтображениеЧеклистаЗадачНаДоске</xr:Item>
+				<xr:Item xsi:type="xr:MDObjectRef">Enum.узВидыШаблоновСообщений</xr:Item>
+				<xr:Item xsi:type="xr:MDObjectRef">InformationRegister.узТекущиеШаблоныСообщений</xr:Item>
 			</Content>
 		</Properties>
 		<ChildObjects>