Кто-нибудь подскажет почему запрос ничего не выводит?

Процедура КнопкаВыполнитьНажатие(Кн� �пка)

ТИР = СсылкаНаОбъект.ДокументОс� �ование.СсылкаАктивныйДоку мент;
Если ЗначениеЗаполнено(ТИР) И ТипЗнч(Тир) = Тип("ДокументСсылка.TIR") Тогда
Заявка = ТИР.ЗаявкиНаПеревозку[0].ЗаявкаНаПеревозку.СсылкаА ктивныйДокумент;

Иначе Заявка = СсылкаНаОбъект.ДокументОс� �ование;


КонецЕсли;



Таб = Новый ТабличныйДокумент;
Макет = ПолучитьМакет("Макет");
Таб.ИмяПараметровПечати = "ПАРАМЕТРЫ_ПЕЧАТИ_Письмо" ;
ОбластьШапки = Макет.ПолучитьОбласть("Шап� �а");
ОбластьШапки.Параметры.Дат аПисьма = Формат(СсылкаНаОбъект.Дата ,"ДЛФ=ДД");
ОбластьШапки.Параметры.Дат аПП = СсылкаНаОбъект.ДатаПП;
ОбластьШапки.Параметры.Дат аЧек = СсылкаНаОбъект.ДатаЧек;
ОбластьШапки.Параметры.Ном ерЧек = СсылкаНаОбъект.НомерЧек;
ОбластьШапки.Параметры.Ном ерПП = СсылкаНаОбъект.НомерПП;
ОбластьШапки.Параметры.Кон трагент = СсылкаНаОбъект.Контрагент. ОсновноеЮрФизЛицо.Наимено� �ание;
ОбластьШапки.Параметры.Сум маДокумента = СсылкаНаОбъект.СуммаДокум� �нта;
ОбластьШапки.Параметры.Дог оворЗаявка = Заявка.Договор;
ОбластьШапки.Параметры.Кон трагентЗаявка = Заявка.Контрагент.Основное ЮрФизЛицо.НаименованиеПол� �ое;
//ОбластьШапки.Параметры.ГТД = ГТД;
ОбластьШапки.Параметры.Ном ерЗаявка = Заявка.НомерНачала;


Запрос = Новый Запрос;
Запрос.УстановитьПараметр( "НомерНачала", СсылкаНаОбъект.НомерНачал� �);
Запрос.Текст = "ВЫБРАТЬ
| ЗаявкаНаПеревозку.Специфи� �ацияГруза.(
| ГТД.Представление
| ) КАК ГТДКод
|ИЗ
| Документ.ЗаявкаНаПеревозк� � КАК ЗаявкаНаПеревозку
|ГДЕ
| ЗаявкаНаПеревозку.Активны� �Документ = ИСТИНА
| И ЗаявкаНаПеревозку.Затраты� �оЗаявке.АктОказаныхНамУсл уг.НомерНачала = &НомерНачала";

РезультатЗапроса = Запрос.Выполнить();
Выборка = РезультатЗапроса.Выбрать();
Пока Выборка.Следующий() Цикл
ОбластьШапки = Макет.ПолучитьОбласть("Шап� �а");
// заполнение параметров строки отчета
ОбластьШапки.Параметры.ГТД = Выборка.ГТДКод;
Сообщить = Выборка.ГТДКод;

КонецЦикла;




Таб.Вывести(ОбластьШапки);
Таб.ОтображатьСетку = Ложь;
Таб.ОтображатьЗаголовки = Ложь;

Таб.Показать();

ФормаПросмотр = ПолучитьФорму("ФормаПросмо тр");
ФормаПросмотр.ЭлементыФор� �ы.Отчет.Очистить();
ФормаПросмотр.ЭлементыФор� �ы.Отчет.Вывести(Таб);
ФормаПросмотр.Открыть();

Закрыть();

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