Перем Текст;
Перем ИмяЛогФайла;
Процедура ПриНачалеРаботыСистемы()
//Регистрация логов
Текст=СоздатьОбъект("Текст");
ИмяЛогФайла = КаталогИБ()+"Temp\"+Формат(ТекущаяДата(),"ДГГГГММДД")+".txt";
Попытка
Текст.Открыть(ИмяЛогФайла);
Исключение
КонецПопытки;
КонецПроцедуры //ПриНачалеРаботыСистемы()
Процедура ПриЗавершенииРаботыСистемы()
//Закрытие файла логов
Текст.Записать(ИмяЛогФайла);
КонецПроцедуры // ПриЗавершенииРаботыСистемы()
//Процедура, вызываемая вместо "Сообщить()"
Процедура ВыводСообщения(ТекстСообщения,Важн = "")
Сообщить(ТекстСообщения,Важн);
Текст.ДобавитьСтроку(?(Важн<>"",Важн+" ","") + Строка(ТекущаяДата())+" "+ Строка(ТекущееВремя())+" "+ ТекстСообщения);
КонецПроцедуры
//Пример вызова
Процедура МояПроцедура()
ВыводСообщения("Друзья-админы, я сделал что-то не так!","!!!");
КонецПроцедуры
Вступайте в нашу телеграмм-группу Инфостарт