|
v7: Не отображать суммирование | ☑ | ||
---|---|---|---|---|
0
aleksander1sk
03.09.15
✎
15:36
|
Есть обработка:
//******************************************* // Процедура генерации запроса Сформировать. // Процедура ОбработкаПодбора(Эл, Конт) Если Эл.Вид() = "дТовары" Тогда Если спТовары.Принадлежит(Эл.ТекущийЭлемент()) = 0 Тогда спТовары.ДобавитьЗначение(Эл.ТекущийЭлемент(), ?(Эл.ЭтоГруппа() = 1, ВРег(Эл.Наименование), Эл.Наименование)); КонецЕсли; КонецЕсли; КонецПроцедуры Процедура ДобавитьТовар() Перем Конт; ОткрытьПодбор("Справочник.дТовары", "ФормаСписка", Конт, 1); Конт.ВыборГруппы(1); КонецПроцедуры Процедура Сформировать() Перем Запрос, ТекстЗапроса, Таб; // сз = СоздатьОбъект("СписокЗначений"); //спр = СоздатьОбъект("Справочник.дТовары"); //спр.НайтиПоКоду("9906"); //сз.ДобавитьЗначение(спр.текущийЭлемент()); сз2 = СоздатьОбъект("СписокЗначений"); спр = СоздатьОбъект("Справочник.дПунктыДоставки"); спр.НайтиПоКоду("0002927-01"); сз2.ДобавитьЗначение(спр.текущийЭлемент()); //Создание объекта типа Запрос Запрос = СоздатьОбъект("Запрос"); ТекстЗапроса = "//{{ЗАПРОС(Сформировать) |Период с ВыбНачПериода по ВыбКонПериода; |Обрабатывать НеПомеченныеНаУдаление; |Продажи = Регистр.Продажи.Товар; |ТочкаДоставки = Регистр.Продажи.ТекущийДокумент.дкРасходнаяНакладная.рПунктДоставки; |Сумма = Регистр.Продажи.Сумма; |ТП = Регистр.Продажи.ТП; |Товар = Регистр.Продажи.Товар; |дкРасходнаяНакладная = Регистр.Продажи.ТекущийДокумент.дкРасходнаяНакладная.ТекущийДокумент; |Клиент = Регистр.Продажи.ТекущийДокумент.дкРасходнаяНакладная.рКлиент; |Функция СуммаСумма = Сумма(Сумма); |Функция Счётчик = Счётчик(дкРасходнаяНакладная); |Группировка ТП; |Группировка Клиент без групп; |Группировка дкРасходнаяНакладная упорядочить по дкРасходнаяНакладная.рПунктДоставки без групп; // |Группировка Продажи1 по дкРасходнаяНакладная.рПунктДоставки; |Условие(ТП в ВыбТП); |Условие(Товар в спТовары); |Условие(НЕ(ТочкаДоставки в сз2)); |"//}}ЗАПРОС ; // Если ошибка в запросе, то выход из процедуры Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда Возврат; КонецЕсли; // Подготовка к заполнению выходных форм данными запроса Таб = СоздатьОбъект("Таблица"); Таб.ИсходнаяТаблица("Сформировать"); // Заполнение полей "Заголовок" Таб.ВывестиСекцию("Заголовок"); Состояние("Заполнение выходной таблицы..."); Таб.Опции(0, 0, Таб.ВысотаТаблицы(), 0); ДДО = 0; Пока Запрос.Группировка(1) = 1 Цикл // Заполнение полей ТП Таб.ВывестиСекцию("ТП"); Пока Запрос.Группировка(2) = 1 Цикл // Заполнение полей дкРасходнаяНакладная Таб.ВывестиСекцию("дкРасходнаяНакладная"); Пока Запрос.Группировка(3) = 1 Цикл // Заполнение полей дкРасходнаяНакладная Таб.ВывестиСекцию("дкРасходнаяНакладная"); ДДО = ДДО+1; КонецЦикла; КонецЦикла; ДДО = ДДО + 1; КонецЦикла; // Заполнение полей "Итого" Таб.ВывестиСекцию("Итого"); // Вывод заполненной формы Таб.ТолькоПросмотр(1); Таб.Показать("Сформировать", ""); КонецПроцедуры В таблице отображается: Воловик Володимир Вощина***** О. В. п\п 493,19 Воловик Володимир Вощина***** О. В. п\п Магазин "Рос"-побутова хімія 182,32 Воловик Володимир Вощина***** О. В. п\п Магазин "Рос"-побутова хімія 148,54 Воловик Володимир Вощина***** О. В. п\п Магазин "Рос"-побутова хімія 162,33 Как сделать так, чтобы суммирующей строки не было: Воловик Володимир Вощина***** О. В. п\п 493,19 |
|||
1
lubitelxml
03.09.15
✎
16:31
|
Таб.ВывестиСекцию("ТП"); - убери и первую группировку выводить не будет
|
|||
2
lubitelxml
03.09.15
✎
16:32
|
Пока Запрос.Группировка(1) = 1 Цикл
// Заполнение полей ТП Пока Запрос.Группировка(2) = 1 Цикл |
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |