Монитор регламентных заданий для "неайтишников"

Монитор регламентных заданий для бухгалтеров, кадровиков и др.
Выводит ограниченный список заданий (те, которые запрограммированы под вывод) со светофором (чтобы сразу было понятно, что что-то не так)

Была поставлена задача сделать мониторинг самописных регламентных заданий так, чтобы «неайтишники» сразу поняли, что что-то пошло не так.

Со стандартным мониторингом ,к сожалению, многи сотрудники справиться не могут.

Обработка выводит ограниченный список заданий (т.е. только те, которые запрограммированы под вывод) со светофором (чтобы сразу было понятно что что-то не так).

Для работы требуется модификация конфигурации.

Добавляем регистр сведений (напр ИсторияВыполненияРегламентныхЗаданий_cs), в котором хранится информация о выполнении регламентных заданий. ВАЖНО! по постфиксу _cs отбираются задания для вывода.
Измерения:
  • ИмяЗадания, Строка (100)
  • Запуск, Дата, Дата и время
Ресурс:
  • Завершение, Дата, Дата и время
Реквизит:
  • НаименованиеЗадания, Строка (100)

В начале задания:

 // Имя и наименование регламентного задания
МетаданныеРегламентногоЗадания = Метаданные.РегламентныеЗадания.<Имя регламентного задания>;
Имя = МетаданныеРегламентногоЗадания.Имя;
Наименование = МетаданныеРегламентногоЗадания.Наименование;
// Время запуска регламентного задания
ДатаЗапуска = ТекущаяДатаСеанса();
// Начало выполнения
ЗаписатьИсториюВыполненияРегламентногоЗадания(Имя, Наименование, ДатаЗапуска);

В конце задания:

Процедура ЗаписатьИсториюВыполненияРегламентногоЗадания(Имя, Наименование, ДатаЗапуска, ОкончаниеЗадания = Ложь) Экспорт

Ну и процедура записи (у меня она живет в специальном общем модуле для доработок):

Процедура ЗаписатьИсториюВыполненияРегламентногоЗадания(Имя, Наименование, ДатаЗапуска, ОкончаниеЗадания = Ложь) Экспорт

Запись = РегистрыСведений.ИсторияВыполненияРегламентныхЗаданий_cs.СоздатьМенеджерЗаписи();
Запись.Запуск = ДатаЗапуска;
Запись.ИмяЗадания = Имя;
Если ОкончаниеЗадания Тогда
Запись.Завершение = ТекущаяДатаСеанса();
КонецЕсли;
Запись.НаименованиеЗадания = Наименование;
Запись.Записать();

КонецПроцедуры

1 Comment

  1. GreenDragon

    Юзайте расширение.

    Запилите триггеры в Zabbix, который уже можете настроить хоть на уведомление через почту, хоть в jabber-клиент(или что там используют эти ваши неайтишники), хоть sms с доставкой через почту России. А вот это вот ваше решение сидеть и смотреть на «светофор» — оно мягко говоря странное.

    Reply

Leave a Comment

Ваш адрес email не будет опубликован. Обязательные поля помечены *