Ребят всем доброго дня!есть вопрос по поводу вывода данных из документа,табличной части документа в макет для печати!
в чем собственно трудность!при выводе макета накладная должна идти на каждую позицию отдельная!т.е. не список а на каждую строку тч одельная карточка!
подскажите пожалуйста как это отразить ввиде кода!
именно этот вот момент!
конфа Управление производственным предприятием, редакция 1.3 (1.3.111.1)
---
Ошибка в наличие цикла в цикле.
Вместо

```1c
    Для Каждого ТекСтрокаТаблица Из ТаблицаВыполнения Цикл
    ОбластьТаблица.Параметры.Заполнить(ТекСтрокаТаблица);
    КонецЦикла;
```

Напишите:

```1c
    ОбластьТаблица.Параметры.Заполнить(стр);
```
---
Ну рисуешь макет, заполняешь шапку и дальше делаешь обход таблицы.

```1c
    ОбластьШапка = Заполняем();

    Для каждого стр из ТабличнаяЧасть Цикл
    ТабДок.Вывести(ОбластьШапка);
    ОбластьСТрока = Заполняем();
    ТабДок.Вывести(ОбластьСтрока);
    КонецЦикла;
```
---
это понятно!
дело не в этом!Взять скрин кторый я выкинул для примера,там в тч 7 строк!
у меня в макете должно получиться 7 карточек! а если я просто заполню там в одной карточке будет сразу 7 строк!
---
нужно использовать одну стр для одной карточки!следущая стр след карточка
---
На новой странице что ли?
---
вот сморти я скинул 2 скриншота,который второй смотри его!скажем есть лист а4!и на нем помещается ну скажем к примеру 9 карточек! если смотреть что 7 строк у нас в документе заполнены,следует что 7 карточек должны быть заполнены! данные 1 стр = 1 карточки!
---
по выходу должен получиться лист а4,который разрезается на 9 карточек!
---
Ну так бы и написал, нужно вывести на один лист, максимум 9 карточек.
Алгоритм аналогичный, только не всегда выводим, а присоединяем.

```1c
    ОбластьШапка = Заполняем();

    Сч1 = 1;
    Для каждого стр из ТабличнаяЧасть Цикл
    Если Сч1 <= 3 Тогда
    ТабДок.Присоеденить(ОбластьШапка);
    ОбластьСТрока = Заполняем();
    ТабДок.Присоеденить(ОбластьСтрока);

    Иначе
    ТабДок.Вывести(ОбластьШапка);
    ОбластьСТрока = Заполняем();
    ТабДок.Вывести(ОбластьСтрока);
    КонецЕсли;
    Сч1 = Сч1 + 1;
    Если Сч1 = 4 Тогда
    Сч1 = 1;
    КонецЕсли;

    КонецЦикла;
```
---
Метод объекта не обнаружен (Присоеденить)
---
ПрисоедИнить
---
А вы не копируйте тупо, а вдумчиво перепишите, о печатался и правильно выше подсказали. :-)
---
код получился следующий,вы уж извите за бестакность я на стадии обучения, результат кода
6строк в тч документа, 6 накладных
но заполнены все 6 из последней стр тч документа..

```1c
    Процедура Печать(Элемент)

    ТабДок = Новый ТабличныйДокумент;

    Макет = Документы.МеханическийУчасток.ПолучитьМакет("Макет");
    ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок");
    ОбластьШапка = Макет.ПолучитьОбласть("Шапка");
    ОбластьТаблица = Макет.ПолучитьОбласть("Таблица");
    ОбластьПодвал = Макет.ПолучитьОбласть("Подвал");

    Сч1 = 1;
    Для каждого стр из ТаблицаВыполнения Цикл
    Если Сч1 <= 3 Тогда
    ТабДок.Присоединить(ОбластьЗаголовок);
    ТабДок.Присоединить(ОбластьШапка);
    Для Каждого ТекСтрокаТаблица Из ТаблицаВыполнения Цикл
    ОбластьТаблица.Параметры.Заполнить(ТекСтрокаТаблица);
    КонецЦикла;
    ТабДок.Присоединить(ОбластьТаблица);
    ТабДок.Присоединить(ОбластьПодвал);

    Иначе
    ТабДок.Вывести(ОбластьЗаголовок);
    ТабДок.Вывести(ОбластьШапка);

    Для Каждого ТекСтрокаТаблица Из ТаблицаВыполнения Цикл
    ОбластьТаблица.Параметры.Заполнить(ТекСтрокаТаблица);
    КонецЦикла;
    ТабДок.Вывести(ОбластьТаблица);
    ТабДок.Вывести(ОбластьПодвал);
    КонецЕсли;
    Сч1 = Сч1 + 1;
    Если Сч1 = 4 Тогда
    Сч1 = 1;
    КонецЕсли;
    КонецЦикла;

    ТабДок.ОтображатьСетку = Ложь;
    ТабДок.Защита = Ложь;
    ТабДок.ТолькоПросмотр = Ложь;
    ТабДок.ОтображатьЗаголовки = Ложь;
    ТабДок.Показать();

    КонецПроцедуры
```
---
Ошибка в наличие цикла в цикле.
Вместо

```1c
    Для Каждого ТекСтрокаТаблица Из ТаблицаВыполнения Цикл
    ОбластьТаблица.Параметры.Заполнить(ТекСтрокаТаблица);
    КонецЦикла;
```

Напишите:

```1c
    ОбластьТаблица.Параметры.Заполнить(стр);
```
---
спасибо сейчас попробую
---
к сожалению не помогло,все тоже самое..
---
Сорян не то маленько сделал,сейчас попытка 2!)
---
Да помогло!)спасибо!)
но остались еще 2 параметра которые остались пустыми..

Номер = Параметру "ДецимальныйНомер"
Изделие = Параметру "ПринадлежностьКТипу"
---
Так заполните их, у вас имена реквизитов в строке и в макете параметра разные, поэтому и не заполняется.
Пишите так
Область.Параметры.ИмяПараметра = НужноеЗначение;