0
Astrakhan_man
11.04.13
✎
13:24
|
Пытаюсь в модуле ОбщегоНазначени в
Процедура СообщитьОбОшибке(ТекстСообщения, Отказ = Ложь, Заголовок = "", Статус = Неопределено,Объект = Неопределено) Экспорт
сделать запись в новый регистСведений:
Если не Объект = Неопределено Тогда УправлениеПользователями.ЗаписатьОшибку(Объект,ТекстСообщения);
КонецЕсли;
|
|
1
Astrakhan_man
11.04.13
✎
13:27
|
Пытаюсь в модуле ОбщегоНазначени в
Процедура СообщитьОбОшибке(ТекстСообщения, Отказ = Ложь, Заголовок = "", Статус = Неопределено,Объект = Неопределено) Экспорт
сделать запись в новый регистрСведений при получение ошибки записи или проведения. ошибку не выдает, но и не записывает ничего. если через обработку внешнюю вызывать то сведения пишутся. Подскажи те в чем может быть беда?
Если не Объект = Неопределено Тогда УправлениеПользователями.ЗаписатьОшибку(Объект,ТекстСообщения);
КонецЕсли;
Процедура ЗаписатьОшибку(Объект,Сообщение) Экспорт
//НаборЗаписей = РегистрыСведений.ИсторияОбъектов.СоздатьМенеджерЗаписи();
НаборЗаписей = РегистрыСведений.ИсторияОбъектов.СоздатьНаборЗаписей();
Новые = НаборЗаписей.Добавить();
Новые .ДатаРедактирования = ТекущаяДата() + Константы.КолЧасовВперед.Получить()*60*60;
Новые .Объект = Объект.Ссылка;
Новые .Пользователь = ОпределитьТекущегоПользователя();
Новые .Сообщение = Сообщение;
НаборЗаписей.Записать();
КонецПроцедуры
|
|