Добавление кнопки «История изменений» в 1С: подробное руководство с примерами

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

Мы рассмотрим варианты для управляемых форм (актуально для версий 8.3 и выше) и обычных форм (для устаревших конфигураций), а также разберём нюансы работы с разными типами объектов: документами, справочниками и регистрами. Особое внимание уделим типичным ошибкам, которые возникают при настройке, и способам их обхода.

Если вы не программист, но хотите внедрить функционал самостоятельно — в статье есть готовые кодовые блоки с подробными комментариями. Для разработчиков приведены расширенные примеры с использованием ПолучениеИзмененийОбъекта() и работы с журналом регистрации.

Зачем нужна кнопка «История изменений» в 1С

Стандартный механизм просмотра истории через меню Все функции → Журнал регистрации не всегда удобен. Пользователям приходится:

• 🔍 Искать нужный объект среди сотен записей
• ⏳ Тратить время на фильтрацию по датам и типам операций
• 📁 Переключаться между окнами, теряя контекст работы

Кнопка прямо в форме объекта решает эти проблемы: Экономия времени — история открывается в 1 клик. Контекстная работа — видно изменения именно текущего документа/справочника. Удобство аудита — быстрый доступ к данным о том, кто и когда внёс правки.

Особенно актуально для:

• 📄 Документов с длительным жизненным циклом (заказы, счета)
• 👥 Справочников с ответственными данными (контрагенты, номенклатура)
• 📊 Регистров накопления (остатки, обороты)

Подготовка: что нужно знать перед настройкой

Прежде чем добавлять кнопку, убедитесь, что в вашей базе:

1. Включён журнал регистрации. Без него история просто не ведётся. Проверить можно в Администрирование → Журналы регистрации.
2. Есть права на просмотр. Пользователь должен иметь роль с доступом к журналу (например, «Администратор» или «Полные права»).
3. Определён период хранения. По умолчанию журнал хранит данные 30 дней — этого может быть недостаточно.

Если журнал отключён, активируйте его через конфигуратор: Администрирование → Поддержка и обслуживание → Журналы регистрации → Настроить. В версиях 1С ниже 8.3.10 журнал регистрации может отсутствовать — в этом случае потребуется доработка через внешние обработки.

Также проверьте, какой режим управления используется в вашей конфигурации:

— Управляемые формы (современный подход, настраивается через конструктор).

— Обычные формы (устаревший формат, требует ручного программирования).

Это определит дальнейшие шаги.

⚠️ Внимание: В облачных версиях 1С (1С:Fresh) настройки журнала регистрации могут быть ограничены тарифом. Уточните возможности в личном кабинете.

Способ 1: Добавление кнопки через конструктор форм (для управляемых форм)

Самый простой метод — использовать встроенный конструктор. Подходит для конфигураций на управляемых формах (8.3 и выше).

Инструкция:

1. Откройте конфигуратор, найдите нужный объект (например, документ «РеализацияТоваровУслуг»).
2. Перейдите на закладку Формы, откройте форму объекта (обычно «ФормаОбъекта»).
3. В верхней панели инструментов нажмите Конструктор формы.
4. В дереве элементов выберите Командный интерфейс → Командная панель формы.
5. Нажмите Добавить команду → Создать команду.
6. Задайте имя команды, например ПоказатьИсториюИзменений, и заголовок «История изменений».
7. В свойствах команды укажите Действие = ВыполнитьПроцедуру и выберите процедуру (её создадим далее).

Теперь нужно написать обработчик. В модуле формы добавьте:

Процедура ПоказатьИсториюИзменений(Команда)
Объект = ЭтотОбъект.Объект;
ОткрытьФорму("ЖурналРегистрации.ФормаСписка", Новый Структура("Объект, Период", Объект, Неопределено));
КонецПроцедуры

Этот код откроет журнал регистрации с фильтром по текущему объекту. Для более точной фильтрации можно добавить период:

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

Имя команды уникально|Кнопка добавлена в командную панель|Обработчик прописан в модуле формы|Тестирование проведено в пользовательском режиме-->

Способ 2: Программное добавление кнопки (для обычных форм)

Если вы работаете с обычными формами (1С 8.2 или устаревшие конфигурации), придётся писать код вручную. Здесь нет конструктора, поэтому кнопку создаём через программное описание формы.

Алгоритм:

1. Откройте форму объекта в конфигураторе (например, Документ.ЗаказПокупателя.ФормаОбъекта).
2. Перейдите на закладку Модуль.
3. В процедуре ПриСозданииНаСервере добавьте создание кнопки:

Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
Кнопка = ЭлементыФормы.Добавить("КнопкаИстория", Тип("КнопкаФормы"), ЭтотОбъект);
Кнопка.Заголовок = "История изменений";
Кнопка.Положение = ПоложениеЭлементаФормы.Верх;
Кнопка.Действие = "ПоказатьИсториюИзменений";
КонецПроцедуры

Затем создайте обработчик:

Процедура ПоказатьИсториюИзменений()
Объект = ЭтотОбъект.Объект;
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
|   ЖурналРегистрации.Дата,
|   ЖурналРегистрации.Пользователь,
|   ЖурналРегистрации.Событие,
|   ЖурналРегистрации.Метод
|ИЗ
|   РегистрСведений.ЖурналРегистрации КАК ЖурналРегистрации
|ГДЕ
|   ЖурналРегистрации.Объект = &Объект
|УПОРЯДОЧИТЬ ПО
|   Дата УБЫВ";
Запрос.УстановитьПараметр("Объект", Объект.Ссылка);
Результат = Запрос.Выполнить();
Таблица = Результат.Выгрузить();
ОткрытьЗначение(Таблица);
КонецПроцедуры

