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

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

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

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

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

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

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

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

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

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

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

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

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

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

	         КонецЕсли;

	     КонецЕсли;

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

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