7.7 Подсчет количества повторений в запросе

Задача: надо выбрать из документа РасходНакл водителя и грузополучателя, потом надо подсчитать сколько раз за период этот водитель ездил к этому к этому грузополучателю. Особенность в том, что он в одну поездку может вести несколько накладных, т.е простой подсчет количества не адекватно.

Код:

"//{{ЗАПРОС(Сформировать)
    |Период с ВыбНачПериода по ВыбКонПериода;
    |Агент = Документ.РасходнаяНакладнаяМяс.Водитель;
    |ДатаДок = Документ.РасходнаяНакладнаяМяс.ДатаДок;
    |Количество = Документ.РасходнаяНакладнаяМяс.Количество;
    |Всего = Документ.РасходнаяНакладнаяМяс.Всего;
    |Грузополучатель = Документ.РасходнаяНакладнаяМяс.Грузополучатель;
    |Функция КолПоезд = Счётчик(Грузополучатель);
    |Функция Кол = Сумма(Количество);
    |Функция КолПр = Сумма(Количество*?((Товар.Вес=0) или (СокрЛП(Товар.ЕдиницаИзмерения.Наименование)=""кг""),1,Товар.Вес));        
    |Функция Сумма = Сумма(Всего);
    |Группировка Агент без групп;
    |Группировка Грузополучатель;
    |Условие(Агент в ВыбАгент);
    |Условие(Грузополучатель в ВыбГрузополучатель);
    |"//}}ЗАПРОС

вот такой код запроса выдает мне ,что за один день он ездил 5 (к примеру) раз к Иванову И.И. Хотя по факту он был там 1 раз и отвез 5 накладных

--- Объединение сообщений, 29 окт 2015 ---

можно в запросе в качестве аргумента функции использовать другую функцию? Что-то типа

Код:

| Функция КолВоВхождений = сумма(КолПоезд/КолПоезд)

Написала несколько вариантов
1. |Функция КолВоВхождений = сумма(Запрос.КолПоезд/Запрос.КолПоезд) Когда (Запрос.КолПоезд>0); - выдает деление на 0;
2. |Функция КолВоВхождений = сумма(Запрос.КолПоезд/?(Запрос.КолПоезд>0,Запрос.КолПоезд,1)); - выдает то же самое значение что и Запрос.КолПоезд
3. |Функция КолВоВхождений = Запрос.КолПоезд/?(Запрос.КолПоезд>0,Запрос.КолПоезд,1); - программа вываливается вообще и в конфигураторе выдает ошибку Запрос[11] : Неожиданное выражение 'Запрос'

выгрузи в тз и сверни по дате, грузополучателю, накладным

Способ построения такой ТЗ будет аналогичен 1с 8: т.е. сначала группировка - потом входящие в нее строки?. Просто я не могу запустить отладчик, пишу эмпирически так сказать

мда...

может клиента отдать специалисту?

рассмешили..... А если не клиент, а работодатель?

т.е. без ТЗ не вариант обойтись? Жалко..

т.е. первый параметр- группирует, второй - складывает, не вошедшие выкидывает

--- Объединение сообщений, 29 окт 2015 ---

Пишу

Код:

