Добрый день.
База dbf (не типовая), провайдер VFPOLEDB.
Делаю альтернативный журнал документов. Каждая строка документа связана с уникальным элементом справочника (СторонниеДокументы). Нужно, чтобы результат запроса содержал поля со значениями флагов по принципу:
если для всех строк документа реквизит этого справочника равен 1, тогда 2
если для всех строк документа реквизит этого справочника равен 0, тогда 0,
если есть и 0 и 1, тогда 1.
Пока обрабатываю результат запроса, который содержит все строки документов (избыточная информация).

[code]      ТекстЗапроса = "
     |SELECT
     |      ОбщийЖурнал.CLOSED as Флаг,      
     |      ОбщийЖурнал.ISMARK as ФлагУ,      
     |      DTOS(ОбщийЖурнал.DATE) + ОбщийЖурнал.TIME as Ключ,
     |      ОбщийЖурнал.DATE as Дата,
     |      ОбщийЖурнал.TIME as Время,
     |      ШапкаЗаявки.iddoc as Заявка,
     |      ОбщийЖурнал.DOCNO as Номер,
     |      $ШапкаЗаявки.ВхДата as ВхДата,
     |      $ШапкаЗаявки.ВхНомер as ВхНомер,
     |      $ШапкаЗаявки.Обраб as ОбрСкл,
     |      спрКонтрагенты.DESCR as Контрагент,
     |      $ШапкаЗаявки.ДокСумма as Сумма,
     |      $СторонниеДокументы.ПолученТовар as ПолученТовар,
     |      $СторонниеДокументы.ПолученыДокументы as ПолученыДокументы,
     |      $СтрокиЗаявки.ИндексСтрокиЗаявки as ИндексСтрокиЗаявкиКод,
     |      спрПользователи.DESCR as Автор
     |
     |FROM
     |
     |      1SJourn as ОбщийЖурнал
     |
     |LEFT JOIN
     |      $Документ.ЗаявкаНаДоставку as ШапкаЗаявки
     |      ON
     |      ШапкаЗаявки.iddoc
     |=
     |      ОбщийЖурнал.iddoc
     |
     |LEFT JOIN
     |      $Справочник.Контрагенты as спрКонтрагенты
     |      ON
     |      спрКонтрагенты.id
     |=
     |      $ШапкаЗаявки.Контрагент
     |
     |LEFT JOIN
     |      $Справочник.Пользователи as спрПользователи
     |      ON
     |      спрПользователи.id
     |=
     |      ОбщийЖурнал.SP74
     |
     |LEFT JOIN
     |      $ДокументСтроки.ЗаявкаНаДоставку as СтрокиЗаявки
     |      ON
     |(
     |      СтрокиЗаявки.iddoc+STR(СтрокиЗаявки.lineno,4)
     |=
     |      ШапкаЗаявки.iddoc
     |)
     |
     |LEFT JOIN
     |      $Справочник.СторонниеДокументы as СторонниеДокументы
     |      ON
     |      СторонниеДокументы.ID = $СтрокиЗаявки.СторонниеДокументы
     |
     |WHERE
     |      (ОбщийЖурнал.IDDocDef + DTOS(ОбщийЖурнал.date) + ОбщийЖурнал.time + ОбщийЖурнал.IDDoc BETWEEN ($ВидДокумента.ЗаявкаНаДоставку + DTOS(:НачДата~~) + '               ')
     |      AND ($ВидДокумента.ЗаявкаНаДоставку + DTOS(:КонДата~~) +'ZZZZZZZZZZZZZZZ'))
     |AND
     |      (спрКонтрагенты.ID = '" + Фильтр +"')
     |";
[/code]
Прямые запросы начал использовать совсем недавно, возможно есть простое решение этой задачи?

Большое спасибо, буду пробовать.
Только немного смущает (с точки зрения времени выполнения) дополнительное обращение к таблице общего журнала.

Не знаю, все ли правильно.
Запрос работает, количество строк в результате соответствует количеству документов.
Но тест на быстродействие (по сети, сеансов больше одного) показывает примерно одинаковое время выполнения по сравнению с запросом по старому варианту (там, где много строк). Если совсем не залезать в табл. часть, скорость выше в 3-4 раза. Надеялся получить нечто среднее.
[code]ТекстЗапроса = "
     |SELECT
     |      ОбщийЖурнал.CLOSED as Флаг,      
     |      ОбщийЖурнал.ISMARK as ФлагУ,      
     |      DTOS(ОбщийЖурнал.DATE) + ОбщийЖурнал.TIME as Ключ,
     |      ОбщийЖурнал.DATE as Дата,
     |      ОбщийЖурнал.TIME as Время,
     |      ШапкаЗаявки.iddoc as Заявка,
     |      ОбщийЖурнал.DOCNO as Номер,
     |      $ШапкаЗаявки.ВхДата as ВхДата,
     |      $ШапкаЗаявки.ВхНомер as ВхНомер,
     |      $ШапкаЗаявки.Обраб as ОбрСкл,
     |      спрКонтрагенты.DESCR as Контрагент,
     |      $ШапкаЗаявки.ДокСумма as Сумма,
     |
     |      ICASE(Подзапрос.КолСтрокСПолученнымТоваром = 0,0,ICASE(Подзапрос.КолСтрокСПолученнымТоваром = Подзапрос.КолСтрокВДокументе,1,2)) as ФлагПолДок,
     |      ICASE(Подзапрос.КолСтрокСПолученнымиДокументами = 0,0,ICASE(Подзапрос.КолСтрокСПолученнымиДокументами = Подзапрос.КолСтрокВДокументе,1,2)) as ФлагПолТовар,
     |
     |      спрПользователи.DESCR as Автор
     |FROM
     |
     |      1SJourn as ОбщийЖурнал
     |
     |LEFT JOIN
     |      $Документ.ЗаявкаНаДоставку as ШапкаЗаявки
     |      ON
     |      ШапкаЗаявки.iddoc
     |=
     |      ОбщийЖурнал.iddoc
     |
     |LEFT JOIN
     |      $Справочник.Контрагенты as спрКонтрагенты
     |      ON
     |      спрКонтрагенты.id
     |=
     |      $ШапкаЗаявки.Контрагент
     |
     |LEFT JOIN
     |      $Справочник.Пользователи as спрПользователи
     |      ON
     |      спрПользователи.id
     |=
     |      ОбщийЖурнал.SP74
     |
