Всплывающие уведомления после открытия базы. Prog_man ,
lirt82 ,
takefive ,
АгентБезопаснойНацио ,
KJlag ,
DeeK ,
maxar ,
lubitelxml ,
Hawk_1c ,
Amra ,
Homer ,
ЕRPe ,
ads55 ,
unenu ,
proger2021 ,
integer ,
Winnie Buh ,
paramedic
☑
0
lirt82
18.06.26
✎
15:25
Возникла необходимость информировать конкретного пользователя определенными уведомлениями после того как откроется база.
В расширение с директивой &После("ПриНачалеРаботыСистемы")
сделал вызов из своего общего модуля процедуру, процедура отработала и вывела сообщение, но возможно ли тексты сообщении накопить в массиве и при нажатии на значок "колокольчик" в верхней рамке основного окна приложения отобразить их пользователю?
как реализовать?
&После("ПриНачалеРаботыСистемы")
Процедура РасшПР_ПриНачалеРаботыСистемы()
ВзаимодействияСПользователями.УведомленияОСрокахДействияДокументовФизЛиц();
КонецПроцедуры
Процедура УведомленияОСрокахДействияДокументовФизЛиц() Экспорт
//проверяем на вхождение в справочник рассылок, уведомлений, сообщений
Оповестить = ПроверитьПользователяДляУведомлений(Пользователи.ТекущийПользователь());
Если Оповестить Тогда
ТекстСообщения = "";
ТекущаяДата = НачалоДня(ТекущаяДата());
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
...........................
ТекстСообщения = СтрШаблон(НСтр("ru = '....
КонецЕсли;
КонецЦикла;
Если ЗначениеЗаполнено(ТекстСообщения) Тогда
ОбщегоНазначенияКлиентСервер.СообщитьПользователю(ТекстСообщения);
КонецЕсли;
КонецЕсли;
КонецПроцедуры
Функция ПроверитьПользователяДляУведомлений(ТекПользователь)
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| ПользователиДляРассылокУведомленийСообщений.Пользователь КАК Пользователь
|ИЗ
| Справочник.ПользователиДляРассылокУведомленийСообщений КАК ПользователиДляРассылокУведомленийСообщений
|ГДЕ
| ПользователиДляРассылокУведомленийСообщений.Пользователь = &ТекПользователь";
Запрос.УстановитьПараметр("ТекПользователь", ТекПользователь);
Если Не Запрос.Выполнить().Пустой() Тогда
Возврат Истина;
Иначе
Возврат Ложь;
КонецЕсли;
КонецФункции
1
АгентБезопасной Нацио
18.06.26
✎
15:30
ПоказатьОповещениеПользователя (ShowUserNotification)
Синтаксис:
ПоказатьОповещениеПользователя(<Текст>, <ДействиеПриНажатии>, <Пояснение>, <Картинка>, <СтатусОповещенияПользователя>, <КлючУникальности>)
2
lirt82
18.06.26
✎
15:46
(1) это клиентский метод но я нахожусь на сервере
&После("ПриНачалеРаботыСистемы")
Компьютеры — прекрасное средство для решения проблем, которых до их появления не было.