Переделать запрос

[Antonio]

LexaK, antoneus, Попробовал оба варианта. Табличной части так же нету http://joxi.ru/1A5Nzl9cw8JZvr. Код в данный момент такой

Код Выделить Развернуть

Пока Выборка1.Следующий() Цикл
ТаблДокум = Новый ТабличныйДокумент;
ТаблДокум.ИмяПараметровПечати = "ПАРАМЕТРЫ_ПЕЧАТИ";

ОбластьШапка.Параметры.АдресСклада = Выборка1.АдресСклада;
ОбластьШапка.Параметры.ТелефонСклада = "Tel: " + Выборка1.ТелефонСклада;
ОбластьШапка.Параметры.НомерДокумента = Выборка1.Номер;
ОбластьШапка.Параметры.Контрагент = Выборка1.КонтрагентНаименование;
ОбластьШапка.Параметры.ДатаПечати = Формат(ТекущаяДата(), "ДФ=dd.MM.yyyy");
ТаблДокум.Вывести(ОбластьШапка);

ОбластьОрганизацияКонтрагент.Параметры.Контрагент = Выборка1.КонтрагентНаименование;
ОбластьОрганизацияКонтрагент.Параметры.АдресКонтрагента = Выборка1.АдресДоставки;
ОбластьОрганизацияКонтрагент.Параметры.ТелефонКонтрагента = "Tel: " + Выборка1.ТелефонКонтрагента;
    ОбластьОрганизацияКонтрагент.Параметры.АдресЭПКонтрагент =" E-Mail: " + Выборка1.АдресЭПКонтрагента;
ОбластьОрганизацияКонтрагент.Параметры.Организация = Выборка1.Организация;
ОбластьОрганизацияКонтрагент.Параметры.АдресОрганизации = Выборка1.АдресОрганизации;
ОбластьОрганизацияКонтрагент.Параметры.ТелефонОрганизации = "Tel: "+ Выборка1.ТелефонОрганизации;
ОбластьОрганизацияКонтрагент.Параметры.АдресЭПОрганизации ="E-Mail: " + Выборка1.АдресЭПОрганизации;
ТаблДокум.Вывести(ОбластьОрганизацияКонтрагент);

//СтруктураПоиска = Новый Структура("Ссылка", Выборка1.Ссылка);
//Выборка2.НайтиСледующий(СтруктураПоиска);
//
//СтрокиДокумента = Выборка2.Выбрать();
//
ТаблДокум.Вывести(ОбластьШапкаТабЧасти);
Пока Выборка2.НайтиСледующий(Выборка1.Ссылка, "Ссылка")Цикл

ОбластьДеталиТабЧасти.Параметры.Номенклатура = Выборка2.Номенклатура;
ОбластьДеталиТабЧасти.Параметры.Количество = Выборка2.Количество;
ОбластьДеталиТабЧасти.Параметры.Цена =  Выборка2.Цена;
ОбластьДеталиТабЧасти.Параметры.Сумма = Выборка2.Сумма;

ТаблДокум.Вывести(ОбластьДеталиТабЧасти);
ОбластьИтог.Параметры.Итоги = Выборка2.СуммаДокумента;
ОбластьИтог.Параметры.Валюта = Выборка2.Валюта;


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


ОбластьПодвал.Параметры.БИК = "BIC/SWIFT: " + Выборка1.БИК;
ОбластьПодвал.Параметры.БАН ="IBAN: " + Выборка1.IBAN;
ОбластьПодвал.Параметры.Банк=  "Bank: " + Выборка1.Банк;
ОбластьПодвал.Параметры.Город = "Address: " + Выборка1.Город;
    ТаблДокум.Вывести(ОбластьПодвал);

ТаблДокум.АвтоМасштаб = Истина;
ТаблДокум.ОриентацияСтраницы = ОриентацияСтраницы.Ландшафт;
ТаблДокум.ПолеСлева = 5;
ТаблДокум.ПолеСправа = 5;
ТаблДокум.ВывестиГоризонтальныйРазделительСтраниц();


    МассивТабДок.Добавить(ТаблДокум);

КонецЦикла;


Возврат МассивТабДок

[antoneus]

И что, вот так не работает?

Код Выделить Развернуть

СтруктураПоиска = Новый Структура("Ссылка", Выборка1.Ссылка);
Выборка2.НайтиСледующий(СтруктураПоиска);
СтрокиДокумента = Выборка2.Выбрать();
Пока СтрокиДокумента.Следующий() Цикл

[LexaK]

осталось подключить отладчик, поставьте точку остановки на строку
Пока Выборка2.НайтиСледующий(Выборка1.Ссылка, "Ссылка")Цикл

и запустите программу, далее по F10 пройдите по остальным строчкам кода, вообще в цикл заходит?

[Antonio]

antoneus, При данном варианте нет((. при

Код Выделить Развернуть

Пока Выборка2.НайтиСледующий(Выборка1.Ссылка, "Ссылка")Цикл стало печатать итог

[antoneus]

Ну все, я вызываю полицию пиши энидеск в личку или сюда.

[Antonio]

LexaK, да, заходит, перебирает все значения как в документе, как и должно быть поидее

[Antonio]

antoneus, в личку написал

[LexaK]

LexaK, да, заходит, перебирает все значения как в документе, как и должно быть поидее

просто удивительно как ОНО вообще работает, в вашем, приведенном коде, не видно как вы получили области
ОбластьДеталиТабЧасти
ОбластьИтог
(может, вы перед выполнением, код не сохраняете?)

[Antonio]

LexaK, Области просто за кадром остались, не копировал их. antoneus помог, табличная часть теперь печатается, щас разбираюсь как напечатать все документы, ибо только последний на печать идет

[antoneus]

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