Цикл в цикле

Вот вся функция печати:

ДопКолонка = Константы.ДополнительнаяКолонкаПечатныхФормДокументов.Получить();
    Если ДопКолонка = Перечисления.ДополнительнаяКолонкаПечатныхФормДокументов.Артикул Тогда
        ТоварКод = "Артикул";
    Иначе
        ТоварКод = "Код";
    КонецЕсли;


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

    Шапка = Запрос.Выполнить().Выбрать();
    Шапка.Следующий();

    Запрос = Новый Запрос;
    Запрос.УстановитьПараметр("ТекущийДокумент", СсылкаНаОбъект);

    Запрос.Текст =
    "ВЫБРАТЬ
    |    ПередачаМатериаловВЭксплуатацию.НомерСтроки КАК НомерПП,
    |    ПередачаМатериаловВЭксплуатацию.Номенклатура.Код КАК НоменклатурныйНомер,
    |    ВЫРАЗИТЬ(ПередачаМатериаловВЭксплуатацию.Номенклатура.НаименованиеПолное КАК СТРОКА(1000)) КАК ТоварНаименование,
    |    ПередачаМатериаловВЭксплуатацию.ХарактеристикаНоменклатуры КАК Характеристика,
    |    ПередачаМатериаловВЭксплуатацию.СерияНоменклатуры КАК Серия,
    |    ПередачаМатериаловВЭксплуатацию.Номенклатура.БазоваяЕдиницаИзмерения.Код КАК ЕдиницаИзмеренияКод,
    |    ПередачаМатериаловВЭксплуатацию.ЕдиницаИзмерения.Наименование КАК ЕдиницаИзмеренияНаименование,
    |    ПередачаМатериаловВЭксплуатацию.Количество КАК Количество,
    |    ПередачаМатериаловВЭксплуатацию.ФизЛицо КАК Сотрудник,
    |    ПередачаМатериаловВЭксплуатацию.ФизЛицо.Код КАК ТабельныйНомер,
    |    ПередачаМатериаловВЭксплуатацию.Ссылка.Дата КАК ДатаДокумента,
    |    ПередачаМатериаловВЭксплуатацию.НазначениеИспользования.СрокПолезногоИспользования КАК СрокСлужбы
    |ИЗ
    |    Документ.ПередачаМатериаловВЭксплуатацию.Материалы КАК ПередачаМатериаловВЭксплуатацию
    |ГДЕ
    |    ПередачаМатериаловВЭксплуатацию.Ссылка = &ТекущийДокумент
    |
    |УПОРЯДОЧИТЬ ПО
    |    НомерПП";


    ТекстЗапроса_Материалы =
    "ВЫБРАТЬ
    |    ПередачаМатериаловВЭксплуатацию.Номенклатура                                                  КАК Номенклатура,
    |    ВЫРАЗИТЬ(ПередачаМатериаловВЭксплуатацию.Номенклатура.НаименованиеПолное КАК Строка(1000))     КАК ТоварНаименование,
    |    ПередачаМатериаловВЭксплуатацию.Номенклатура." + ТоварКод + "                                 КАК НоменклатурныйНомер,
    |    ПередачаМатериаловВЭксплуатацию.ЕдиницаИзмерения.Представление                                КАК ЕдиницаИзмеренияНаименование,
    |    ПередачаМатериаловВЭксплуатацию.ЕдиницаИзмерения.ЕдиницаПоКлассификатору.Код                  КАК ЕдиницаИзмеренияКод,
    |    ПередачаМатериаловВЭксплуатацию.Характеристика                                                КАК Характеристика,
    |    ПередачаМатериаловВЭксплуатацию.Серия                                                         КАК Серия,
    |    ПередачаМатериаловВЭксплуатацию.Количество                                                    КАК Количество,
    |    ПередачаМатериаловВЭксплуатацию.Счет                                                          КАК Счет,
    |    ПередачаМатериаловВЭксплуатацию.НомерСтроки                                                   КАК НомерСтроки,
    |    ВЫРАЗИТЬ(
    |        ЕСТЬNULL(ТаблицаСебестоимостиОбороты.Стоимость, 0)
    |        * ПередачаМатериаловВЭксплуатацию.Количество
    |        * ПередачаМатериаловВЭксплуатацию.Коэффициент
    |        / ЕСТЬNULL(ПередачаМатериаловВЭксплуатацию.Номенклатура.ЕдиницаХраненияОстатков.Коэффициент, 1)
    |        / ЕСТЬNULL(ТаблицаСебестоимостиОбороты.Количество, 1)
    |     КАК ЧИСЛО(15,2))                                                                             КАК Сумма
    |ИЗ
    |    (
    |    ВЫБРАТЬ
    |        Номенклатура                 КАК Номенклатура,
    |        ЕдиницаИзмерения             КАК ЕдиницаИзмерения,
    |        Коэффициент                 КАК Коэффициент,
    |        СчетУчетаБУ                 КАК Счет,
    |        ХарактеристикаНоменклатуры    КАК Характеристика,
    |        СерияНоменклатуры           КАК Серия,
    |        СУММА(Количество)           КАК Количество,
    |        МИНИМУМ(НомерСтроки)         КАК НомерСтроки
    |    ИЗ
    |        Документ.ПередачаМатериаловВЭксплуатацию.Материалы КАК ПередачаМатериаловВЭксплуатацию
    |    ГДЕ
    |        ПередачаМатериаловВЭксплуатацию.Ссылка = &ТекущийДокумент
    |
    |    СГРУППИРОВАТЬ ПО
    |        Номенклатура,
    |        ЕдиницаИзмерения,
    |        Коэффициент,
    |        СчетУчетаБУ,
    |        ХарактеристикаНоменклатуры,
    |        СерияНоменклатуры
    |    ) КАК ПередачаМатериаловВЭксплуатацию
    |
    |    ЛЕВОЕ СОЕДИНЕНИЕ
    |        ТаблицаСебестоимостиОбороты КАК ТаблицаСебестоимостиОбороты
    |        ПО ПередачаМатериаловВЭксплуатацию.Номенклатура = ТаблицаСебестоимостиОбороты.Номенклатура
    |            И ТаблицаСебестоимостиОбороты.Регистратор = &Регистратор
    |            И ((ПередачаМатериаловВЭксплуатацию.Характеристика = ТаблицаСебестоимостиОбороты.ХарактеристикаНоменклатуры)
    |                ИЛИ (ТаблицаСебестоимостиОбороты.ХарактеристикаНоменклатуры = ""Не используется""))
    |            И ((ПередачаМатериаловВЭксплуатацию.Серия = ТаблицаСебестоимостиОбороты.СерияНоменклатуры)
    |                ИЛИ (ТаблицаСебестоимостиОбороты.СерияНоменклатуры = ""Не используется""))
    |            И ((ПередачаМатериаловВЭксплуатацию.Счет = ТаблицаСебестоимостиОбороты.СчетУчета)
    |                ИЛИ (ТаблицаСебестоимостиОбороты.СчетУчета = ""Не используется""))
    |
    |УПОРЯДОЧИТЬ ПО
    |    НомерСтроки";

    СтруктраПараметров = Новый Структура;
    СтруктраПараметров.Вставить("ТекущийДокумент",     СсылкаНаОбъект);
    СтруктраПараметров.Вставить("Регистратор",         СсылкаНаОбъект);
    СтруктраПараметров.Вставить("НачГраница",         Новый Граница(СсылкаНаОбъект.Дата, ВидГраницы.Включая));

    ТаблицаЗатрат = УправлениеЗапасами.ПолучитьТаблицуЗатратДляПечатиИЗаполненияДокументов(СсылкаНаОбъект, ТекстЗапроса_Материалы, СтруктраПараметров);

    ЗапросПоНоменклатуре = Запрос.Выполнить();

    ТабДокумент = Новый ТабличныйДокумент;
    ТабДокумент.ИмяПараметровПечати = "ПАРАМЕТРЫ_ПЕЧАТИ_ПередачаМатериаловВЭксплуатацию_МБ7";

    // Вывод заголовка
    Макет = ПолучитьМакет("МБ7");
    Область = Макет.ПолучитьОбласть("Заголовок");
    Область.Параметры.Заполнить(Шапка);

    СведенияОбОрганизации = УправлениеКонтактнойИнформацией.СведенияОЮрФизЛице(Шапка.Организация, Шапка.ДатаДокумента);

    Область.Параметры.ПредставлениеОрганизации = ФормированиеПечатныхФорм.ОписаниеОрганизации(СведенияОбОрганизации);
    Область.Параметры.ПредставлениеПодразделения = Шапка.Подразделение;
    Область.Параметры.ОрганизацияПоОКПО = СведенияОбОрганизации.КодПоОКПО;

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

    ТабДокумент.Вывести(Область);

    ВыборкаПоСтрокам = ЗапросПоНоменклатуре.Выбрать();

    Пока ВыборкаПоСтрокам.Следующий() Цикл

        Область = Макет.ПолучитьОбласть("Строка");
        Область.Параметры.Заполнить(ВыборкаПоСтрокам);

        ТабНомер = СоответствиеТабНомеров[ВыборкаПоСтрокам.Сотрудник];
        Если НЕ ПустаяСтрока(ТабНомер) Тогда
            Область.Параметры.ТабельныйНомер = ТабНомер;
        КонецЕсли;
        Область.Параметры.ТоварНаименование = СокрЛП(ВыборкаПоСтрокам.ТоварНаименование);
        Для Каждого Табстрок Из ТаблицаЗатрат Цикл
            Область.Параметры.Цена = ?(Табстрок.Количество = 0, Табстрок.Сумма, Окр(Табстрок.Сумма / Табстрок.Количество, 2));
        КонецЦикла;
        Область.Параметры.Сумма = Область.Параметры.Цена*Область.Параметры.Количество;
        ТабДокумент.Вывести(Область);
    КонецЦикла;

    Область = Макет.ПолучитьОбласть("Подписи");

    Область.Параметры.ФИОПолучателя = ОбщегоНазначения.ФамилияИнициалыФизЛица(ПрочитатьОтветственноеЛицо(СсылкаНаОбъект.Подразделение));
    Область.Параметры.Должность = ПолныеПрава.СведенияОСотруднике(ПрочитатьОтветственноеЛицо(СсылкаНаОбъект.Подразделение), СсылкаНаОбъект.Дата, СсылкаНаОбъект.Организация).Должность;