Имя: Пароль:
1C
1С v8
Оповещение пользователей на основании документа
,
0 VSpicy
 
naïve
25.05.22
14:56
Добрый день!
Уважаемые знатоки, задачка простая: Есть документ "Заявки на ремонт", нужно на основании его сделать оповещание (напоминание) выборочным пользователям.
К примеру: Вам поступила заявка - (ссылка на заявку).
Каким лучше способом реализовать эту задачку? Можно ссылки на примеры таких оповещаний...

Заранее благодарен!!!
1 1Сергей
 
25.05.22
15:04
Можно через Систему взаимодействия
2 Kassern
 
25.05.22
15:05
(0) Есть еще такой элемент конфигурации, называется Задачи, можно через них попробовать
3 Ryzeman
 
25.05.22
15:05
Сделать можно как фантазии хватит. Если прикручено взаимодействие - можно туда пулять, в телегу, на почту или ещё куда душе угодно. Слишком общий вопрос. Или речь идёт именно о механизма напоминания в некоей типовой?
4 Kassern
 
25.05.22
15:05
можно через почту письмами организовать
5 VSpicy
 
naïve
25.05.22
15:10
(3) Именно механизм интересен, у нас 1С:УАТ 8.3 к сожалению не прикручено взаимодействие...
6 VSpicy
 
naïve
25.05.22
15:13
Есть предположение, делать через регистр сведений + справочник пользователей, подумал может кто ссылкой поделится на пример исполнения такой задачки...
7 VSpicy
 
naïve
25.05.22
15:16
В штатной конфигурации есть механизм Задачи и Напоминание, но они ограничиваются для текущего пользователя...(
8 Кир Пластелинин
 
25.05.22
15:19
(7) чой та? в реквизитах адресации есть "Исполнитель". хоть через бп "задание", хоть через задачу исполнителю без бп.
9 VSpicy
 
naïve
25.05.22
15:29
(8) Пробовал ставить исполнителей и напоминание, прилетает мне же, но не заданным исполнителям...
10 yurikmellon2
 
25.05.22
15:37
(9) не знаю как у УАТ, в Альфе это делается через Задачи, всё замечательно работает
11 VSpicy
 
naïve
25.05.22
15:38
Альфа 5 или 6?
12 yurikmellon2
 
25.05.22
15:39
(11) пятёрка
13 VSpicy
 
naïve
25.05.22
15:41
При закрытии документа сейчас прописано:
&НаКлиенте
Процедура ПриЗакрытии(ЗавершениеРаботы)
Если НЕ ЗначениеЗаполнено(Объект.ВодительТС) ИЛИ НЕ ЗначениеЗаполнено(Объект.ТС) Тогда
ПоказатьОповещениеПользователя("Поступила заявка!", ПолучитьНавигационнуюСсылку(Объект.Ссылка),"Открыть посмотреть!", БиблиотекаКартинок.Вопрос32, СтатусОповещенияПользователя.Важное);
КонецЕсли;
КонецПроцедуры
В этом исполнении текущему пользователю (кто создал заявку) отрабатывает отлично...а вот как это оповещание кинуть группе пользователей?
14 Kassern
 
25.05.22
15:42
(13) Вам же сказали, попробовать механизм Задач. В типовых все есть для этого дела.
15 VSpicy
 
naïve
25.05.22
15:44
(12) ясненько... спасибо за информацию...буду знать.
16 yurikmellon2
 
25.05.22
15:45
(13) так надо создавать объект Задача с параметрами, один из которых Пользователь
17 yurikmellon2
 
25.05.22
15:48
(15)

        Если Запрос.Выполнить().Пустой() Тогда
            Задача = Задачи.СоздатьЗадачу();
            Задача.Должность = Справочники.РолиИсполнителей.НайтиПоНаименованию("Приглашение на ТО");
            Задача.Дата = НачалоДня(ТекущаяДата()) + 3600*8;
            Задача.ДатаАктуальности = НачалоДня(ТекущаяДата()) + 3600*8;
            Задача.ДатаСоздания = ТекущаяДата();
            Задача.ВидЗадачи = Справочники.ВидыЗадач.ПриглашениеНаТО;
            Задача.НазваниеКампании = "Новый порядок задач на ТО";
            Задача.Автомобиль = Источник.Автомобили[0].Автомобиль;
            Задача.Объект = Источник.Контрагент;
            Задача.ВидРемонта = Справочники.ВидыРемонта.НайтиПоНаименованию("ТО 0");
            Задача.Описание = "Заказчик: " + Задача.Объект.Наименование + Символы.ПС + "Телефон: " + Задача.Объект.ОсновнойТелефон + Символы.ПС + "VIN: " + Задача.Автомобиль.VIN + Символы.ПС + "ГосНомер: " + Справочники.Автомобили.ЧтениеЗначенияРегистраСведения(Задача.Автомобиль, Перечисления.ДополнительнаяИнформацияАвтомобилей.ГосНомер, ТекущаяДата()) + Символы.ПС + "Модель: " + Задача.Автомобиль.Модель + Символы.ПС + "ДатаТО: " + ДобавитьМесяц(Задача.ДатаАктуальности, 2);
            Задача.Автор = Справочники.Пользователи.НайтиПоНаименованию("Администратор информационной базы");
            Задача.ОбменДанными.Загрузка = Истина;            
            Попытка
                Задача.Записать();
                Если Задача.Наименование = "" Тогда
                    Задача.УстановитьНовыйНомер();
                    Задача.Наименование = "Задача № " + Задача.Номер;
                    Задача.Записать();    
                    Сообщить("Создана задача на ТО: " + Задача.Ссылка);
                КонецЕсли;            
            Исключение
                Сообщить("Не удалось записать задачу на ТО " + ОписаниеОшибки());
            КонецПопытки;             
        КонецЕсли;
18 VSpicy
 
naïve
25.05.22
15:55
(17) Спасибо большое...Буду разбираться.