Этот код формирует таблицу с историей изменений и открывает её в новом окне. Для красоты можно оформить вывод через ТабличныйДокумент.

⚠️ Внимание: В обычных формах при обновлении конфигурации кнопка может «слететь». Чтобы избежать этого, вынесите код создания кнопки в отдельную процедуру и вызывайте её в ПриОткрытии.

Способ 3: Использование внешней обработки для истории изменений

Если стандартный журнал регистрации не устраивает (например, нужно показывать не только кто изменил, но и что именно поменялось), можно подключить внешнюю обработку. Это актуально для:

• 📊 Сравнения версий документа по полям
• 🔄 Отката к предыдущей версии
• 📌 Фиксации комментариев к изменениям

Популярные готовые решения:

Чтобы подключить обработку:

1. Скачайте файл с расширением .epf или .erf.
2. В пользовательском режиме откройте Файл → Открыть и выберите обработку.
3. Следуйте инструкции мастера подключения (обычно нужно указать объекты для отслеживания).

Пример кода для вызова обработки из формы:

Процедура ОткрытьВнешнююИсторию(Команда)
ПутьКОбработке = "C:\Temp\ИсторияИзменений.epf";
Если НЕ ЗначениеЗаполнено(ПутьКОбработке) Тогда
Сообщить("Файл обработки не найден!");
Возврат;
КонецЕсли;
Обработка = ВнешниеОбработки.Создать(ПутьКОбработке);
Обработка.Объект = ЭтотОбъект.Объект;
Обработка.Открыть();
КонецПроцедуры

Расширенные возможности: отображение детальной истории

Если вам нужно не просто показать, кто и когда изменил объект, а что именно было изменено (например, старое и новое значение поля), потребуется доработка. Для этого используют:

• 📝 Регистры сведений — для хранения истории по каждому полю.
• 🔄 Подписки на события — чтобы ловить изменения в реальном времени.
• 📊 Сравнение объектов — через метод СравнитьОбъекты().

Пример реализации через подписку на событие ПередЗаписью:

Процедура ДокументОбъектПередЗаписью(Отказ, Объект)
Если Объект.ЭтоНовый() Тогда
Возврат;
КонецЕсли;

// Получаем текущие данные объекта до изменения
СтараяВерсия = Объект.ПолучитьОбъект().ПолучитьФорму().Объект;

// Сравниваем с новой версией
Изменения = Новый Структура();
Если СтараяВерсия.СуммаДокумента <> Объект.СуммаДокумента Тогда
Изменения.Вставить("СуммаДокумента", Новый Структура("Старое, Новое", СтараяВерсия.СуммаДокумента, Объект.СуммаДокумента));
КонецЕсли;

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

Для вывода детальной истории модифицируйте процедуру открытия формы:

Процедура ПоказатьДетальнуюИсторию(Команда)
Объект = ЭтотОбъект.Объект;
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
|   ИсторияИзмененийДокументов.Дата,
|   ИсторияИзмененийДокументов.Пользователь,
|   ИсторияИзмененийДокументов.Изменения КАК Изменения
|ИЗ
|   РегистрСведений.ИсторияИзмененийДокументов КАК ИсторияИзмененийДокументов
|ГДЕ
|   ИсторияИзмененийДокументов.Объект = &Объект
|УПОРЯДОЧИТЬ ПО
|   Дата УБЫВ";
Запрос.УстановитьПараметр("Объект", Объект.Ссылка);
Результат = Запрос.Выполнить();
Таблица = Результат.Выгрузить();

// Формируем читаемый вывод
ТабличныйДокумент = Новый ТабличныйДокумент;
Для Каждого Строка Из Таблица Цикл
ТекстИзменений = "";
Для Каждого Поле Из Строка.Изменения Цикл
ТекстИзменений = ТекстИзменений + Поле.Ключ + ": " + Поле.Значение.Старое + " → " + Поле.Значение.Новое + Символы.ПС;
КонецЦикла;
ТабличныйДокумент.ВывестиСтроку(Строка.Дата + " | " + Строка.Пользователь + Символы.ПС + ТекстИзменений);
КонецЦикла;
ТабличныйДокумент.Показать();
КонецПроцедуры

⚠️ Внимание: Хранение детальной истории увеличивает размер базы. Очищайте устаревшие записи регулярно (например, старше 1 года) через регламентное задание.

Типичные ошибки и их решение

При добавлении кнопки «История изменений» пользователи сталкиваются с рядом проблем. Вот самые частые и способы их устранения:

Ещё несколько нюансов:

• 🔧 Если кнопка есть, но не работает — проверьте права пользователя. Для просмотра журнала нужна роль с доступом к методу ПолучениеИзмененийОбъекта().
• 📅 В 1С:Бухгалтерия 3.0 история по умолчанию хранится 30 дней. Чтобы увеличить срок, отредактируйте настройки журнала в конфигураторе.
• 🖥️ В веб-клиенте некоторые обработки могут не работать. Тестируйте решение в том режиме, где оно будет использоваться.

FAQ: Частые вопросы по настройке истории изменений

Если НЕ Пользователь.Профиль.СодержитЗначение("Администратор") Тогда
Сообщить("Доступ запрещён!");
Возврат;
КонецЕсли;