база DBF, енджин пропатчен

по одному документу все замечательно работает

   База = СоздатьОбъект("OLEDBData");
   Рез = База.Соединение("Provider = VFPOLEDB.9;Data Source = " + КаталогИБ() + ";Mode = ReadWrite;");
   
   Запрос = База.СоздатьКоманду();  
   ГруппаКт = "";
   Если ПустоеЗначение(ВыбКонтрагент) = 0 Тогда
       Запрос.УложитьСписокОбъектов(ВыбКонтрагент, ГруппаКт, "Контрагенты");
   КонецЕсли;
   
   ТекстЗапроса = "
   |SELECT  
   |    Журнал.date ДатаДок,
   |    $ДокШапка_ФранчРеализация.Контрагент as [Контрагент $Справочник.Контрагенты],
   |    $ДокСтроки_ФранчРеализация.Номенклатура as [Номенклатура $Справочник.Номенклатура],
   |    SUM($ДокСтроки_ФранчРеализация.Сумма) as ФранчРеализация_Сумма,
   |    SUM($ДокСтроки_ФранчРеализация.Количество) as ФранчРеализация_Количество
   |
   |FROM
   |    1SJOURN as Журнал
   |    LEFT JOIN $Документ.ФранчРеализация as ДокШапка_ФранчРеализация on Журнал.iddoc = ДокШапка_ФранчРеализация.iddoc
   |    LEFT JOIN $ДокументСтроки.ФранчРеализация as ДокСтроки_ФранчРеализация on Журнал.iddoc = ДокСтроки_ФранчРеализация.iddoc                        
   |    JOIN $Справочник.ТорговыеТочкиКонтрагента as Спр_ТорговыеТочкиКонтрагента on($ДокШапка_ФранчРеализация.Склад = Спр_ТорговыеТочкиКонтрагента.id)
   |    JOIN $Справочник.Контрагенты as Спр_Контрагенты on($ДокШапка_ФранчРеализация.Контрагент = Спр_Контрагенты.id)
   |
   |WHERE      
   |    Журнал.date BETWEEN :НачДата~~ AND :КонДата~~ ";
   
   Если ПустоеЗначение(ВыбКонтрагент) = 0 Тогда
       ТекстЗапроса = ТекстЗапроса + "
   |    AND $ДокШапка_ФранчРеализация.Контрагент IN (SELECT Val FROM " + ГруппаКт + ") ";
   КонецЕсли;                

   ТекстЗапроса = ТекстЗапроса + "                              
   |    AND $Спр_ТорговыеТочкиКонтрагента.ФирменныйМагазин = 1
   |    AND Журнал.Closed = 1
   |
   |GROUP BY
   |    Журнал.date,
   |    $ДокШапка_ФранчРеализация.Контрагент,
   |    $ДокСтроки_ФранчРеализация.Номенклатура
   |
   |ORDER BY
   |    Журнал.date ASC,
   |    $ДокШапка_ФранчРеализация.Контрагент ASC,
   |    $ДокСтроки_ФранчРеализация.Номенклатура ASC
   |";

   Запрос.УстановитьТекстовыйПараметр("НачДата", НачДата1);
   Запрос.УстановитьТекстовыйПараметр("КонДата", КонДата1);
   Запрос.ВыполнитьИнструкцию(ТекстЗапроса).Выгрузить(ТабРезультат);




вот исходный запрос


  Текст = "Период с НачДата1 по КонДата1;
    |
   |Контр = Документ.ФранчРеализация.Контрагент, Документ.Реализация.Контрагент;
   |Тов = Документ.ФранчРеализация.Номенклатура, Документ.Реализация.Номенклатура;
   |Вид = Документ.ФранчРеализация.Номенклатура.ВидОдежды, Документ.Реализация.Номенклатура.ВидОдежды;
   |Кол = Документ.ФранчРеализация.Количество;
   |Сум = Документ.ФранчРеализация.Сумма;
   |Кол1 = Документ.Реализация.Количество;
   |Сум1 = Документ.Реализация.Сумма;
   |
   |Функция КолПродаж = Сумма(Кол);
   |Функция СумПродаж = Сумма(Сум);
   |Функция КолРеал = Сумма(Кол1);
   |Функция СумРеал = Сумма(Сум1);
   |
   |Группировка День;
   |Группировка Контр Без Групп;
   |Группировка Тов Без Групп;
   |
   |Условие(ПустоеЗначение(Тов) = 0);
   |Условие(ПустоеЗначение(Вид) = 0);
   |Условие(Контр в ВыбКонтрагент);";
       
   Запрос = СоздатьОбъект("Запрос");
   Если Запрос.Выполнить(Текст) = 0 Тогда
       Возврат;
   КонецЕсли;

Запрос впечатляет
У тебя выбираются ВСЕ записи журнала и левым соединением лепятся 2 документа, т.е. для документа "Выписка", например, прилепится NULL
Наверное проще через union all
А еще лучше не лопатить документы а завести бух. счет или регистр

А почему в запросе отсуствует условие по виду документа. имхо это условие весьма облегчает жизнь. Конечно помнится где то читал  что для DBF (без использования 1sqlite) попадаение в индекс iddocdef проблематичен... не помню.