mirror of
https://github.com/BlizD/Tasks.git
synced 2025-01-12 03:19:41 +02:00
#73 поправил вызов метода следить за задачей
This commit is contained in:
parent
1c12046079
commit
06db955f91
@ -247,7 +247,15 @@
|
|||||||
Если НЕ ЗначениеЗаполнено(Выборка.КлючСтрокиСтарый) Тогда
|
Если НЕ ЗначениеЗаполнено(Выборка.КлючСтрокиСтарый) Тогда
|
||||||
пТекстСообщения = узОбщийМодульСервер.ПолучитьТекстСообщения("Новый комментарий: %1",14);
|
пТекстСообщения = узОбщийМодульСервер.ПолучитьТекстСообщения("Новый комментарий: %1",14);
|
||||||
ТекстИзменения = СтрШаблон(пТекстСообщения,Выборка.КомментарийНовый);
|
ТекстИзменения = СтрШаблон(пТекстСообщения,Выборка.КомментарийНовый);
|
||||||
узОбщийМодульСервер.ДобавитьАвтораКомментарияВНаблюдателиЗаЗадачей(Объект.Ссылка, Пользователи.ТекущийПользователь());
|
|
||||||
|
МассивЗадач = Новый Массив;
|
||||||
|
МассивЗадач.Добавить(Ссылка);
|
||||||
|
|
||||||
|
ДопПараметры = Новый Структура();
|
||||||
|
ДопПараметры.Вставить("Пользователь",Выборка.АвторНовый);
|
||||||
|
ДопПараметры.Вставить("МассивЗадач", МассивЗадач);
|
||||||
|
РегистрыСведений.узНаблюдателиЗаЗадачами.СледитьЗаЗадачей(ДопПараметры);
|
||||||
|
|
||||||
ЕстьДобавленныеКомментарии = Истина;
|
ЕстьДобавленныеКомментарии = Истина;
|
||||||
ИначеЕсли СокрЛП(Выборка.КомментарийСтарый) <> СокрЛП(Выборка.КомментарийНовый) Тогда
|
ИначеЕсли СокрЛП(Выборка.КомментарийСтарый) <> СокрЛП(Выборка.КомментарийНовый) Тогда
|
||||||
|
|
||||||
@ -263,7 +271,9 @@
|
|||||||
|
|
||||||
МассивИзмененнийПоКомментариям.Добавить(ТекстИзменения);
|
МассивИзмененнийПоКомментариям.Добавить(ТекстИзменения);
|
||||||
КонецЦикла;
|
КонецЦикла;
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
Если ЕстьИзмененныеКомментарии Тогда
|
Если ЕстьИзмененныеКомментарии Тогда
|
||||||
ВидСобытия = ПредопределенноеЗначение("Перечисление.узВидыСобытий.ИзмененКомментарий");
|
ВидСобытия = ПредопределенноеЗначение("Перечисление.узВидыСобытий.ИзмененКомментарий");
|
||||||
|
|
||||||
|
@ -151,8 +151,15 @@
|
|||||||
// Конец СтандартныеПодсистемы.Взаимодействие
|
// Конец СтандартныеПодсистемы.Взаимодействие
|
||||||
|
|
||||||
Оповестить("СправочникЗадачаЗаписана");
|
Оповестить("СправочникЗадачаЗаписана");
|
||||||
|
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
|
&НаСервере
|
||||||
|
Процедура ПослеЗаписиНаСервере(ТекущийОбъект, ПараметрыЗаписи)
|
||||||
|
УстановитьВидимостьДоступность();
|
||||||
|
КонецПроцедуры
|
||||||
|
|
||||||
|
|
||||||
&НаСервере
|
&НаСервере
|
||||||
Процедура ПередЗаписьюНаСервере(Отказ, ТекущийОбъект, ПараметрыЗаписи)
|
Процедура ПередЗаписьюНаСервере(Отказ, ТекущийОбъект, ПараметрыЗаписи)
|
||||||
|
|
||||||
@ -966,5 +973,6 @@
|
|||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
#КонецОбласти
|
#КонецОбласти
|
||||||
|
|
||||||
|
@ -615,29 +615,6 @@
|
|||||||
////API.CreateTask();
|
////API.CreateTask();
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
Процедура ДобавитьАвтораКомментарияВНаблюдателиЗаЗадачей(Задача, Автор) Экспорт
|
|
||||||
|
|
||||||
ДобавитьПользователяВНаблюдателиЗаЗадачей(Задача, Автор);
|
|
||||||
|
|
||||||
КонецПроцедуры
|
|
||||||
|
|
||||||
Процедура ДобавитьПользователяВНаблюдателиЗаЗадачей(Задача, Пользователь)
|
|
||||||
|
|
||||||
Если РегистрыСведений.узНаблюдателиЗаЗадачами.ЕстьЛиСлежениеЗаЗадачейУТекущегоПользователя(Задача) Тогда
|
|
||||||
Возврат;
|
|
||||||
КонецЕсли;
|
|
||||||
|
|
||||||
МассивЗадач = Новый Массив;
|
|
||||||
МассивЗадач.Добавить(Задача);
|
|
||||||
|
|
||||||
ДополнительныеПараметры = Новый Структура();
|
|
||||||
ДополнительныеПараметры.Вставить("Пользователь",Пользователи);
|
|
||||||
ДополнительныеПараметры.Вставить("МассивЗадач", МассивЗадач);
|
|
||||||
|
|
||||||
РегистрыСведений.узНаблюдателиЗаЗадачами.СледитьЗаЗадачей(ДополнительныеПараметры);
|
|
||||||
|
|
||||||
КонецПроцедуры
|
|
||||||
|
|
||||||
Функция ОпределитьНастройкиИзПравилОбработки(УчетнаяЗапись,Письмо)
|
Функция ОпределитьНастройкиИзПравилОбработки(УчетнаяЗапись,Письмо)
|
||||||
|
|
||||||
РезультатФункции = Новый Структура();
|
РезультатФункции = Новый Структура();
|
||||||
|
@ -9,8 +9,15 @@
|
|||||||
|
|
||||||
Процедура ДобавитьУдалитьНаблюдателя(ДопПараметры,ЭтоДобавление)
|
Процедура ДобавитьУдалитьНаблюдателя(ДопПараметры,ЭтоДобавление)
|
||||||
Пользователь = ДопПараметры.Пользователь;
|
Пользователь = ДопПараметры.Пользователь;
|
||||||
|
|
||||||
МассивЗадач = ДопПараметры.МассивЗадач;
|
МассивЗадач = ДопПараметры.МассивЗадач;
|
||||||
Для каждого ЭлМассиваЗадач из МассивЗадач цикл
|
Для каждого ЭлМассиваЗадач из МассивЗадач цикл
|
||||||
|
|
||||||
|
Если ЭтоДобавление
|
||||||
|
И ЕстьЛиСлежениеЗаЗадачейУПользователя(ЭлМассиваЗадач, Пользователь) Тогда
|
||||||
|
Продолжить;
|
||||||
|
Конецесли;
|
||||||
|
|
||||||
МенеджерЗаписи = РегистрыСведений.узНаблюдателиЗаЗадачами.СоздатьМенеджерЗаписи();
|
МенеджерЗаписи = РегистрыСведений.узНаблюдателиЗаЗадачами.СоздатьМенеджерЗаписи();
|
||||||
МенеджерЗаписи.Пользователь = Пользователь;
|
МенеджерЗаписи.Пользователь = Пользователь;
|
||||||
МенеджерЗаписи.Задача = ЭлМассиваЗадач;
|
МенеджерЗаписи.Задача = ЭлМассиваЗадач;
|
||||||
@ -24,7 +31,7 @@
|
|||||||
Конеццикла;
|
Конеццикла;
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
Функция ЕстьЛиСлежениеЗаЗадачейУТекущегоПользователя(Задача) Экспорт
|
Функция ЕстьЛиСлежениеЗаЗадачейУПользователя(Задача, Пользователь) Экспорт
|
||||||
ЕстьСлежение = Ложь;
|
ЕстьСлежение = Ложь;
|
||||||
|
|
||||||
Запрос = Новый Запрос;
|
Запрос = Новый Запрос;
|
||||||
@ -39,12 +46,16 @@
|
|||||||
| И узНаблюдателиЗаЗадачами.Пользователь = &Пользователь";
|
| И узНаблюдателиЗаЗадачами.Пользователь = &Пользователь";
|
||||||
|
|
||||||
Запрос.УстановитьПараметр("Задача", Задача);
|
Запрос.УстановитьПараметр("Задача", Задача);
|
||||||
Запрос.УстановитьПараметр("Пользователь", Пользователи.ТекущийПользователь());
|
Запрос.УстановитьПараметр("Пользователь", Пользователь);
|
||||||
|
|
||||||
РезультатЗапроса = Запрос.Выполнить();
|
РезультатЗапроса = Запрос.Выполнить();
|
||||||
Если НЕ РезультатЗапроса.Пустой() Тогда
|
Если НЕ РезультатЗапроса.Пустой() Тогда
|
||||||
ЕстьСлежение = Истина;
|
ЕстьСлежение = Истина;
|
||||||
Конецесли;
|
Конецесли;
|
||||||
|
|
||||||
Возврат ЕстьСлежение;
|
Возврат ЕстьСлежение;
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
|
Функция ЕстьЛиСлежениеЗаЗадачейУТекущегоПользователя(Задача) Экспорт
|
||||||
|
Возврат ЕстьЛиСлежениеЗаЗадачейУПользователя(Задача, Пользователи.ТекущийПользователь());
|
||||||
КонецФункции
|
КонецФункции
|
Loading…
Reference in New Issue
Block a user