[Flexy]

Добрый день Уважаемые Форумчане.
Имеем ТИС 010 и стандартный отчет Остатки Товаров.
Подскажите как сделать, что бы при формировании движения товаров на складах выводились итоги по каждой группе товара (начальный остаток, приход, расход, конечный остаток).
Может в запросе надо что-то подправить? Мучаюсь уже вторую неделю
Кто нибудь уже с таким сталкивался?Может завалялась готовая доработка этого отчетика?
За любые советы заранее ОГРОМНОЕ СПАСИБО

[Vofka]

Текст запроса хотя бы покажите. А лучше текст процедуры.

[Flexy]

Текст запроса хотя бы покажите. А лучше текст процедуры.

Процедура ДвиженияТоваров()
    Перем Запрос, ТекстЗапроса;
    Перем ПоВсейФирмеВЦелом;
                   
    ТекстЗапроса = "";
    ТекстЗапроса = ТекстЗапроса +
        "//{{ЗАПРОС(ТоварыЗаПериоды)         
        |ПЕРИОД С Дата1 По Дата2;
        |Фирма=Регистр.ОстаткиТоваров.Фирма;
        |Склад=Регистр.ОстаткиТоваров.Склад;
        |ФлагУчета=Регистр.ОстаткиТоваров.ФлагУчета;
    
        |"+?(ВсеТовары = 1,"Товар = Справочник.Номенклатура.ТекущийЭлемент,Регистр.ОстаткиТоваров.Товар","Товар=Регистр.ОстаткиТоваров.Товар")+";
        
        //|Товар=Регистр.ОстаткиТоваров.Товар;
        |Док=Регистр.ОстаткиТоваров.ТекущийДокумент;
        |Кол=Регистр.ОстаткиТоваров.ОстатокТовара;
        |Функция НачКол  = НачОст(Кол);
        |Функция КонКол  = КонОст(Кол);
        |Функция ПрихКол = Приход(Кол);
        |Функция РасхКол = Расход(Кол);
        |Условие (Фирма=ВыбФирма);   
        |"+?(ВсеТовары = 1,"Группировка Товар  Упорядочить По Товар.Сортировка,Товар.Наименование все","")+";

        |"//}}ЗАПРОС
    ;

    Если ДеталПоСкладам=1 Тогда
        ТекстЗапроса = ТекстЗапроса + "
        |Группировка Склад упорядочить по Склад.Наименование;";
    КонецЕсли;

    Если ДеталПоДокументам=1 Тогда
        ТекстЗапроса = ТекстЗапроса + "
        |Группировка Док;";
    КонецЕсли;
    
    Заг="";
    Заг1="";                           
    
    глЗаголовокФирма(ВыбФирма,Заг,Язык);
    
    Если ФильтрыИЗаголовкиПоТоварамИСкладам(ТекстЗапроса,Заг,Заг1)=0 Тогда
        Возврат;
    КонецЕсли;    
                            
    Если (ДеталПоСкладам=0)И(ВыбСклад.Выбран()=0)И(МФВыбСклады.РазмерСписка()=0) Тогда
        Заг1=?(Язык="у","Одночасно по всім складам. ","Одновременно по всем складам. ");
        ТекстЗапроса = ТекстЗапроса + "Условие (ФлагУчета <> 1);";
        ПоВсейФирмеВЦелом = 1;
    Иначе
        ПоВсейФирмеВЦелом = 0;
    КонецЕсли;
    
    Запрос=СоздатьОбъект("Запрос");
    Если Запрос.Выполнить(ТекстЗапроса)=0 тогда
        Возврат;
    КонецЕсли;

     глЧислоСтрок=0;
    //  Создание Таблицы для выходного отчета
    Т.ИсходнаяТаблица("ДвиженияТоваров"+Язык);
    Т.ВывестиСекцию("Кнопки");
    Т.ВывестиСекцию("Отчет");
    глОживить(4);
    Пока Запрос.Группировка("Товар") = 1 Цикл
        //НаимТовара=глТоварВОтчете(Запрос.Товар); 
        НаимТовара=Запрос.Товар.полнНаименование; 
        Пока Найти(НаимТовара,"  ") <> 0 Цикл
            НаимТовара = СтрЗаменить(НаимТовара,"  "," ");
        КонецЦикла;
        Если Запрос.Товар.ЭтоГруппа()=1 Тогда
            Т.ВывестиСекцию("Группа");
            глОживить(1);
            Продолжить;
        Иначе 
            ПечНачКол=глФРМКоличествоВОтчете(Запрос.НачКол,Запрос.Товар);
            ПечПрихКол=глФРМКоличествоВОтчете(Запрос.ПрихКол,Запрос.Товар);
            ПечРасхКол=глФРМКоличествоВОтчете(Запрос.РасхКол,Запрос.Товар);
            ПечКонКол=глФРМКоличествоВОтчете(Запрос.КонКол,Запрос.Товар);
            
            Т.ВывестиСекцию("Товар");
            глОживить(1);
        КонецЕсли;
        
        Если ДеталПоСкладам=1 Тогда // детализируем по складам
            
            Пока Запрос.Группировка("Склад") = 1 Цикл
                НаимСклада=Запрос.ЗначениеУпорядочивания(2,1);
                
                ПечНачКол=глФРМКоличествоВОтчете(Запрос.НачКол,Запрос.Товар);
                ПечПрихКол=глФРМКоличествоВОтчете(Запрос.ПрихКол,Запрос.Товар);
                ПечРасхКол=глФРМКоличествоВОтчете(Запрос.РасхКол,Запрос.Товар);
                ПечКонКол=глФРМКоличествоВОтчете(Запрос.КонКол,Запрос.Товар);
            
                Если ВыбСклад.Выбран()=0 Тогда
                    Т.ВывестиСекцию("Склад");
                    глОживить(1);
                КонецЕсли;
                
                Если ДеталПоДокументам=1 Тогда
                    ВывестиДокументыДвиженияТоваров(Запрос,Т);  
                КонецЕсли;
    
            КонецЦикла;
            
        ИначеЕсли ДеталПоДокументам=1 Тогда    // не детализируем по складам
            
            ВывестиДокументыДвиженияТоваров(Запрос,Т);  
        
        КонецЕсли;    
            
    КонецЦикла;
    //Вызов выходного отчета в окно просмотра и редактирования.
    Т.Опции(0,0,8,0,ПарСтрОтчДлинн);
    Т.Защита(Константа.ФлагЗащитыТаблиц);
    Т.ТолькоПросмотр(1);
    Т.ОбластьПечати(2);
    Т.Показать("Отчет о движении товаров на складах","");  
    
    ОтчетСформирован = 1;
    
