Некорректно работает запрос

[Arkuz]

Здравствуйте.

Вот так выглядит запрос:

SELECT * 
FROM BASE
WHERE date_waybill  BETWEEN :s AND :po

В параметры подставляю значения с DateTimePicker1 и DateTimePicker2.
Когда ставлю с 19.08.09 по 19.08.09 ничего не нахрдит, хотя записи есть.
Ставлю с 18.08.09 по 19.08.09 находит за 19, всё верно.
Ставлю с 19.08.09 по 20.08.09 ничего не находит, а за 19 запись есть.
Поэтому если нужно узнать что за 18 и 19 число, то приходится ставить числа с 17.08.09 по 20.08.09. Незнаю почему так.

Пробовал и так, но результат тот же...

SELECT * 
FROM BASE
WHERE date_waybill >= :s AND date_waybill <= :po

Подскажите, пожалуйста,, почему так...???

[Власов А.С.]

Давай пример поглядим

[BARNEY]

SELECT * 
FROM BASE
WHERE date_waybill >='''+datetost(DateTimePicker1)+''' AND date_waybill <= '''+datetost(DateTimePicker2)+'''

а так?

[Serge_Bliznykov]

Arkuz, думаю дело в присутствии в дате временной составляющей.

Попробуйте использовать функции Trunc (или Truncate):

SELECT * 
FROM BASE
WHERE trunc(date_waybill)  BETWEEN :s AND :po

p.s. ну и надеюсь, параметры :s и :рo
задаёте через AsDateTime ?:

 Query1.ParamByName('s').AsDateTime := trunc(DateTimePicker1.Date);
 Query1.ParamByName('po').AsDateTime := trunc(DateTimePicker2.Date);

[Arkuz]

Serge_Bliznykov, увы trunc не помог, вообще ничего не находит.
Так не работает:

Query1.ParamByName('s').AsDateTime := DateTimePicker1.Date;

Нельзя записать ничего кроме ParamByName('s').Value;

Решил не париться и сделал так

DataModule1.PREDPRODUCTQuery.Parameters.ParamByName('s').Value:=DateTimePicker1.Date-1;
DataModule1.PREDPRODUCTQuery.Parameters.ParamByName('po').Value:=DateTimePicker1.Date+1;

[Arkuz]

Я в процессе создания отчётов понял, что вариация на тему +1, -1 искажает данные. Полскажите как исправить этот баг?

Исходники прилагаются.

Я не знаю что делать, ну может где-то что-то недоглядел...

[Arkuz]

Народ, ну выручайте... Я уже не знаю где этот глюк искать...

[Serge_Bliznykov]

Arkuz, сразу надо было сказать, что мучаете Access (и через ADOQuery)

1) не рекомендую держать AdoConnection.Connected := true; в Дизайнтайме это может вызвать всякие глюки и косяки...


НО. О Датах.

взял для пример Отчёты - "По предприятию за период"
(модуль ReportPredPerUnit)
присвоение переменных сделал так:

           DataModule1.PREDPRODUCTQuery.Active:=false;
           DataModule1.PREDPRODUCTQuery.Parameters.ParamByName('s').DataType := ftDateTime;
           DataModule1.PREDPRODUCTQuery.Parameters.ParamByName('po').DataType := ftDateTime;
           DataModule1.PREDPRODUCTQuery.Parameters.ParamByName('s').Value:=trunc(DateTimePicker1.Date);
           DataModule1.PREDPRODUCTQuery.Parameters.ParamByName('po').Value:=trunc(DateTimePicker2.Date);
           DataModule1.PREDPRODUCTQuery.Active:=true;

и, обязательно исправьте запрос в PREDPRODUCTQuery

SELECT * 
FROM BASE
WHERE INT(date_waybill)  BETWEEN :s AND :po

у меня всё работает.

[Arkuz]

Serge_Bliznykov, огромное спасибо... Вы мне очень помогли.
Замучали, дали по практике сделать программу, а теперь мучают... Сделай то, сделай так...
Ещё раз спасибо...

И скажите зачем делать это: INT(date_waybill)?
Дата в вещественном типе хранится же...
Если я правильно понял то там целая часть - дата, а после запятой - время?

[Serge_Bliznykov]

Если я правильно понял то там целая часть - дата, а после запятой - время?

точно так! Кстати, так же и в Дельфи. поэтому функция trunc(), выделяющая из вещественного числа целую часть и помогает выделить дату, отбросив время.