Что нужно передать во внешнюю печатную форму, помимо ТабДокумента?

Функция КомпонентаПечатиШтрихКодовУстановлена() Экспорт
	Попытка
		БарКодПроверка=Новый COMОбъект("V8.Barcod.1");
		Возврат Истина;
	Исключение
		Возврат Ложь;
	КонецПопытки;
КонецФункции

Функция ПечатьФормыСШтрихкодомЗаказВнутр (ТабДокумент) Экспорт
	// Зададим параметры макета
	ТабДокумент.ПолеСверху = 0;
	ТабДокумент.ПолеСлева  = 0;
	ТабДокумент.ПолеСнизу  = 0;
	ТабДокумент.ПолеСправа = 0;
	ТабДокумент.ОриентацияСтраницы = ОриентацияСтраницы.Портрет;

	
	Макет = ПолучитьМакет("МакетСШтрихкодом");
	
	НомерСтраницы	= 2;
	НомерСтраницыПред = НомерСтраницы;
	
ОбластьМакета = Макет.ПолучитьОбласть("Заголовок1");
		ОбластьМакета.Параметры.ТекстЗаголовка = ЭтотОбъект;
		Если НЕ КомпонентаПечатиШтрихКодовУстановлена() Тогда
			Сообщить("Не установлена компонента печати этикеток '1C-Barcode'!",СтатусСообщения.Важное);
		Иначе
			// попытаемся напечатать ШК
			Попытка
				ОбластьМакета.Рисунки.D1.Объект.ТипКода=10;
				ОбластьМакета.Рисунки.D1.Объект.Сообщение=СокрЛП(ИДДокументаОтгрузки);
			Исключение
			КонецПопытки;
		КонецЕсли;

	ТабДокумент.Вывести(ОбластьМакета);
	
	ОбластьМакета = Макет.ПолучитьОбласть("Поставщик");
	ОбластьМакета.Параметры.ПредставлениеПоставщика = спПолучитьПредставление(ЭтотОбъект.Организация);
	ОбластьМакета.Параметры.ПодразделениеПоставщик = СокрЛП(ПодразделениеПоставщик);
	ТабДокумент.Вывести(ОбластьМакета);
	
	ОбластьМакета = Макет.ПолучитьОбласть("Покупатель");
	ОбластьМакета.Параметры.ПредставлениеПолучателя = ПодразделениеПолучатель;
	ТабДокумент.Вывести(ОбластьМакета);

	ОбластьШапкаТаблицы 		= Макет.ПолучитьОбласть("ШапкаТаблицы");
	ОбластьСтрока				= Макет.ПолучитьОбласть("Строка");
	ОбластьПодвал				= Макет.ПолучитьОбласть("ПодвалЗаказа");
	
	ОбластьШапкаТаблицы.Параметры.ИмяКолонкиКодов = обПраво("РежимВыводаКодаВДокументах",Права);
	ТабДокумент.Вывести(ОбластьШапкаТаблицы);
	
	//Получаем область строки документа
	
	ВыборкаТабличнойЧасти = ЭтотОбъект.Товары;
	Для каждого СтрокаТабличнойЧасти Из ВыборкаТабличнойЧасти Цикл
		
		СтруктураСтроки = дкПолучитьПредставлениеДанныхТоварнойСтроки(СтрокаТабличнойЧасти,Права);
		ОбластьСтрока.Параметры.Заполнить(СтруктураСтроки);
        ОбластьСтрока.Параметры.ДатаПоставки = СтрокаТабличнойЧасти.ДатаПоставки;
		ОбластьСтрока.Параметры.Коэффициент = СтрокаТабличнойЧасти.Коэффициент;
		Запрос = Новый Запрос;
		
		Запрос.Текст = 
		"ВЫБРАТЬ
		|	ШтрихКоды.ШтрихКод
		|ИЗ
		|	РегистрСведений.ШтрихКоды КАК ШтрихКоды
		|ГДЕ
		|	ШтрихКоды.Запрет <> &Запрет
		|	И ШтрихКоды.Объект.Ссылка = &ТоварДок";
	
		
		Запрос.УстановитьПараметр("Запрет", Истина);
		
		Запрос.УстановитьПараметр("ТоварДок", СтрокаТабличнойЧасти.Номенклатура);
	
		
		РезультатЗапроса = Запрос.Выполнить();
	
		
		ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();
	 
	 ОбластьСтрока.Параметры.Штрихкод = "";
	 
	 Пока ВыборкаДетальныеЗаписи.Следующий() Цикл	 
		 ОбластьСтрока.Параметры.Штрихкод = ВыборкаДетальныеЗаписи.Штрихкод + ", " + ОбластьСтрока.Параметры.Штрихкод; 	 
	 КонецЦикла;
		
		мсвДопОбластиПодвала = Неопределено;
		Если ВыборкаТабличнойЧасти.Индекс(СтрокаТабличнойЧасти) = ВыборкаТабличнойЧасти.Количество()-1 Тогда
			мсвДопОбластиПодвала = Новый Массив;			
			мсвДопОбластиПодвала.Добавить(ОбластьПодвал);
		КонецЕсли;
		
		НомерСтраницы = дкВывестиГоризонтальнуюОбласть(ТабДокумент, ОбластьСтрока, ОбластьШапкаТаблицы, ,
				НомерСтраницы, , Права, мсвДопОбластиПодвала);
		Если НомерСтраницы <> НомерСтраницыПред Тогда			
			НомерСтраницыПред = НомерСтраницы;
		КонецЕсли;		
	КонецЦикла;

	
	ОбластьПодвал.Параметры.ФИОИсполнителя = "";
	ОбластьПодвал.Параметры.ФИОЗаказчика = "";
	ОбластьПодвал.Параметры.СуммаВсего=Товары.Итог("СуммаВсего");
	
	НомерСтраницы = дкВывестиГоризонтальнуюОбласть(ТабДокумент, ОбластьПодвал, , , НомерСтраницы,,Права);
	
	Возврат ТабДокумент;
КонецФункции