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

Merge pull request #77 from pallid/develope

Browse Source 
Добавление автора комментария в наблюдатели задачи
This commit is contained in:
Anton Ivanov 2018-01-08 13:21:04 +03:00 committed by GitHub
commit 7c96390869
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
3 changed files with 26 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/cf/Catalogs/узЗадачи/Ext/ObjectModule.bsl
View File

@ -247,7 +247,7 @@
Если НЕ ЗначениеЗаполнено(Выборка.КлючСтрокиСтарый) Тогда
пТекстСообщения = узОбщийМодульСервер.ПолучитьТекстСообщения("Новый комментарий: %1",14);
ТекстИзменения = СтрШаблон(пТекстСообщения,Выборка.КомментарийНовый);
узОбщийМодульСервер.ДобавитьАвтораКомментарияВНаблюдателиЗаЗадачей(Объект.Ссылка, Пользователи.ТекущийПользователь());
ЕстьДобавленныеКомментарии = Истина;
ИначеЕсли СокрЛП(Выборка.КомментарийСтарый) <> СокрЛП(Выборка.КомментарийНовый) Тогда

2
src/cf/Catalogs/узЗадачи/Forms/ФормаЭлемента/Ext/Form/Module.bsl
View File

@ -407,7 +407,7 @@
ЭтоДобавлениеКомментария = РезультатЗакрытия.ЭтоДобавлениеКомментария;
Если ЭтоДобавлениеКомментария Тогда
СтрокаКомментарии = Объект.Комментарии.Добавить();
СтрокаКомментарии.КлючСтроки = ПолучитьНовыйКлючСтрокиДляКомментария();
СтрокаКомментарии.КлючСтроки = ПолучитьНовыйКлючСтрокиДляКомментария();
Иначе
ПараметрыОтбора=Новый Структура();
ПараметрыОтбора.Вставить("КлючСтроки",РезультатЗакрытия.КлючСтроки);

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

@ -615,6 +615,29 @@
////API.CreateTask();
КонецПроцедуры
Процедура ДобавитьАвтораКомментарияВНаблюдателиЗаЗадачей(Задача, Автор) Экспорт
ДобавитьПользователяВНаблюдателиЗаЗадачей(Задача, Автор);
КонецПроцедуры
Процедура ДобавитьПользователяВНаблюдателиЗаЗадачей(Задача, Пользователь)
Если РегистрыСведений.узНаблюдателиЗаЗадачами.ЕстьЛиСлежениеЗаЗадачейУТекущегоПользователя(Задача) Тогда
Возврат;
КонецЕсли;
МассивЗадач = Новый Массив;
МассивЗадач.Добавить(Задача);
ДополнительныеПараметры = Новый Структура();
ДополнительныеПараметры.Вставить("Пользователь",Пользователи);
ДополнительныеПараметры.Вставить("МассивЗадач", МассивЗадач);
РегистрыСведений.узНаблюдателиЗаЗадачами.СледитьЗаЗадачей(ДополнительныеПараметры);
КонецПроцедуры
Функция ОпределитьНастройкиИзПравилОбработки(УчетнаяЗапись,Письмо)
РезультатФункции = Новый Структура();
@ -801,3 +824,4 @@
КонецПроцедуры