&НаСервере

Функция ПолучитьМакетНаСервере(ИмяМакета)

    ЭтотОбъект=РеквизитФормыВЗначение("Объект");

    Макет = ЭтотОбъект.ПолучитьМакет(ИмяМакета); 

    Возврат Макет;

КонецФункции   

 &НаСервере

Процедура ВывестиМакет(ТД)

	Макет = Обработки.ОбработкаВводБланкЗаказа.ПолучитьМакет("Макет");

	ТД.Вывести(Макет);  

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

          

&НаКлиенте

Процедура ПриОткрытии(Отказ)

	ВывестиМакет(ТД);	

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