//      |****************************************************************
     |LEFT JOIN
     |(SELECT  
     |  SUM(1.00) as  КолСтрокВДокументе ,
     |  SUM(ICASE($СторонниеДокументы.ПолученТовар=1,1.00,0.00)) as КолСтрокСПолученнымТоваром,
     |  SUM(ICASE($СторонниеДокументы.ПолученыДокументы =1,1.00,0.00)) as КолСтрокСПолученнымиДокументами,
     |  ОбщийЖурнал1.iddoc  as  iddoc
     |
     |FROM
     |
     |      1SJourn as ОбщийЖурнал1
     |
     |LEFT JOIN
     |      $ДокументСтроки.ЗаявкаНаДоставку as СтрокиЗаявки
     |      ON
     |(
     |      СтрокиЗаявки.iddoc+STR(СтрокиЗаявки.lineno,4)
     |=
     |      ОбщийЖурнал1.iddoc
     |)
     |
     |LEFT JOIN
     |      $Справочник.СторонниеДокументы as СторонниеДокументы
     |      ON
     |      СторонниеДокументы.ID = $СтрокиЗаявки.СторонниеДокументы  
     |
     |
     |WHERE
     |      (ОбщийЖурнал1.IDDocDef + DTOS(ОбщийЖурнал1.date) + ОбщийЖурнал1.time + ОбщийЖурнал1.IDDoc BETWEEN ($ВидДокумента.ЗаявкаНаДоставку + DTOS(:НачДата~~) + '               ')
     |      AND ($ВидДокумента.ЗаявкаНаДоставку + DTOS(:КонДата~~) +'ZZZZZZZZZZZZZZZ'))
     |
     |GROUP BY  ОбщийЖурнал1.iddoc
     | ) as  Подзапрос
     |      ON
     |      Подзапрос.iddoc = ШапкаЗаявки.iddoc
//      |****************************************************************
     |
     |WHERE
     |      (ОбщийЖурнал.IDDocDef + DTOS(ОбщийЖурнал.date) + ОбщийЖурнал.time + ОбщийЖурнал.IDDoc BETWEEN ($ВидДокумента.ЗаявкаНаДоставку + DTOS(:НачДата~~) + '               ')
     |      AND ($ВидДокумента.ЗаявкаНаДоставку + DTOS(:КонДата~~) +'ZZZZZZZZZZZZZZZ'))[/code]

Скорость критична, т.к. информация в журнале обновляется автоматически при изменении любого документа данного вида вне зависимости от присутствия его в видимых строках (к сожалению не sql и табличное поле используется через ТЗ).

Один справочник, содержащий информацию о состоянии справочников для строк решит вопрос скорости, но информация в нем не всегда будет достоверной, т.к. база распределенная и изменения в документе вносятся в центральной базе, а признаки получения товара/документов устанавливаются в периферийной прямо на форме документа, но независимо от него.

Сейчас элементы справочников для строк создаются при записи документа и больше в центральной базе не модифицируются. Если использовать один справочник для документа, то при добавлении/удалении строки нужно будет менять его реквизиты в центральной базе, и если между обменом справочник будет модифицирован и в периферийной, то эти изменения будут утрачены.  

По запросу.
К сожалению, не знаю азов и на получение информации об элементарных вещах приходится тратить очень много времени (кстати, очень помогла тема «Использование индексов …»).  Для меня к сожалению не очевидно, как присоединить в  подзапросе ОбщийЖурнал по iddoс. Пробовал использовать  iddoс из основного запроса, выдает ошибку.

kiruha писал(а) 20. Ноября 2008 :: 20:39:

На SqlLite пока нету БыстрогоПоиска, но Саша обещал посмотреть.
Кирилл, а ты смог сделать БыстрыйПоиск?
Как мне кажется, без этого функционала вообще не стоит заморачиваться с подменой списков справочников и журналов документов.

Да, я видел, что он это уже добавил, но я не знаю как это реализовать  на ОлеДб