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

 Процедура ДействияФормыДобавитьКопированием(Кнопка)

	колдок = 5;

	Если ВвестиЧисло(колдок,"Сколько создать?") Тогда

		Для н=1 по колдок Цикл 

			// Копирование документа

			ДокументКопия = ЭтаФорма.ЭлементыФормы.Список.ТекущаяСтрока.Скопировать();  

			ДокументКопия.Дата = РабочаяДата;	                                        

			ДокументКопия.Записать();

		КонецЦикла;

	КонецЕсли;	

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