Оповещение пользователей
Разработка - Инструментарий разработчика
Файлы
ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.
Подписка PRO — скачивайте любые файлы со скидкой до 85% из Базы знаний
Оформите подписку на компанию для решения рабочих задач
Оформить подписку и скачать решение со скидкойВы можете заказать платную доработку или адаптацию этой разработки под вашу конфигурацию на «Бирже заказов».
- 0% комиссии — оплата напрямую исполнителю;
- Исполнители любого масштаба — от отдельных специалистов до команд под проект;
- Прямой обмен контактами между заказчиком и исполнителем;
- Безопасная сделка — при необходимости;
- Рейтинги, кейсы и прозрачная система откликов.
Решается в 3 шага:
1) В модуле Обычного приложения в процедуре "ПриНачалеРаботыСистемы" добавляем строку:
ПодключитьОбработчикОжидания("глОбработкиОжидания",60);
2) Создаём новую Константу "ОповещениеПользователей" (тип - строка, длина - 200) с доступностью просмотра и чтения у всех рабочих ролей базы (либо только у роли "Пользователь", если она стоит у всех пользователей)
3) Создаём новый Общий модуль "ОповещениеПользователей" (галки в свойствах у: Глобальный, Сервер, Внешнее соединение, Клиент-обычное приложение, Вызов сервера) с кодом:
&НаКлиенте
Процедура глОбработкиОжидания() Экспорт
Если СокрЛП(Константы.ОповещениеПользователей.Получить())<>"" Тогда
Предупреждение(СокрЛП(Константы.ОповещениеПользователей.Получить()), 0, "Сообщение от Администратора 1С !");
КонецЕсли;
КонецПроцедуры
Это всё. Далее в 1С-ке открываем форму Оповещение_пользователей.epf и пишем сообщение. Раз в минуту (значение из кода: "глОбработкиОжидания",60) у всех активных пользователей будет выскакивать предупреждение с заданным сообщением. После выполнения оповещения нажимаем кнопку "Прекратить Вывод сообщения". Будет полезно для информирования пользователей, чтобы вышли из базы на время тех. работ. Раньше приходилось обзванивать :)
__________________________________________________________________________________________________________________________
UPDATE
Кому недостаточно серого оповещения для пользователей, предлагаю красочное дополнение с бегущей строкой, скриншот прилагается ;)
Доп. инструкция по обновлению:
1) Закидываем файл ОповещениеПользователейФормой.epf в обработки нашей конфигурации, ставим право просмотра (как у Константы "ОповещениеПользователей")
2) Заменяем весь текст Общего модуля "ОповещениеПользователей" на:
&НаКлиенте
Процедура глОбработкиОжидания() Экспорт
Если СокрЛП(Константы.ОповещениеПользователей.Получить())<>"" Тогда
Форма = Обработки.ОповещениеПользователей.ПолучитьФорму("Форма");
Если Форма.Открыта() = Ложь
Тогда Форма.ОткрытьМодально();
КонецЕсли;
КонецЕсли;
КонецПроцедуры
Готово, теперь пользователи вряд ли не заметят Ваше сообщение :)
Вступайте в нашу телеграмм-группу Инфостарт
