Допроведение документа, 8-ка

"В большинстве документов (например в УПП) стоит Не удалять движения, при этом в ОбработкеПроведения написано:
Если мУдалятьДвижения Тогда
ОбщегоНазначения.УдалитьДвиженияРегистратора(ЭтотОбъект, Отказ);
КонецЕсли;"

спасибо за пояснение.

"перем ДокументПроведен экспорт;

Процедура ОбработкаПроведения(Отказ, Режим)
Если ДокументПроведен = Истина Тогда

Движения.ТоварыНаСкладах.Записывать = Истина;
Для Каждого ТекСтрокаТовары Из Товары Цикл
// регистр ТоварыНаСкладах Приход
Движение = Движения.ТоварыНаСкладах.Добавить();
Движение.ВидДвижения = ВидДвиженияНакопления.Приход;
Движение.Период = Дата;
Движение.Номенклатура = ТекСтрокаТовары.Номенклатура;
Движение.Количество = ТекСтрокаТовары.Количество;
Движение.Сумма = ТекСтрокаТовары.Сумма;
КонецЦикла;

Иначе

Движения.Покупки.Записывать = Истина;
Для Каждого ТекСтрокаТовары Из Товары Цикл
// регистр Покупки Приход
Движение = Движения.Покупки.Добавить();
Движение.ВидДвижения = ВидДвиженияНакопления.Приход;
Движение.Период = Дата;
Движение.Номенклатура = ТекСтрокаТовары.Номенклатура;
Движение.Количество = ТекСтрокаТовары.Количество;
Движение.Сумма = ТекСтрокаТовары.Сумма;
КонецЦикла;

КонецЕсли;
КонецПроцедуры

Процедура ПередЗаписью(Отказ, РежимЗаписи, РежимПроведения)
    //Сообщить("ПередЗаписью "+ ЭтотОбъект.Проведен);
    ДокументПроведен =  ЭтотОбъект.Проведен;
КонецПроцедуры

ДокументПроведен = ЭтотОбъект.Проведен;"

спасибо большое за пример.