diff --git a/src/cf/Catalogs/узЗадачи/Ext/ManagerModule.bsl b/src/cf/Catalogs/узЗадачи/Ext/ManagerModule.bsl index d61ce9aae..e29b40e22 100644 --- a/src/cf/Catalogs/узЗадачи/Ext/ManagerModule.bsl +++ b/src/cf/Catalogs/узЗадачи/Ext/ManagerModule.bsl @@ -62,7 +62,54 @@ Возврат пКомментарииВКоде; КонецФункции - +//+ #208 milanse 31.05.2020 +Функция КонтактыПоЗадаче() Экспорт + + ТекстЗапросаДляПоиска = + "ВЫБРАТЬ РАЗЛИЧНЫЕ + | узЗадачи.Исполнитель КАК Исполнитель + |ИЗ + | Справочник.узЗадачи КАК узЗадачи + |ГДЕ + | узЗадачи.Ссылка = &Предмет + | И НЕ узЗадачи.Исполнитель = ЗНАЧЕНИЕ(Справочник.Пользователи.ПустаяСсылка) + | + |ОБЪЕДИНИТЬ ВСЕ + | + |ВЫБРАТЬ РАЗЛИЧНЫЕ + | узЗадачи.Автор + |ИЗ + | Справочник.узЗадачи КАК узЗадачи + |ГДЕ + | узЗадачи.Ссылка = &Предмет + | И НЕ узЗадачи.Автор = ЗНАЧЕНИЕ(Справочник.Пользователи.ПустаяСсылка) + | + |ОБЪЕДИНИТЬ ВСЕ + | + |ВЫБРАТЬ + | узЗадачи.Контрагент + |ИЗ + | Справочник.узЗадачи КАК узЗадачи + |ГДЕ + | узЗадачи.Ссылка = &Предмет + | И НЕ узЗадачи.Исполнитель = ЗНАЧЕНИЕ(Справочник.узКонтрагенты.ПустаяСсылка) + | + |ОБЪЕДИНИТЬ ВСЕ + | + |ВЫБРАТЬ + | узНаблюдателиЗаЗадачами.Пользователь + |ИЗ + | РегистрСведений.узНаблюдателиЗаЗадачами КАК узНаблюдателиЗаЗадачами + |ГДЕ + | узНаблюдателиЗаЗадачами.Задача = &Предмет"; + + ТекстЗапросаДляПоиска = " + | ОБЪЕДИНИТЬ ВСЕ + |" + ТекстЗапросаДляПоиска; + + Возврат ТекстЗапросаДляПоиска; + +КонецФункции // СтандартныеПодсистемы.Взаимодействие //////////////////////////////////////////////////////////////////////////////// diff --git a/src/cf/CommonModules/ВзаимодействияКлиентСерверПереопределяемый/Ext/Module.bsl b/src/cf/CommonModules/ВзаимодействияКлиентСерверПереопределяемый/Ext/Module.bsl index cbdbfc21c..6214ad38c 100644 --- a/src/cf/CommonModules/ВзаимодействияКлиентСерверПереопределяемый/Ext/Module.bsl +++ b/src/cf/CommonModules/ВзаимодействияКлиентСерверПереопределяемый/Ext/Module.bsl @@ -49,12 +49,15 @@ // Процедура ПриОпределенииВозможныхКонтактов(ТипыКонтактов) Экспорт + //+ #208 Иванов А.Б. 2020-06-06 @milanse Контакт = ВзаимодействияКлиентСервер.НовоеОписаниеКонтакта(); Контакт.Тип = Тип("СправочникСсылка.узКонтрагенты"); Контакт.Имя = "узКонтрагенты"; Контакт.Представление = НСтр("ru = 'Контрагенты'"); Контакт.ВозможностьИнтерактивногоСоздания = Ложь; Контакт.ИскатьПоДомену = Ложь; + ТипыКонтактов.Добавить(Контакт); + //- #208 Иванов А.Б. 2020-06-06 @milanse КонецПроцедуры diff --git a/src/cf/CommonModules/ВзаимодействияПереопределяемый/Ext/Module.bsl b/src/cf/CommonModules/ВзаимодействияПереопределяемый/Ext/Module.bsl index 9d4e67aea..9bc41e873 100644 --- a/src/cf/CommonModules/ВзаимодействияПереопределяемый/Ext/Module.bsl +++ b/src/cf/CommonModules/ВзаимодействияПереопределяемый/Ext/Module.bsl @@ -19,7 +19,13 @@ // Процедура ПриПоискеКонтактов(Знач ИмяТаблицыКонтактов, ТекстЗапросаДляПоиска) Экспорт + //+ #208 Иванов А.Б. 2020-06-06 @milanse + Если ИмяТаблицыКонтактов = Метаданные.Справочники.узЗадачи.ПолноеИмя() Тогда + + ТекстЗапросаДляПоиска = Справочники.узЗадачи.КонтактыПоЗадаче(); + КонецЕсли; + //- #208 Иванов А.Б. 2020-06-06 @milanse КонецПроцедуры