Код
Запрос = Новый Запрос;
Запрос.УстановитьПараметр("ДатаНач" , ДатаНач);
Запрос.УстановитьПараметр("ДатаКон" , ДатаКон);
Запрос.Текст =
"ВЫБРАТЬ
| ВыпускПродукцииБухгалтерскийУчет.Продукция.Наименование КАК ПродукцияНаименование,
| СУММА(ВыпускПродукцииБухгалтерскийУчет.Количество) КАК Количество,
| NULL КАК КонтрагентНаименование,
| NULL КАК Стоимость,
| NULL КАК Количество1
|ИЗ
| РегистрНакопления.ВыпускПродукцииБухгалтерскийУчет КАК ВыпускПродукцииБухгалтерскийУчет
|ГДЕ
| ВыпускПродукцииБухгалтерскийУчет.Период МЕЖДУ &ДатаНач И &ДатаКон
|
|СГРУППИРОВАТЬ ПО
| ВыпускПродукцииБухгалтерскийУчет.Продукция.Наименование
|
|ОБЪЕДИНИТЬ ВСЕ
|
|ВЫБРАТЬ
| Продажи.Номенклатура.Наименование,
| NULL,
| Продажи.Контрагент.Наименование,
| СУММА(Продажи.Стоимость),
| СУММА(Продажи.Количество)
|ИЗ
| РегистрНакопления.Продажи КАК Продажи
|ГДЕ
| Продажи.Период МЕЖДУ &ДатаНач И &ДатаКон
|
|СГРУППИРОВАТЬ ПО
| Продажи.Номенклатура.Наименование,
| Продажи.Контрагент.Наименование
|
|УПОРЯДОЧИТЬ ПО
| ПродукцияНаименование,
| Количество,
| КонтрагентНаименование,
| Стоимость,
| Количество1
|ИТОГИ
| СУММА(Количество),
| СУММА(Стоимость),
| СУММА(Количество1)
|ПО
| ОБЩИЕ,
| ПродукцияНаименование,
| КонтрагентНаименование";
Результат = Запрос.Выполнить().Выбрать();
ТабДок = Новый ТабличныйДокумент;
СозданныйСписок = Новый СписокЗначений;
Макет = ПолучитьМакет("Макет");
Шапка = Макет.ПолучитьОбласть("Шапка");
Строка = Макет.ПолучитьОбласть("Строка");
ТабДок.Очистить();
ТабДок.Вывести(Шапка);
Пока Результат.Следующий() Цикл
Строка.Параметры.ПродукцияНаименование = Результат.ПродукцияНаименование;
ТабДок.Вывести(Строка);
КонецЦикла;
ТабДок.Автомасштаб = Истина;
ТабДок.ОриентацияСтраницы = ОриентацияСтраницы.Ландшафт;
ТабДок.ТолькоПросмотр = Истина;
ТабДок.Показать();
Запрос.УстановитьПараметр("ДатаНач" , ДатаНач);
Запрос.УстановитьПараметр("ДатаКон" , ДатаКон);
Запрос.Текст =
"ВЫБРАТЬ
| ВыпускПродукцииБухгалтерскийУчет.Продукция.Наименование КАК ПродукцияНаименование,
| СУММА(ВыпускПродукцииБухгалтерскийУчет.Количество) КАК Количество,
| NULL КАК КонтрагентНаименование,
| NULL КАК Стоимость,
| NULL КАК Количество1
|ИЗ
| РегистрНакопления.ВыпускПродукцииБухгалтерскийУчет КАК ВыпускПродукцииБухгалтерскийУчет
|ГДЕ
| ВыпускПродукцииБухгалтерскийУчет.Период МЕЖДУ &ДатаНач И &ДатаКон
|
|СГРУППИРОВАТЬ ПО
| ВыпускПродукцииБухгалтерскийУчет.Продукция.Наименование
|
|ОБЪЕДИНИТЬ ВСЕ
|
|ВЫБРАТЬ
| Продажи.Номенклатура.Наименование,
| NULL,
| Продажи.Контрагент.Наименование,
| СУММА(Продажи.Стоимость),
| СУММА(Продажи.Количество)
|ИЗ
| РегистрНакопления.Продажи КАК Продажи
|ГДЕ
| Продажи.Период МЕЖДУ &ДатаНач И &ДатаКон
|
|СГРУППИРОВАТЬ ПО
| Продажи.Номенклатура.Наименование,
| Продажи.Контрагент.Наименование
|
|УПОРЯДОЧИТЬ ПО
| ПродукцияНаименование,
| Количество,
| КонтрагентНаименование,
| Стоимость,
| Количество1
|ИТОГИ
| СУММА(Количество),
| СУММА(Стоимость),
| СУММА(Количество1)
|ПО
| ОБЩИЕ,
| ПродукцияНаименование,
| КонтрагентНаименование";
Результат = Запрос.Выполнить().Выбрать();
ТабДок = Новый ТабличныйДокумент;
СозданныйСписок = Новый СписокЗначений;
Макет = ПолучитьМакет("Макет");
Шапка = Макет.ПолучитьОбласть("Шапка");
Строка = Макет.ПолучитьОбласть("Строка");
ТабДок.Очистить();
ТабДок.Вывести(Шапка);
Пока Результат.Следующий() Цикл
Строка.Параметры.ПродукцияНаименование = Результат.ПродукцияНаименование;
ТабДок.Вывести(Строка);
КонецЦикла;
ТабДок.Автомасштаб = Истина;
ТабДок.ОриентацияСтраницы = ОриентацияСтраницы.Ландшафт;
ТабДок.ТолькоПросмотр = Истина;
ТабДок.Показать();
в отчете троит строку , понимаю , что это из-за трех группировок , но как исправить не знаю
Используйте тэг [CODE]