8.х Как вывести итог по позиции в печатной форме?

Тема в разделе "Конфигурирование на платформе "1С:Предприятие 8"", создана пользователем Hr0n, 23 авг 2009.

  1. TopicStarter Overlay
    Hr0n
    Offline

    Hr0n Опытный в 1С

    Регистрация:
    17 авг 2009
    Сообщения:
    353
    Симпатии:
    0
    Баллы:
    26
    Есть документ "Инвойс", видоизмененная форма накладной ТОРГ-12 с дополнительными полями.
    Есть реквизит табличной части "Товары" (Код ТНВЭД), который заполняется автоматически при вводе позиции в документ. В печатной форме все это прописано и отображается.
    Проблема в следующем: нужно сделать так, чтобы после каждого кода ТНВЭД (как правило несколько позиций) выводился итог по позиции, примерно следующим образом:
    [​IMG]
    Сейчас документ такого вида:
    [​IMG]
    Версия платформы 8.1.14.72, конфигурации 10.3.6.8
    Заранее благодарен! :unsure:
  2. dianofob
    Offline

    dianofob (-_-)y-.o0O

    Регистрация:
    3 июл 2009
    Сообщения:
    711
    Симпатии:
    0
    Баллы:
    26
    а в чем сложность? сортируешь по этому коду, суммируешь для одного кода... выводишь секцию с итогами при смене кода и обнуляешь сумму и тд..
  3. mialord
    Offline

    mialord Модераторы Команда форума Модератор

    Регистрация:
    31 июл 2009
    Сообщения:
    5.398
    Симпатии:
    40
    Баллы:
    54
    В запросе, который выбирает данные, рассчитайте итог по позициям.
    1. Для выполнения данной операции после оператора Выбрать введите примерно следующие
    СУММА(Товар.Количество)
    2. Воспользуйтесь оператором ИТОГИ ПО

    В результате Вы получите выборку с результатами запроса, этот результат и выводите в подвал отчета.

    И да, чуть не забыл

    Итоги нужно рассчитать по группировкам (ГРУППИРОВАТЬ ПО (Далее Код ТНВЭД))
    Далее используете режим обхода ПоГруппировкам.
  4. mialord
    Offline

    mialord Модераторы Команда форума Модератор

    Регистрация:
    31 июл 2009
    Сообщения:
    5.398
    Симпатии:
    40
    Баллы:
    54
    Сделано

    Код:
            Запрос.Текст =
    "ВЫБРАТЬ
    |    ВложенныйЗапрос.Номенклатура КАК Номенклатура,
    |    ВЫРАЗИТЬ(ВложенныйЗапрос.Номенклатура.НаименованиеПолное КАК СТРОКА(1000)) КАК ТоварНаименование,
    |    ВложенныйЗапрос.Номенклатура.Артикул КАК ТоварКод,
    |    ВложенныйЗапрос.Номенклатура.Марка КАК Марка,
    |    ВложенныйЗапрос.Номенклатура.КодТНВЭД КАК КодТНВЭД,
    |    ВложенныйЗапрос.Номенклатура.КолВУп КАК КолВУп,
    |    ВложенныйЗапрос.ЕдиницаИзмерения КАК ЕдиницаИзмерения,
    |    ВложенныйЗапрос.Номенклатура.КлассификаторСтранМира КАК Страна,
    |    ВложенныйЗапрос.Номенклатура.КлассификаторЕдиницИзмерения КАК ВидУпаковки,
    |    ВложенныйЗапрос.КоэффициентМест / ВложенныйЗапрос.Коэффициент КАК КоличествоВОдномМесте,
    |    ВЫБОР
    |        КОГДА ВложенныйЗапрос.КоличествоМест > 0
    |            ТОГДА ВложенныйЗапрос.КоличествоМест * ВложенныйЗапрос.ЕдиницаИзмеренияМест.Вес
    |        ИНАЧЕ ВложенныйЗапрос.Количество * ВложенныйЗапрос.ЕдиницаИзмерения.Вес
    |    КОНЕЦ КАК МассаБрутто,
    |    ВложенныйЗапрос.Характеристика КАК Характеристика,
    |    ВложенныйЗапрос.Серия КАК Серия,
    |    ВложенныйЗапрос.СтавкаНДС КАК СтавкаНДС,
    |    ВложенныйЗапрос.Цена КАК Цена,
    |    ВЫБОР
    |        КОГДА ВложенныйЗапрос.ПроцентСкидкиНаценки = 0
    |                И ВложенныйЗапрос.ПроцентАвтоматическихСкидок = 0
    |            ТОГДА ЛОЖЬ
    |        ИНАЧЕ ИСТИНА
    |    КОНЕЦ КАК ЕстьСкидкиПоСтроке,
    |    ВложенныйЗапрос.Количество КАК Количество,
    |    ВложенныйЗапрос.КоличествоМест КАК КоличествоМест,
    |    ВложенныйЗапрос.Сумма КАК Сумма,
    |    ВложенныйЗапрос.СуммаНДС КАК СуммаНДС,
    |    ВложенныйЗапрос.НомерСтроки КАК НомерСтроки,
    |    ВложенныйЗапрос.Метка КАК Метка
    |ИЗ
    |    (ВЫБРАТЬ
    |        РеализацияТоваровУслуг.Номенклатура КАК Номенклатура,
    |        РеализацияТоваровУслуг.Номенклатура.КодТНВЭД КАК КодТНВЭД,
    |        РеализацияТоваровУслуг.Номенклатура.Марка КАК Марка,
    |        РеализацияТоваровУслуг.Номенклатура.КолВУп КАК КолВУп,
    |        РеализацияТоваровУслуг.Коэффициент КАК Коэффициент,
    |        РеализацияТоваровУслуг.ЕдиницаИзмерения КАК ЕдиницаИзмерения,
    |        РеализацияТоваровУслуг.Номенклатура.КлассификаторСтранМира КАК Страна,
    |        РеализацияТоваровУслуг.ЕдиницаИзмеренияМест КАК ЕдиницаИзмеренияМест,
    |        РеализацияТоваровУслуг.ЕдиницаИзмеренияМест.Коэффициент КАК КоэффициентМест,
    |        РеализацияТоваровУслуг.ХарактеристикаНоменклатуры КАК Характеристика,
    |        РеализацияТоваровУслуг.СерияНоменклатуры КАК Серия,
    |        РеализацияТоваровУслуг.СтавкаНДС КАК СтавкаНДС,
    |        РеализацияТоваровУслуг.Цена КАК Цена,
    |        РеализацияТоваровУслуг.ПроцентСкидкиНаценки КАК ПроцентСкидкиНаценки,
    |        РеализацияТоваровУслуг.ПроцентАвтоматическихСкидок КАК ПроцентАвтоматическихСкидок,
    |        СУММА(РеализацияТоваровУслуг.Количество) КАК Количество,
    |        СУММА(РеализацияТоваровУслуг.КоличествоМест) КАК КоличествоМест,
    |        СУММА(РеализацияТоваровУслуг.Сумма) КАК Сумма,
    |        СУММА(РеализацияТоваровУслуг.СуммаНДС) КАК СуммаНДС,
    |        МИНИМУМ(РеализацияТоваровУслуг.НомерСтроки) КАК НомерСтроки,
    |        0 КАК Метка
    |    ИЗ
    |        Документ.РеализацияТоваровУслуг.Товары КАК РеализацияТоваровУслуг
    |    ГДЕ
    |        РеализацияТоваровУслуг.Ссылка = &ТекущийДокумент
    |    
    |    СГРУППИРОВАТЬ ПО
    |        РеализацияТоваровУслуг.Номенклатура,
    |        РеализацияТоваровУслуг.Коэффициент,
    |        РеализацияТоваровУслуг.ЕдиницаИзмерения,
    |        РеализацияТоваровУслуг.ЕдиницаИзмеренияМест,
    |        РеализацияТоваровУслуг.ХарактеристикаНоменклатуры,
    |        РеализацияТоваровУслуг.СерияНоменклатуры,
    |        РеализацияТоваровУслуг.СтавкаНДС,
    |        РеализацияТоваровУслуг.Цена,
    |        РеализацияТоваровУслуг.ПроцентСкидкиНаценки,
    |        РеализацияТоваровУслуг.ПроцентАвтоматическихСкидок,
    |        РеализацияТоваровУслуг.Номенклатура.КодТНВЭД,
    |        РеализацияТоваровУслуг.Номенклатура.Марка,
    |        РеализацияТоваровУслуг.Номенклатура.КлассификаторСтранМира,
    |        РеализацияТоваровУслуг.ЕдиницаИзмеренияМест.Коэффициент,
    |        РеализацияТоваровУслуг.КолВУп,
    |        РеализацияТоваровУслуг.Количество,
    |        РеализацияТоваровУслуг.КоличествоМест,
    |        РеализацияТоваровУслуг.НомерСтроки,
    |        РеализацияТоваровУслуг.ВесНетто,
    |        РеализацияТоваровУслуг.Вес,
    |        РеализацияТоваровУслуг.КолМест,
    |        РеализацияТоваровУслуг.Номенклатура.КолВУп) КАК ВложенныйЗапрос
    |
    |ОБЪЕДИНИТЬ ВСЕ
    |
    |ВЫБРАТЬ
    |    РеализацияТоваровУслуг.Номенклатура,
    |    ВЫБОР
    |        КОГДА (НЕ РеализацияТоваровУслуг.Содержание ПОДОБНО """")
    |            ТОГДА ВЫРАЗИТЬ(РеализацияТоваровУслуг.Содержание КАК СТРОКА(1000))
    |        КОГДА (НЕ РеализацияТоваровУслуг.Номенклатура.НаименованиеПолное ПОДОБНО """")
    |            ТОГДА ВЫРАЗИТЬ(РеализацияТоваровУслуг.Номенклатура.НаименованиеПолное КАК СТРОКА(1000))
    |        ИНАЧЕ РеализацияТоваровУслуг.Номенклатура.Наименование
    |    КОНЕЦ,
    |    РеализацияТоваровУслуг.Номенклатура.Артикул,
    |    РеализацияТоваровУслуг.Номенклатура.Марка,
    |    РеализацияТоваровУслуг.Номенклатура.КодТНВЭД,
    |    РеализацияТоваровУслуг.Номенклатура.ЕдиницаХраненияОстатков,
    |    РеализацияТоваровУслуг.Номенклатура.КлассификаторСтранМира,
    |    РеализацияТоваровУслуг.Номенклатура.КлассификаторЕдиницИзмерения,
    |    NULL,
    |    РеализацияТоваровУслуг.Номенклатура.КолВУп,
    |    0,
    |    NULL,
    |    NULL,
    |    РеализацияТоваровУслуг.СтавкаНДС,
    |    РеализацияТоваровУслуг.Цена,
    |    ВЫБОР
    |        КОГДА РеализацияТоваровУслуг.ПроцентСкидкиНаценки = 0
    |            ТОГДА ЛОЖЬ
    |        ИНАЧЕ ИСТИНА
    |    КОНЕЦ,
    |    РеализацияТоваровУслуг.Количество,
    |    NULL,
    |    РеализацияТоваровУслуг.Сумма,
    |    РеализацияТоваровУслуг.СуммаНДС,
    |    РеализацияТоваровУслуг.НомерСтроки,
    |    1
    |ИЗ
    |    Документ.РеализацияТоваровУслуг.Услуги КАК РеализацияТоваровУслуг
    |ГДЕ
    |    РеализацияТоваровУслуг.Ссылка = &ТекущийДокумент
    |
    |ОБЪЕДИНИТЬ ВСЕ
    |
    |ВЫБРАТЬ
    |    РеализацияТоваровУслуг.Номенклатура,
    |    ВЫРАЗИТЬ(РеализацияТоваровУслуг.Номенклатура.НаименованиеПолное КАК СТРОКА(1000)),
    |    РеализацияТоваровУслуг.Номенклатура.Артикул,
    |    РеализацияТоваровУслуг.Номенклатура.Марка,
    |    РеализацияТоваровУслуг.Номенклатура.КодТНВЭД,
    |    РеализацияТоваровУслуг.Номенклатура.КолВУп,
    |    РеализацияТоваровУслуг.Номенклатура.КлассификаторСтранМира,
    |    РеализацияТоваровУслуг.Номенклатура.ЕдиницаХраненияОстатков,
    |    РеализацияТоваровУслуг.Номенклатура.КлассификаторЕдиницИзмерения,
    |    NULL,
    |    РеализацияТоваровУслуг.Количество * РеализацияТоваровУслуг.Номенклатура.ЕдиницаХраненияОстатков.Вес,
    |    NULL,
    |    NULL,
    |    ""Без НДС"",
    |    РеализацияТоваровУслуг.Цена,
    |    ЛОЖЬ,
    |    РеализацияТоваровУслуг.Количество,
    |    NULL,
    |    РеализацияТоваровУслуг.Сумма,
    |    0,
    |    РеализацияТоваровУслуг.НомерСтроки,
    |    2
    |ИЗ
    |    Документ.РеализацияТоваровУслуг.ВозвратнаяТара КАК РеализацияТоваровУслуг
    |ГДЕ
    |    РеализацияТоваровУслуг.Ссылка = &ТекущийДокумент
    |
    |УПОРЯДОЧИТЬ ПО
    |    Метка,
    |    НомерСтроки
    |ИТОГИ
    |    СУММА(Количество),
    |    СУММА(Сумма)
    |ПО
    |    КодТНВЭД,
    |    ТоварНаименование";
    
    
    // Выборка данных с обходом результатов запроса по группировочному полю КодТНВЭД
    ВыборкаКодТНВЭД    = Запрос.Выполнить().Выбрать(ОбходРезультатаЗапроса.ПоГруппировкамСИерархией, "КодТНВЭД", "ВСЕ" ); 
    
    :unsure:

Поделиться этой страницей