Запрос = СоздатьОбъект("Запрос");
    ТекстЗапроса =
    "//{{ЗАПРОС(Сформировать)
    |Период с ВыбНачПериода по ВыбКонПериода;   
    |Договор1 = Документ.РасходнаяНакладнаяМяс.Договор1;
    |Агент = Документ.РасходнаяНакладнаяМяс.Водитель;
    |ДатаДок = Документ.РасходнаяНакладнаяМяс.ДатаДок;
    |Товар = Документ.РасходнаяНакладнаяМяс.Товар;
    |Количество = Документ.РасходнаяНакладнаяМяс.Количество;
    |Всего = Документ.РасходнаяНакладнаяМяс.Всего;
    |Грузополучатель = Документ.РасходнаяНакладнаяМяс.Грузополучатель;
    |Функция КолПоезд = Счётчик(Грузополучатель);
    |Функция КолВоВхождений = Максимум(Запрос.КолПоезд/?(Запрос.КолПоезд>0,Запрос.КолПоезд,1));
    |Функция Кол = Сумма(Количество);
    |Функция КолПр = Сумма(Количество*?((Товар.Вес=0) или (СокрЛП(Товар.ЕдиницаИзмерения.Наименование)=""кг""),1,Товар.Вес));         
    |Функция Сумма = Сумма(Всего);
    |Группировка Агент без групп;
    |Группировка Грузополучатель без групп;
    |Группировка Договор1 без групп;
    |Условие(Агент в ВыбАгент);
    |Условие(Грузополучатель в ВыбГрузополучатель);
    |"//}}ЗАПРОС

    ТЗ = СоздатьОБъект("ТаблицаЗначений");
    Запрос.Выгрузить(ТЗ);
    ТЗ.Свернуть("Агент, Грузополучатель, Договор1","КолВоВхождений");
    ТЗ.ВыбратьСтроки();
    Пока ТЗ.ПолучитьСтроку()=1 Цикл
        Сообщить(Строка(ТЗ.Агент)+" + "+Строка(ТЗ.грузополучатель) + " + "+Строка(ТЗ.Договор1) + " + "+Строка(ТЗ.КолВоВхождений));
    КонецЦикла;

получаю
Булатов Сергей Ильич + Аббасов И.Х г. Георгиевск + + 1
Булатов Сергей Ильич + Аббасов И.Х г. Георгиевск + Основной договор + 1
Почему после сворачивания с учетом Договора остаются строки, где Договор пустой??

с этого и начала, и получала КолВоВхождений=2, ввела еще и договор и увидела задвоенность строк.
Можно как-либо при выгрузке в ТЗ указывать что надо выгружать группировки, без строк

не пойму, синтаксис-помощник отключила? научи

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

см.помощь по выгрузитьзапрос

ну справочник Договора, не имеет групп так что здесь это можно опустить. Но на результат это не влияет.

и посмотрела и почитала и ничего не поняла

Где считаются функции запроса: для каждой строки или для группировки?
Уже нашла - для всех уровней.

Если один момент, который я не могу понять

Код:

Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
        Возврат;
    КонецЕсли;
    тзОсновная = СоздатьОбъект("ТаблицаЗначений");  
    Запрос.Выгрузить(тзОсновная);
    тзОсновная.УдалитьСтроки();

   
    ТЗ = СоздатьОБъект("ТаблицаЗначений");
    Запрос.Выгрузить(ТЗ);

    ТЗ.ВыбратьСтроки();
    Пока ТЗ.ПолучитьСтроку()=1 Цикл 
        Если Строка(ТЗ.Договор) <>"" Тогда
            Сообщить(Строка(ТЗ.Агент)+" + "+Строка(ТЗ.грузополучатель) + " + "+Строка(ТЗ.Договор) + " + "+Строка(ТЗ.КолВоВхождений)+ " + "+ТЗ.КолВоНакладных);
            тзОсновная.НоваяСтрока();
            тзОсновная.Агент = ТЗ.Агент;
            тзОсновная.Грузополучатель = ТЗ.Грузополучатель.наименование;
            тзОсновная.Договор = Строка(ТЗ.Договор);
          КонецЕсли;
    КонецЦикла;

Выгружаю запрос в тзОсновная и удаляю ее строки для того, чтобы не создавать колонки и указывать их тип. (Я знаю, что это время - но мне сейчас не до того). Потом перебором по условию выбираю нужные строки и копирую их в тзОсновную. И там значений НЕТ!!!!! Пробовала 3 варианта - ни один не сработал!!!

так посчитается количество накладных, в один день на одного грузополучателя их может быть выписано до 4-х шт.

Если СокрЛП(ТЗ.Договор)<>""
...

и посмотри уже параметры для Выгрузить
можно и без лишних строк получить тз