Запрос во внешней печатной форме ЗУП

Макет = ПолучитьМакет(ИмяМакета);
	
	Первый = Истина;
	СсылкаНаОбъект = МассивОбъектов.Получить(0).Ссылка; 	 
	
	ТабДокумент = Новый ТабличныйДокумент;
	ОбластьМакета = Макет.ПолучитьОбласть("Шапка"); 
	
	Запрос = Новый Запрос;
	Запрос.УстановитьПараметр("Ссылка", СсылкаНаОбъект);
	Запрос.УстановитьПараметр("Сотрудник", СсылкаНаОбъект);
	Запрос.УстановитьПараметр("НаДату",СсылкаНаОбъект);
  	
	Запрос.Текст = 
	"ВЫБРАТЬ
	               |	КадроваяИсторияСотрудниковИнтервальный.ГоловнаяОрганизация КАК Организация,
	               |	КадроваяИсторияСотрудниковИнтервальный.Сотрудник КАК Сотрудник,
	               |	КадроваяИсторияСотрудниковИнтервальный.Сотрудник.Код КАК СотрудникКод,
	               |	КадроваяИсторияСотрудниковИнтервальный.ФизическоеЛицо КАК ФизическоеЛицо,
	               |	КадроваяИсторияСотрудниковИнтервальный.Подразделение КАК Подразделение,
	               |	ВЫБОР
	               |		КОГДА НЕ МестаВыплатыЗарплатыСотрудников.Вид ЕСТЬ NULL
	               |			ТОГДА МестаВыплатыЗарплатыСотрудников.Вид
	               |		КОГДА НЕ МестаВыплатыЗарплатыПодразделений.Вид ЕСТЬ NULL
	               |			ТОГДА МестаВыплатыЗарплатыПодразделений.Вид
	               |		КОГДА НЕ МестаВыплатыЗарплатыОрганизаций.Вид ЕСТЬ NULL
	               |			ТОГДА МестаВыплатыЗарплатыОрганизаций.Вид
	               |		ИНАЧЕ NULL
	               |	КОНЕЦ КАК Вид,
	               |	ВЫБОР
	               |		КОГДА НЕ МестаВыплатыЗарплатыСотрудников.Вид ЕСТЬ NULL
	               |				И МестаВыплатыЗарплатыСотрудников.Вид = ЗНАЧЕНИЕ(Перечисление.ВидыМестВыплатыЗарплаты.ЗарплатныйПроект)
	               |			ТОГДА 1
	               |		КОГДА НЕ МестаВыплатыЗарплатыСотрудников.Вид ЕСТЬ NULL
	               |				И МестаВыплатыЗарплатыСотрудников.Вид = ЗНАЧЕНИЕ(Перечисление.ВидыМестВыплатыЗарплаты.БанковскийСчет)
	               |			ТОГДА 2
	               |		КОГДА НЕ МестаВыплатыЗарплатыПодразделений.Вид ЕСТЬ NULL
	               |			ТОГДА 3
	               |		КОГДА НЕ МестаВыплатыЗарплатыОрганизаций.Вид ЕСТЬ NULL
	               |			ТОГДА 4
	               |		ИНАЧЕ 0
	               |	КОНЕЦ КАК КодВида,
	               |	МестаВыплатыЗарплатыСотрудников.МестоВыплаты КАК МестоВыплатыСотр,
	               |	МестаВыплатыЗарплатыПодразделений.МестоВыплаты КАК МестоВыплатыПодр,
	               |	МестаВыплатыЗарплатыОрганизаций.МестоВыплаты КАК МестоВыплатыОрг
	               |ПОМЕСТИТЬ ВТ_Кадр
	               |ИЗ
	               |	РегистрСведений.КадроваяИсторияСотрудниковИнтервальный КАК КадроваяИсторияСотрудниковИнтервальный
	               |		ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.МестаВыплатыЗарплатыСотрудников КАК МестаВыплатыЗарплатыСотрудников
	               |		ПО КадроваяИсторияСотрудниковИнтервальный.Сотрудник = МестаВыплатыЗарплатыСотрудников.Сотрудник
	               |		ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.МестаВыплатыЗарплатыПодразделений КАК МестаВыплатыЗарплатыПодразделений
	               |		ПО КадроваяИсторияСотрудниковИнтервальный.Подразделение = МестаВыплатыЗарплатыПодразделений.Подразделение
	               |		ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.МестаВыплатыЗарплатыОрганизаций КАК МестаВыплатыЗарплатыОрганизаций
	               |		ПО КадроваяИсторияСотрудниковИнтервальный.ГоловнаяОрганизация = МестаВыплатыЗарплатыОрганизаций.Организация
	               |ГДЕ
	               |	КадроваяИсторияСотрудниковИнтервальный.Сотрудник = &Сотрудник
	               |	И &НаДату МЕЖДУ КадроваяИсторияСотрудниковИнтервальный.ДатаНачала И КадроваяИсторияСотрудниковИнтервальный.ДатаОкончания
	               |	И КадроваяИсторияСотрудниковИнтервальный.Сотрудник.Ссылка = &Ссылка
	               |;
	               |
	               |////////////////////////////////////////////////////////////­////////////////////
	               |ВЫБРАТЬ РАЗРЕШЕННЫЕ
	               |	ВТ_Кадр.Организация КАК Организация,
	               |	ВТ_Кадр.Сотрудник КАК Сотрудник,
	               |	ВТ_Кадр.СотрудникКод КАК СотрудникКод,
	               |	ВТ_Кадр.ФизическоеЛицо КАК ФизическоеЛицо,
	               |	ВТ_Кадр.Подразделение КАК Подразделение,
	               |	ВТ_Кадр.Вид КАК Вид,
	               |	ВТ_Кадр.КодВида КАК КодВида,
	               |	ВЫБОР
	               |		КОГДА ВТ_Кадр.КодВида = 1
	               |			ТОГДА ЛицевыеСчетаСотрудниковПоЗарплатнымПроектам.НомерЛицевогоСчета
	               |		КОГДА ВТ_Кадр.КодВида = 2
	               |			ТОГДА ВТ_Кадр.МестоВыплатыСотр.НомерСчета
	               |		КОГДА ВТ_Кадр.КодВида = 3
	               |			ТОГДА ЛицевыеСчетаСотрудниковПоЗарплатнымПроектам.НомерЛицевогоСчета
	               |		КОГДА ВТ_Кадр.КодВида = 4
	               |			ТОГДА ЛицевыеСчетаСотрудниковПоЗарплатнымПроектам.НомерЛицевогоСчета
	               |	КОНЕЦ КАК НомерЛицевогоСчета,
	               |	ВЫБОР
	               |		КОГДА ВТ_Кадр.КодВида = 1
	               |			ТОГДА ЛицевыеСчетаСотрудниковПоЗарплатнымПроектам.ЗарплатныйПроект.Банк
	               |		КОГДА ВТ_Кадр.КодВида = 2
	               |			ТОГДА ВТ_Кадр.МестоВыплатыСотр.Банк
	               |		КОГДА ВТ_Кадр.КодВида = 3
	               |			ТОГДА ВТ_Кадр.МестоВыплатыПодр.Банк
	               |		КОГДА ВТ_Кадр.КодВида = 4
	               |			ТОГДА ВТ_Кадр.МестоВыплатыОрг.Банк
	               |	КОНЕЦ КАК Банк,
	               |	ВЫБОР
	               |		КОГДА ВТ_Кадр.КодВида = 1
	               |			ТОГДА ЛицевыеСчетаСотрудниковПоЗарплатнымПроектам.ЗарплатныйПроект.Банк.Код
	               |		КОГДА ВТ_Кадр.КодВида = 2
	               |			ТОГДА ВТ_Кадр.МестоВыплатыСотр.Банк.Код
	               |		КОГДА ВТ_Кадр.КодВида = 3
	               |			ТОГДА ВТ_Кадр.МестоВыплатыПодр.Банк.Код
	               |		КОГДА ВТ_Кадр.КодВида = 4
	               |			ТОГДА ВТ_Кадр.МестоВыплатыОрг.Банк.Код
	               |	КОНЕЦ КАК БИК,
	               |	ВЫБОР
	               |		КОГДА ВТ_Кадр.КодВида = 1
	               |			ТОГДА ЛицевыеСчетаСотрудниковПоЗарплатнымПроектам.ЗарплатныйПроект.Банк.КоррСчет
	               |		КОГДА ВТ_Кадр.КодВида = 2
	               |			ТОГДА ВТ_Кадр.МестоВыплатыСотр.Банк.КоррСчет
	               |		КОГДА ВТ_Кадр.КодВида = 3
	               |			ТОГДА ВТ_Кадр.МестоВыплатыПодр.Банк.КоррСчет
	               |		КОГДА ВТ_Кадр.КодВида = 4
	               |			ТОГДА ВТ_Кадр.МестоВыплатыОрг.Банк.КоррСчет
	               |	КОНЕЦ КАК КоррСчет
	               |ИЗ
	               |	ВТ_Кадр КАК ВТ_Кадр
	               |		ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ЛицевыеСчетаСотрудниковПоЗарплатнымПроектам КАК ЛицевыеСчетаСотрудниковПоЗарплатнымПроектам
	               |		ПО ВТ_Кадр.Организация = ЛицевыеСчетаСотрудниковПоЗарплатнымПроектам.Организация
	               |			И ВТ_Кадр.ФизическоеЛицо = ЛицевыеСчетаСотрудниковПоЗарплатнымПроектам.ФизическоеЛицо
	               |			И (ВЫБОР
	               |				КОГДА ВТ_Кадр.КодВида = 1
	               |					ТОГДА ВТ_Кадр.МестоВыплатыСотр = ЛицевыеСчетаСотрудниковПоЗарплатнымПроектам.ЗарплатныйПроект
	               |				КОГДА ВТ_Кадр.КодВида = 3
	               |					ТОГДА ВТ_Кадр.МестоВыплатыПодр = ЛицевыеСчетаСотрудниковПоЗарплатнымПроектам.ЗарплатныйПроект
	               |				КОГДА ВТ_Кадр.КодВида = 4
	               |					ТОГДА ВТ_Кадр.МестоВыплатыОрг = ЛицевыеСчетаСотрудниковПоЗарплатнымПроектам.ЗарплатныйПроект
	               |			КОНЕЦ)";	
							
		ВыборкаСотрудники = Запрос.Выполнить().Выбрать();
			
		Пока ВыборкаСотрудники.Следующий() Цикл
		
			ВыборкаСотрудник = ВыборкаСотрудники.Выбрать(); 
				
				Пока ВыборкаСотрудник.Следующий() Цикл 			
					ОбластьМакета.Параметры.Заполнить(ВыборкаСотрудник);
					ОбластьМакета.Параметры.Сотрудник = ВыборкаСотрудник.Сотрудник;
					ОбластьМакета.Параметры.СотрудникКод = ВыборкаСотрудник.СотрудникКод; 	
				КонецЦикла; 
				
				ТабДокумент.Вывести(ОбластьМакета);
			
				
				Первый = Ложь; 
				
			КонецЦикла; 
			
			Возврат ТабДокумент;