вывод прайса в две колонки

[tema111]

у меня есть макет. в нем таблица из двух колонок: Номенклатура и Цена.
как можно вывести эту таблицу в двух колонках?

то есть так :
Товар1 Цена1                       Товар4 Цена4
Товар2 Цена2                       Товар5 Цена5
Товар3 Цена3                       Товар6 Цена6

[LexaK]

можно в макете сделать два набора колонок и выводить прайс так
Товар1 Цена1   Товар2 Цена2
Товар3 Цена3   Товар4 Цена4
Товар5 Цена5

[tema111]

а как заполнять программно-то?

[LexaK]

??? да вроде все просто как
в строке макета добавляете (копируете) колонки Товар2 и Цена2
в программе вывода, что-то вроде:
...
Пока Выборка.Следующий() цикл
//первая колонка
СтрокаМакета.Параметры.Товар = Выборка.Товар;
СтрокаМакета.Параметры.Цена= Выборка.Цена;
Если Выборка.Следующий() Тогда
   СтрокаМакета.Параметры.Товар2 = Выборка.Товар;
   СтрокаМакета.Параметры.Цена2= Выборка.Цена;
Иначе
   СтрокаМакета.Параметры.Товар2 = "";
   СтрокаМакета.Параметры.Цена2= "";
КонецЕсли;
ТабДокумент.Вывести(СтрокаМакета);
КонецЦикла;
...

[LexaK]

??? да вроде все просто как
в строке макета добавляете (копируете) колонки Товар2 и Цена2
в программе вывода, что-то вроде:
...
Пока Выборка.Следующий() цикл

//первая колонка
СтрокаМакета.Параметры.Товар = Выборка.Товар;
СтрокаМакета.Параметры.Цена= Выборка.Цена;

//вторая колонка
Если Выборка.Следующий() Тогда
   СтрокаМакета.Параметры.Товар2 = Выборка.Товар;
   СтрокаМакета.Параметры.Цена2= Выборка.Цена;
Иначе
   СтрокаМакета.Параметры.Товар2 = "";
   СтрокаМакета.Параметры.Цена2= "";
КонецЕсли;

ТабДокумент.Вывести(СтрокаМакета);

КонецЦикла;
...

[СветланаCC]

Либо сделать  - сначала вывести область товар+цена, затем присоединить эту же область, потом опять вы вести, потом присоединить, будет тот же эффект)

[tema111]

при таком коде вообще ничего не выводит=(

[СветланаCC]

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

// Вставить содержимое обработчика.
Запрос = Новый запрос;
Запрос.Текст =

//Какой-то запрос.........

Выборка = Запрос.Выполнить().Выбрать();


Таб = Новый ТабличныйДокумент;
Макет = ПолучитьМакет("Макет");
Счетчик =1;
Пока Выборка.Следующий() цикл
СтрокаМакета  = Макет.ПолучитьОбласть("Строка|ТоварЦена");
СтрокаМакета.Параметры.Товар = Выборка.Товар;
СтрокаМакета.Параметры.Цена= Выборка.Цена;
Если Счетчик = 1 Тогда //первая колонка
ТабДокумент.Вывести(СтрокаМакета);
Счетчик = 2;
Иначе
СтрокаПустая  = Макет.ПолучитьОбласть("Строка|Пустая");
ТабДокумент.Вывести(СтрокаПустая);
ТабДокумент.Присоединить(СтрокаМакета);
КонецЕсли;
КонецЦикла;



[СветланаCC]

 вот фото макета

[СветланаCC]

простите чуть спутала - вместо

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


            СтрокаПустая  = Макет.ПолучитьОбласть("Строка|Пустая");
            ТабДокумент.Вывести(СтрокаПустая);

вставить

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

СтрокаПустая  = Макет.ПолучитьОбласть("Строка|Пустая");
          ТабДокумент.Присоединить(СтрокаПустая);