Как отправить ошибки из журнала регистрации на почту?

28.04.21

База данных - Журнал регистрации

Процедуры отправки ошибок из журнала регистрации на почту. Журнал регистрации выгружается в файл Excel, далее прикрепляется к письму. Для отправки писем создано регламентное задание.

Файлы

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование Скачано Купить файл
(только для физ. лиц)
Отчет по журналу регистрации (обычное приложение)
.erf 12,77Kb
3 2 150 руб. Купить
Отчет по журналу регистрации (управляемое приложение)
.erf 13,41Kb
4 2 150 руб. Купить

Подписка PRO — скачивайте любые файлы со скидкой до 85% из Базы знаний

Оформите подписку на компанию для решения рабочих задач

Оформить подписку и скачать решение со скидкой

Для отправки писем необходимо добавить регламентное задание:

Далее необходимо настроить расписание регламентного задания (в моем случае задание выполняется раз в сутки, в 23.50).

Далее нужно указать для регламентного задания процедуру ОтправитьОшибкиИзЖурналаРегистрацииНаПочту(). Процедура должна находиться в общем модуле.

Процедура ОтправитьОшибкиИзЖурналаРегистрацииНаПочту() Экспорт
	
	ФильтрЖурнала = Новый Структура;	
	ВнешниеДанные = Новый ТаблицаЗначений;	
	УровниРегистрацииОшибок = Новый Массив;
 	УровниРегистрацииОшибок.Добавить(УровеньЖурналаРегистрации.Ошибка);
	ФильтрЖурнала.Вставить("Уровень",УровниРегистрацииОшибок);
 	ФильтрЖурнала.Вставить("ДатаНачала",НачалоДня(ТекущаяДата()));	
	ФильтрЖурнала.Вставить("ДатаОкончания",КонецДня(ТекущаяДата())) ;	
	УстановитьПривилегированныйРежим(Истина);
	ВыгрузитьЖурналРегистрации(ВнешниеДанные,ФильтрЖурнала);
	УстановитьПривилегированныйРежим(Ложь);
	Если ВнешниеДанные.Количество() = 0 Тогда
	  Возврат;
	КонецЕсли;
	ТабДок      = Новый ТабличныйДокумент;    
        Построитель = Новый ПостроительОтчета();

        Построитель.ИсточникДанных          = Новый ОписаниеИсточникаДанных(ВнешниеДанные);
        Построитель.ВыводитьЗаголовокОтчета = Ложь;
        Построитель.Вывести(ТабДок );

        ИмяФайла = ПолучитьИмяВременногоФайла("xls");
    
        ТабДок.Записать(ИмяФайла,ТипФайлаТабличногоДокумента.XLS97);
	                     	
	ОтправитьОповещениеОтветственномуЛицу("Ошибки во вложенном файле","Ошибки в журнале регистрации базы "+СтрокаСоединенияИнформационнойБазы(),"it@company.com", ИмяФайла); 		
	
КонецПроцедуры

Функция ОтправитьОповещениеОтветственномуЛицу(ТекстСообщения,ТемаПисьма,email,ПутьКФайлуВложения = "") экспорт   
	
	ИПП = Новый ИнтернетПочтовыйПрофиль;
	ИПП.АдресСервераIMAP	= "mail.company.com"; 
	ИПП.АдресСервераSMTP	= "mail.company.com";
	ИПП.ИспользоватьSSLIMAP	=  Истина;      
	ИПП.ПарольIMAP	        = "Пароль1";
	ИПП.ПарольSMTP	        = "Пароль1";
	ИПП.ПользовательIMAP	= "company\1c";
	ИПП.ПользовательSMTP	= "company\1c";
	ИПП.ПортIMAP	        = 999;  
	ИПП.ПортSMTP	        = 24;
	ИПП.Таймаут	        = 70;  
	
	Попытка
		Сообщение = Новый ИнтернетПочтовоеСообщение;			
		Сообщение.Получатели.Добавить(email);
		Сообщение.Отправитель.Адрес = "1c@company.ru";
		Сообщение.Тема = ТемаПисьма; 	 
		Сообщение.Тексты.Добавить(ТекстСообщения);
		
		Если ЗначениеЗаполнено(ПутьКФайлуВложения) Тогда
		  Сообщение.Вложения.Добавить(ПутьКФайлуВложения);
		КонецЕсли;

		Почта = Новый ИнтернетПочта;
		Почта.Подключиться(ИПП);
		Почта.Послать(Сообщение);
		Почта.Отключиться();
	Исключение
		//ДобавитьСообщениеДляЖурналаРегистрации(СобытиеЖурналаРегистрации(), "Ошибка", ПодробноеПредставлениеОшибки(ИнформацияОбОшибке()),,Истина); 
	КонецПопытки;
	
