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

	колдок = 5;

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

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

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

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

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

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

		КонецЦикла;

	КонецЕсли;	

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

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

ДокументКопия = ИсходныйДокумент.Скопировать();



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



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