Документ "Корректировка Записей Регистров" "ввод на основании"

Достаточно популярный документ у бухгалтеров не имеет ввода на основании, для любых документов. Исправим.

Создайте подписку на события для документов (если нет):

• Источник=ДокументОбъект,
• Событие=ОбработкаЗаполнения,
• Обработчик=свой_ОбщегоНазначения._ОбработкаЗаполненияДокументовОбработкаЗаполнения,
• Текст процедуры:

Процедура _ОбработкаЗаполненияДокументовОбработкаЗаполнения(Источник, Основание) Экспорт

    Если (ТипЗнч(Источник.Ссылка)= Тип("ДокументСсылка.КорректировкаЗаписейРегистров")) Тогда

        Если Основание<>Неопределено Тогда

            Источник.ИспользоватьЗаполнениеДвижений=истина;

            ЗаполнениеДокументов.ЗаполнитьШапкуДокументаПоОснованию(Источник, Основание);

            СтрокаТабличнойЧасти = Источник.ЗаполнениеДвижений.Добавить();

            СтрокаТабличнойЧасти.Документ=Основание;

            СтрокаТабличнойЧасти.Действие="Сторно движений документа";

            ФормаДок = Источник.ПолучитьФорму("ФормаДокумента");

            ФормаДок.КоманднаяПанельЗаполнениеДвиженийЗаполнитьДвижения("ЗаполнитьДвижения")

        КонецЕсли;

    КонецЕсли;

КонецПроцедуры

И не забудьте в самом Документе КорректировкаЗаписейРегистров, на вкладке «Ввод на основании» добавить все интересующие Вас документы основания.