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

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

Основной инструмент — метод Скопировать() объекта типа «ДокументОбъект». Он создаёт новый объект документа со всеми реквизитами, табличными частями и движениями исходника, но без ссылки: документ считается новым и получит номер при записи. Альтернативы — заполнение через обработчик ОбработкаЗаполнения с передачей основания и ручной перенос данных, когда копия должна отличаться от оригинала.

Важно понимать ограничения: метод Скопировать() доступен только на сервере, не переносит пометку удаления и признак проведения в готовом виде, а также копирует данные «как есть», включая устаревшие договоры, склады или ответственных. Ниже разобраны рабочие примеры кода, проверка результата и ошибки, которые чаще всего приводят к некорректным документам.

Как работает метод Скопировать() у документа

Метод Скопировать() вызывается у объекта документа и возвращает новый объект того же вида, заполненный данными текущего. Копируются все реквизиты шапки, табличные части и наборы движений. Не копируются: ссылка (новый объект её не имеет до записи), номер (будет присвоен при записи), пометка удаления и факт проведения — новый документ всегда создаётся непроведённым.

Типовой фрагмент кода выглядит так:

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

НовыйДокумент = ИсходныйОбъект.Скопировать();
НовыйДокумент.Дата = ТекущаяДатаСеанса();
НовыйДокумент.Записать(РежимЗаписиДокумента.Запись);

Обратите внимание на дату: скопированный документ сохраняет дату оригинала, что почти всегда нежелательно. Устанавливайте актуальную дату явно, иначе документ «провалится» в прошлый период и может попасть в закрытый период, где запись будет запрещена.

Копирование через ОбработкаЗаполнения

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

НовыйДокумент = Документы.КорректировкаРеализации.СоздатьДокумент();
НовыйДокумент.Заполнить(ИсходныйДокументСсылка);
НовыйДокумент.Записать();

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

Копирование с изменением реквизитов и табличных частей

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

НовыйДокумент = ИсходныйОбъект.Скопировать();
НовыйДокумент.Дата = ТекущаяДатаСеанса();
НовыйДокумент.Склад = Справочники.Склады.НайтиПоНаименованию("Основной");
НовыйДокумент.Комментарий = "Создан копированием из " + ИсходныйОбъект.Номер;

// Удалить строки с нулевым количеством
Индекс = НовыйДокумент.Товары.Количество() - 1;
Пока Индекс >= 0 Цикл
Если НовыйДокумент.Товары[Индекс].Количество = 0 Тогда
НовыйДокумент.Товары.Удалить(Индекс);
КонецЕсли;
Индекс = Индекс - 1;
КонецЦикла;

НовыйДокумент.Записать(РежимЗаписиДокумента.Проведение);

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

Скопировать() против Заполнить() и ручного переноса

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

Проверка результата и безопасная запись

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

После записи убедитесь, что документ получил номер, ссылку и, при необходимости, провёлся. Признак успешного проведения — НовыйДокумент.Проведен = Истина после вызова Записать(РежимЗаписиДокумента.Проведение). Если проведение не выполнилось, платформа выдаст сообщения об ошибках — их нужно собрать и показать пользователю, а не молча оставлять документ непроведённым.

Ограничения и риски

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

Осторожно копируйте документы с уникальными идентификаторами в реквизитах (например, идентификаторы платежей, ГИСМ, ЕГАИС): дублирование таких значений может привести к отказу при обмене с внешними системами. Такие поля следует очищать после копирования.

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