Объединение строк

1. Nata_GND 14.03.17 21:36 Сейчас в теме
Добрый вечер!
Подскажите как можно объединить строки как на второй картинке. пока получается как на первой.

Запрос такой

ТабДок = ЭлементыФормы.ТабДок;
Макет = ПолучитьМакет("Макет");
	
ОбластьШапка            = Макет.ПолучитьОбласть("Шапка");
ОбластьДанные 			= Макет.ПолучитьОбласть("Данные");
ОбластьПодвал           = Макет.ПолучитьОбласть("Подвал");
ТабДок.Очистить();


ОбластьШапка.Параметры.НачалоПериода = НачПериода;
ОбластьШапка.Параметры.КонецПериода = КонПериода;

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

ЗапросПоставщик = новый Запрос;
ДатаНач = НачалоМесяца(НачПериода);
ДатаКон  = КонецМесяца(КонПериода);

НачалоПериода = Новый Граница(НачалоДня(ДатаНач), ВидГраницы.Включая);
КонецПериода  = Новый Граница(КонецДня(ДатаКон), ВидГраницы.Включая);
КонецПрошлогоПериода  = Новый Граница((НачалоДня(ДатаНач) - 1), ВидГраницы.Включая);

ЗапросПоставщик.УстановитьПараметр("НачалоПериода", НачалоПериода);
ЗапросПоставщик.УстановитьПараметр("КонецПериода",  КонецПериода);

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



Пока ВыборкаЗапросПоставщик1.Следующий() Цикл
	ОбластьСсылка=Макет.ПолучитьОбласть("Данные");
	ОбластьСсылка.Параметры.НомерСчета = ВыборкаЗапросПоставщик1.НомерСчета;
	ОбластьСсылка.Параметры.Дата = ВыборкаЗапросПоставщик1.Дата;
	ОбластьСсылка.Параметры.Контрагент = ВыборкаЗапросПоставщик1.Контрагент;
	ОбластьСсылка.Параметры.ДатаПоступления = ВыборкаЗапросПоставщик1.ДатаПоступления;
	ОбластьСсылка.Параметры.Примечание = ВыборкаЗапросПоставщик1.Примечание;
	ТабДок.Вывести(ОбластьСсылка, ВыборкаЗапросПоставщик1.Уровень());
	ВыборкаЗапросПоставщик2 = ВыборкаЗапросПоставщик1.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкамСИерархией); // ур товаров
	Присоеденить(
	Пока ВыборкаЗапросПоставщик2.Следующий() Цикл
		ОбластьСсылка=Макет.ПолучитьОбласть("Данные");
		ОбластьСсылка.Параметры.НоменклатураКоличество = Строка(ВыборкаЗапросПоставщик2.Номенклатура) + " (" + Строка(ВыборкаЗапросПоставщик2.Количество) + Строка(ВыборкаЗапросПоставщик2.ЕдИзм) + " )";
		ОбластьСсылка.Параметры.Сумма = ВыборкаЗапросПоставщик2.Сумма;	
		ТабДок.Вывести(ОбластьСсылка, ВыборкаЗапросПоставщик2.Уровень());
		
	КонецЦикла;
	
	
	ТабДок.ЗакончитьАвтогруппировкуСтрок();
	
	ТабДок.Показать();
	
КонецЦикла;
Показать
Прикрепленные файлы:
По теме из базы знаний
Ответы
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
2. Xershi 1496 14.03.17 21:53 Сейчас в теме
(1) итоги убрать. Консоль запроса поставь раз. Пройди курс по запросам на ютубе два. вопросы такие перестанешь задавать. Удачи!
Оставьте свое сообщение

Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот