Как программно очистить регистр сведений в 1С 8.3

Регистр сведений в 1С 8.3 накапливает данные быстро: курсы валют, цены, история изменений, служебные настройки. Рано или поздно возникает задача очистить его полностью или частично — например, перед загрузкой новых данных, при исправлении ошибок обмена или для уменьшения размера базы. Встроенный язык даёт несколько способов сделать это, и у каждого есть свои ограничения.

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

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

Как полностью очистить регистр сведений через набор записей

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

НаборЗаписей = РегистрыСведений.КурсыВалют.СоздатьНаборЗаписей();
НаборЗаписей.Записать();

Метод Записать() без параметров выполняется с замещением: то, что есть в наборе (ничего), заменяет то, что есть в базе (все записи). Если нужно контролировать процесс, можно использовать Записать(Истина) — флаг замещения указан явно, что улучшает читаемость кода.

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

Как очистить регистр частично: отбор по измерениям и периоду

Часто требуется удалить не всё, а записи по конкретному объекту, организации или за определённый период. Для этого в наборе записей устанавливается отбор. Элементы отбора добавляются по именам измерений регистра и, для периодических регистров, по полю «Период».

НаборЗаписей = РегистрыСведений.ЦеныНоменклатуры.СоздатьНаборЗаписей();
НаборЗаписей.Отбор.Номенклатура.Установить(НужнаяНоменклатура);
НаборЗаписей.Записать();

Для периодического регистра можно ограничить удаление по дате. Отбор по периоду работает только на равенство, поэтому для диапазона дат удобнее сначала получить записи запросом, а затем удалять их в цикле или использовать несколько наборов. Альтернатива — запрос с УНИЧТОЖИТЬ недоступен: язык запросов 1С не умеет удалять данные напрямую, поэтому выборка запросом и последующая запись пустых наборов с отбором — стандартный приём.

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

Очистка регистра, подчинённого регистратору

Регистр сведений с режимом «Подчинение регистратору» хранит движения документов. Записи в нём нельзя редактировать напрямую в пользовательском режиме, но программно очистить его можно тем же набором записей — с обязательным отбором по регистратору. Без отбора по регистратору платформа не позволит записать набор.

НаборЗаписей = РегистрыСведений.СтатусыДокументов.СоздатьНаборЗаписей();
НаборЗаписей.Отбор.Регистратор.Установить(СсылкаНаДокумент);
НаборЗаписей.Записать();

Чтобы очистить такой регистр полностью, нужно перебрать всех регистраторов и для каждого записать пустой набор. Это медленнее, чем очистка независимого регистра, поэтому для массовой обработки стоит получить список регистраторов запросом и работать в транзакции.

Учтите: при перепроведении документов движения по регистру будут созданы заново. Если цель — именно избавиться от данных, а не перезаполнить их, проверьте логику проведения документов, иначе после очистки регистр наполнится снова.

Очистка в транзакции и обработка ошибок

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

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

Запись ошибки в журнал регистрации обязательна для серверных процедур: без неё сбой фонового задания останется незамеченным. Если очистка запускается по расписанию, добавьте уведомление администратору или хотя бы понятное сообщение в журнал.

НаборЗаписей = РегистрыСведений.ИмяРегистра.СоздатьНаборЗаписей();
НаборЗаписей.Отбор.ИмяИзмерения.Установить(ЗначениеОтбора);
НаборЗаписей.Записать(Истина); // Истина - с замещением существующих записей

Проверка результата после очистки

После выполнения кода убедитесь, что регистр действительно пуст или содержит только нужные записи. Быстрый способ — запрос с подсчётом количества записей. Он безопасен, не меняет данные и показывает фактическое состояние таблицы.

Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
|	КОЛИЧЕСТВО(*) КАК КоличествоЗаписей
|ИЗ
|	РегистрСведений.КурсыВалют КАК КурсыВалют";
Результат = Запрос.Выполнить().Выбрать();
Если Результат.Следующий() Тогда
Сообщить("Записей в регистре: " + Результат.КоличествоЗаписей);
КонецЕсли;

Дополнительно проверьте связанные механизмы: отчёты, которые строятся по регистру, обмены данными, регламентные задания. Если регистр участвует в плане обмена, после очистки узлы-получатели могут получить неожиданное состояние — зарегистрируйте изменения для обмена или выполните полную синхронизацию.

Типичные ошибки при программной очистке

Чаще всего проблемы возникают не из-за самого кода, а из-за невнимательности к контексту. Ниже — ситуации, которые регулярно приводят к потере данных или бесполезной работе.

Отдельно стоит упомянуть попытки «ускорить» очистку прямым удалением записей через Удалить() у менеджера записи в цикле. Для больших объёмов это в разы медленнее записи пустого набора и создаёт отдельную транзакцию на каждую запись. Используйте набор записей — он выполняет операцию одним SQL-запросом.

Когда лучше использовать альтернативные подходы

Не всегда нужен именно программный код. Если очистка разовая и регистр небольшой, проще открыть регистр в режиме предприятия и удалить записи вручную или стандартной обработкой «Групповое изменение реквизитов». Для подчинённых регистратору регистров корректный путь — очистка движений через отмену проведения документов.

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

Частые вопросы