Что делаю не так?  

Запрос.Текст = ТребованиеНакладнаяТекстЗапросаШапки1();    
    Шапка = Запрос.Выполнить().Выбрать();             
    Макет = ПолучитьМакет("Макет");     
    Пока Шапка.Следующий() Цикл             
        Область = Макет.ПолучитьОбласть("ТЧ");
        Счетчик = 0;
        Для каждого Стр из Шапка.Материалы Цикл
            Область.Параметры.Товар     = Стр.Материалы.Номенклатура;
            Область.Параметры.Кол         = Стр.Материалы.Количество;
            Область.Параметры.Ном        =Счетчик + 1;
            ТабДокумент.Вывести(Область);
            
        КонецЦикла;            
    КонецЦикла;            
    Возврат ТабДокумент;


Часть текста печатной формы на управляемом приложении.

(0) не нравится вот эта строчка:
Для каждого Стр из Шапка.Материалы Цикл

хотя бы мысль есть?
Может здесь нужно использовать совсем другой тип кода?

нашел, надо было так сделать:
ТаблицаМатериалов = Шапка.Материалы.Выгрузить();
        Для Каждого Стр Из ТаблицаМатериалов Цикл
            Область.Параметры.Товар     = Стр.Номенклатура;

хня какая-то....

(1) Тебе не нравится?