Лог измененных документов (программно или интерактивно)| Внешняя компонента для журналирования сохраненных или вновь созданных документов.
Компонента проверена на 25 релизе 1С:Предприятие 7.7. | | Автор статьи: romix | Редакторы: Последняя редакция №5 от 16.10.06 | История URL: http://kb.mista.ru/article.php?id=380 | |
Файл для скачивания:
http://x-romix.narod.ru/vk_log_write_doc.rar
(Скачивать ЛЕВОЙ кнопкой мыши, ~72 килобайта)
Приложена работающая тестовая конфигурация.
Приложен исходный код (компилятор - Delphi 6).
Часто (например, при реализации обмена между информационными базами 1С/не 1С) требуется знать, какие объекты (например, документы 1С) пользователи (или не пользователи, а программисты) изменяли за промежуток времени.
Приведенная ниже компонента перехватывает программное (док.Записать()) или интерактивное сохранение документов.
Также перехватываются действия:
- Создание новых документов
- Пометка на удаление
- Снятие пометки на удаление
- Проведение
- Отмена проведения
- Изменение времени документа
Перехват инициализируется в глобальном модуле 7.7 так:
var vk_log_write_doc Экспорт;
Перем глИмяФайла Экспорт;
///////////////////////////////////////////////////////////////////////
//Предопределенная процедура 1С
Процедура ПриНачалеРаботыСистемы()
глИмяФайла="c:\vk_log_write_doc.log";
каталог="..\";//Каталог, где лежит внешняя компонента
ЗагрузитьВнешнююКомпоненту(каталог+"vk_log_write_doc.dll");
vk_log_write_doc=СоздатьОбъект("Addin.vk_log_write_doc");
vk_log_write_doc.ФайлЖурнала=глИмяФайла;//Имя файла журнала
vk_log_write_doc.ПерехватЗаписиДокументов();
ОткрытьФорму("Обработка.ТестЗаписиДок");
КонецПроцедуры // ПриНачалеРаботыСистемы
|