КонецПроцедуры

[Vofka]

Мне кажется одного запроса маловато. Покажите всю процедуру. И уточните проблему: в отчете есть только товары (без групп)?

[Flexy]

Мне кажется одного запроса маловато. Покажите всю процедуру.

Отредактировал пост выше с полной процедурой.

И уточните проблему: в отчете есть только товары (без групп)?

Проблема в том, что мне нужно видеть итоги (обороты) по всей группе.Допустим есть группа "Алкоголь", в ней есть группа "Вино", в группе "Вино" идут группы различных марок Вина, а в них уже сами товары.Хочется видеть итоги по маркам вина.

З.Ы. Еще заметил такую штуку...
На форме отчета есть флаг "Данные по всем товарам" с идентификатором "ВсеТовары".
При формировании отчета со снятым флагом вылетает ошибка:
Если Запрос.Выполнить(ТекстЗапроса)=0 тогда
{Отчет.ОстаткиТоваров.Форма.Модуль(363)}: <<?>> ;
Запрос[14] : Неизвестая ошибка ';'

И отчет не формируется -((

[Vofka]

Попробуйте запрос так переделать:

...
ТекстЗапроса = "";
    ТекстЗапроса = ТекстЗапроса +
        "//{{ЗАПРОС(ТоварыЗаПериоды)         
        |ПЕРИОД С Дата1 По Дата2;
        |Фирма=Регистр.ОстаткиТоваров.Фирма;
        |Склад=Регистр.ОстаткиТоваров.Склад;
        |ФлагУчета=Регистр.ОстаткиТоваров.ФлагУчета;        
        |Товар=Регистр.ОстаткиТоваров.Товар;
        |Док=Регистр.ОстаткиТоваров.ТекущийДокумент;
        |Кол=Регистр.ОстаткиТоваров.ОстатокТовара;
        |Функция НачКол  = НачОст(Кол);
        |Функция КонКол  = КонОст(Кол);
        |Функция ПрихКол = Приход(Кол);
        |Функция РасхКол = Расход(Кол);
        |Условие (Фирма=ВыбФирма);   
        |Группировка Товар  Упорядочить По Товар.Наименование;

        |"//}}ЗАПРОС
   ;
...

[Flexy]

Попробуйте запрос так переделать

Спасибо.помогло.Ошибка больше не вылетает.А как быть с группами?Отчет даже со снятым флагом не считает итоги по товарам принадлежащим группе...

[awp]

Спасибо.помогло.Ошибка больше не вылетает.А как быть с группами?Отчет даже со снятым флагом не считает итоги по товарам принадлежащим группе...

...
ТекстЗапроса = "";
ТекстЗапроса = ТекстЗапроса +
"//{{ЗАПРОС(ТоварыЗаПериоды)
|ПЕРИОД С Дата1 По Дата2;
|Фирма=Регистр.ОстаткиТоваров.Фирма;
|Склад=Регистр.ОстаткиТоваров.Склад;
|ФлагУчета=Регистр.ОстаткиТоваров.ФлагУчета;
|Товар=Регистр.ОстаткиТоваров.Товар;
|Группа=Регистр.ОстаткиТоваров.Товар.Родитель;
|Док=Регистр.ОстаткиТоваров.ТекущийДокумент;
|Кол=Регистр.ОстаткиТоваров.ОстатокТовара;
|Функция НачКол = НачОст(Кол);
|Функция КонКол = КонОст(Кол);
|Функция ПрихКол = Приход(Кол);
|Функция РасхКол = Расход(Кол);
|Условие (Фирма=ВыбФирма);
|Группировка Товар Упорядочить По Товар.Наименование;
|Группировка Группа Упорядочить По Группа.Наименование;
|"//}}ЗАПРОС
;
...

возможно так

[Flexy]

возможно так

Ни каких сдвигов =(.
Но все равно спасибо за внимание

[MATEVI]

Добрый день Уважаемые Форумчане.
Имеем ТИС 010 и стандартный отчет Остатки Товаров.
Подскажите как сделать, что бы при формировании движения товаров на складах выводились итоги по каждой группе товара (начальный остаток, приход, расход, конечный остаток).
Может в запросе надо что-то подправить? Мучаюсь уже вторую неделю
Кто нибудь уже с таким сталкивался?Может завалялась готовая доработка этого отчетика?
За любые советы заранее ОГРОМНОЕ СПАСИБО

Так???
[необходимо зарегистрироваться для просмотра ссылки]

[Flexy]

Так???
[необходимо зарегистрироваться для просмотра ссылки]

То, что надо!!!Супер!!!СПАСИБО ВАМ ОГРОМЕННОЕ!!!
Сейчас буду пробовать понять, как ваша доработка делает эти итоги.
Искренне вам благодарен!!

ОффТоп: Подскажите пожалуйста, как скинуть денюжку в фонд вашего Чудо-Форума?

[Vofka]

Если хотите на развитие форума, то вот

А если хотите скинуть какому-то определённому пользователю - то это уже решайте с ним

[MATEVI]

PS Если есть желание помогите форуму. Мне в данном случае достаточно спасибо