ап

(0) Посмотри как работают УложитьСписокОбъектов
и/или УложитьСписокОбъектов13

(4) поробуй так

ТекстЗапроса = "SELECT
	     |Журнал.iddoc [Док: Документ.Реализация]
	     |From Документ_Реализация as Реал
	     |inner join Журнал
	     |ON Журнал.IDDOC = Реал.IDDOC
	     |Where ДокОснование = :Зн_Док~";

запросБД.УстановитьТекстовыйПараметр("Зн_Док",Заявки.Док);
ТЗ =ЗапросБД.ВыполнитьИнструкцию(ТекстЗапроса);
ТЗ.ВыбратьСтроку();
 

база = СоздатьОбъект("SQLiteBase");
база.Открыть(":memory:");
Запрос = база.НовыйЗапрос();
Запрос.ВыполнитьЗапрос("PRAGMA journal_mode = OFF");

ТекстЗапроса = "
|Select
|   Док.iddoc [Док :Документ.Реализация]
|From  [Документ.Реализация] Док
|inner join [Журнал] Жур on Жур.iddoc = Док.iddoc
|  and Жур.date between :НачДата and :КонДата
|  and Жур.iddocdef = :ВидДокумента.Реализация
|Where  substr(Док.ДокОснование,5,9) in (select val from СписокДокументов)
|";

//СписокДокументов - твой список с документиками
база.УложитьОбъекты(СписокДокументов,"СписокДокументов",0);
Запрос.Подставлять("НачДата ",НачДата);
Запрос.Подставлять("КонДата",КонДата);
//запрос.Отладка(1);
ТЗ = запрос.ВыполнитьЗапрос(ТекстЗапроса);
ТЗ.ВыбратьСтроку(); 

(7)
Сяб, блин как я сам не допер, видел же этот метод даже описание читал)
Но проблема осталась)
Если делаю так:
запросБД = базаДанных.НовыйЗапрос();
           
           ТекстЗапроса = "SELECT
           |Журнал.iddoc [Док: Документ.Реализация]
           |From Документ_Реализация as Реал
           |left join Журнал
           |ON Журнал.IDDOC = Реал.IDDOC
           |Where substr(trim(ДокОснование),6,4) = @Заявка";
           
           запросБД.Подготовить(ТекстЗапроса);      
           Заявка = СписокЗаявок.ПолучитьЗначение(1);
           запросБД.УстановитьПараметр("@Заявка",Заявка,0);
     
                 Реализации=запросБД.Выполнить();

Все работает зашибись.
Если так:
запросБД = базаДанных.НовыйЗапрос();
           
           ТекстЗапроса = "SELECT
           |Журнал.iddoc [Док: Документ.Реализация]      
           |From Документ_Реализация as Реал
           |left join Журнал
           |ON Журнал.IDDOC = Реал.IDDOC
           |Where substr(trim(ДокОснование),6,4) in СписокЗаявок";
     
           базаДанных.УложитьОбъекты(СписокЗаявок,"СписокЗаявок");
           запросБД.Подготовить(ТекстЗапроса);      
           Реализации=запросБД.Выполнить();

нифига не находит.
((((
Проблема явно в списке. Может с ТЗ получиться?
Слушай, а подскажи, что я не так делаю с укладкой ТЗ?:

запросБД = базаДанных.НовыйЗапрос();
           
           ТекстЗапроса = "SELECT
           |Журнал.iddoc [Док: Документ.Реализация]      
           |From Документ_Реализация as Реал
           |left join Журнал
           |ON Журнал.IDDOC = Реал.IDDOC
           |Where substr(trim(ДокОснование),6,4) in ТаблицаЗаявок";
     
           базаДанных.УложитьТЗ(ТаблицаЗаявок,"ТаблицаЗаявок");
           запросБД.Подготовить(ТекстЗапроса);      
           Реализации=запросБД.Выполнить();      

Говорит no such table ТаблицаЗаявок
           
(5)
Так это же единичный тоже параметр я правильно понимаю?

Не получаецца нифига)

А что не так то?
Все один в один как у тебя)

1st писал(а) 07. Апреля 2011 :: 12:38:


да уж..
еще раз внимательнее посмотри.

Заработало!)))
Огромное спасибо)

база = СоздатьОбъект("SQLiteBase");
     база.Открыть(":memory:");
     Запрос = база.НовыйЗапрос();
     Запрос.ВыполнитьЗапрос("PRAGMA journal_mode = OFF");
     
     ТекстЗапроса = "
     |Select
     |   Реал.iddoc [Док :Документ.Реализация],
     |      Заявка.iddoc [ДокОснование: Документ.ЗаявкаПокупателя]
     |From  [Документ.ЗаявкаПокупателя] Заявка
     |inner join [Журнал] Жур on Жур.iddoc = Заявка.iddoc
     |  and Жур.date between :НачДата and :КонДата
     |inner join [Документ.Реализация] Реал
     |on substr(Реал.ДокОснование,5,9) = Заявка.iddoc
     |";
     
     //СписокДокументов - твой список с документиками
     //база.УложитьОбъекты(СписокДокументов,"СписокДокументов",0);
     Запрос.Подставлять("НачДата",НачДата);
     Запрос.Подставлять("КонДата",КонДата);
     
     ТЗ = запрос.ВыполнитьЗапрос(ТекстЗапроса);
     ТЗ.ВыбратьСтроку();

1st писал(а) 07. Апреля 2011 :: 13:12:


отключает журналирование
http://www.sqlite.org/pragma.html#pragma_journal_mode