КонецФункции

Доработка проверялась на конфигурации "Управление производственным предприятием, редакция 1.3 (1.3.49.1)".

К статье приложены 2 обработки по работе с журналом регистрации:

Отчет по журналу регистрации (обычное приложение)

Отчет по журналу регистрации (управляемое приложение)

 

Журнал регистрации Excel почта почтовый профиль

См. также

Мессенджеры и боты Журнал регистрации Мониторинг Email рассылки Системный администратор 1С v8.3 Управляемые формы 1С:Управление нашей фирмой 1.6 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Комплексная автоматизация 2.х 1С:Зарплата и Управление Персоналом 3.x Платные (руб)

Рассылка уведомлений о событиях журнала регистрации на электронную почту и в Телеграмм. Программа позволяет анализировать журнал регистрации по заданным критериям, находить в нём интересующие события, и отправлять уведомления об этих событиях на электронную почту (одного или нескольких получателей) или в телеграмм. Может работать и как внешняя обработка, и как регламентное задание. Для УНФ, УТ 11, БП 3.0, ЗУП 3.0, ERP.

10800 руб.

18.06.2017    33399    4    2    

15

Журнал регистрации Системный администратор 1С v8.3 1C:Бухгалтерия Платные (руб)

Конфигурация LogiCH эффективно решает проблему хранения и анализа записей журналов регистрации. Разработка использует столбцовую СУБД ClickHouse, одну из самых быстрых Big Data OLAP СУБД. Любой анализ журнала можно выполнить в одном отчете, в котором доступны все возможности СКД с учетом ограничений RLS. Количество подключаемых баз не ограничено и не влияет на скорость построения анализа.

6000 руб.

28.11.2018    21930    19    8    

45

Журнал регистрации Программист Россия Бесплатно (free)

В материале рассматривается сравнение двух инструментов для работы с журналом регистрации 1С: утилиты ibcmd и платформы Vector. Описаны их функциональные возможности, тестирование производительности и практическое применение для преобразования логов в формат JSON.

20.11.2024    2955    user1913000    13    

20

Журнал регистрации Тестирование QA Программист Бесплатно (free)

Поговорим про логирование в приложениях на базе 1С, рассмотрим проблемы, которые возникают при сборе информации из этих систем, и обсудим практический опыт применения внутренних и внешних инструментов для анализа логов.

21.10.2024    4941    leemuar    8    

24

Инструменты администратора БД Журнал регистрации Системный администратор 1С v8.3 1С:Управление торговлей 11 Абонемент ($m)

Внешняя обработка для регламентного сокращения журнала регистрации для конфигураций на базе БСП и платформы 8.3.20+

1 стартмани

29.12.2023    3067    47    dima_gsv    4    

14

Журнал регистрации Мониторинг Системный администратор Программист Абонемент ($m)

Как легко и быстро с помощью специализированных решений собирать, парсить и передавать логи и метрики.

1 стартмани

19.11.2023    2196    6    AlexSTAL    0    

8

Мониторинг Журнал регистрации Технологический журнал Системный администратор Программист Абонемент ($m)

Как легко и быстро с помощью специализированных решений собирать, парсить и передавать логи и метрики.

1 стартмани

13.11.2023    6430    11    AlexSTAL    0    

47

Журнал регистрации Инструменты администратора БД Мониторинг Мессенджеры и боты Системный администратор Программист 1С v8.3 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Управление холдингом 1С:Комплексная автоматизация 2.х Абонемент ($m)

Внешняя обработка для БСП-конфигураций с простым программным интерфейсом. Предназначена для мониторинга состояния системы. Базово реализована отправка ошибок из журнала регистрации, но можно легко добавить мониторинг других журналов, каких-либо действий пользователей, состояния системы (например закрытие месяца).

3 стартмани

26.09.2023    3726    28    doom2good    16    

14