Фильтрация по дате SQL

[Евгений Келер]

Всем привет! Ребята, есть таблица "Delivery", в ней поле "FDATE", в которое надо записать дату поставки. Формат поля "Краткий формат даты", маска ввод 00/00/0000/0_
База данных Access 2002-2003 *.mdb

Суть проблемы:
1) Когда из делфи запросом добавляю запись в таблицу Delivery access меняет местами день и месяц в дате. Причем меняет выборочно, т.е. если день в промежутке от 1 до 12, то заменяет, если больше, то записывает как надо.
Пример: дата 08.02.2019 сохраняется как 02.08.2019, а 14.02.2019 сохраняется как надо.

2) При выборке из таблицы Delivery нужно указать период поставок.
Нижеописанный запрос возвращает пустой набор данных.
SELECT *
FROM Delivery
WHERE Delivery.FDATE BETWEEN #01/02/2019# AND #02/03/2019#
ORDER BY Delivery.FDATE, Delivery.ID_Deliver;

Если меняю период дат, он выдает набор данных с поставками, но диапазон дат не соответствует.

К примеру, нижеописанный запрос возвращает поставки в указанный период, но к ним добавляет поставки за 05.03.2019:

SELECT *
FROM Delivery
WHERE Delivery.FDATE BETWEEN #28/02/2019# AND #04/03/2019#
ORDER BY Delivery.FDATE, Delivery.ID_Deliver;


Пытался заменить BETWEEN на простое условие >= and <=, но результат тот же.


__________
Почему с датами всегда все сложно?

[Евгений Келер]

Вот сама БД.
У меня основной задачей является отображение информации о поставках за определенный период.
Сперва в программе я выбираю от кого отобразить поставки (от физ. лиц или организаций), затем выбираю период поставок: 2 компонента TDateTimePicker, после чего запрашиваю из БД набор данных:

with adoqDelivery do
      begin
        Close;
        // Преобразуем дату в формат "00/00/0000"
        Date1 := StringReplace(DateToStr(DateTimePicker1.Date), '.', '/',
          [rfIgnoreCase, rfReplaceAll]);
        Date2 := StringReplace(DateToStr(DateTimePicker2.Date), '.', '/',
          [rfIgnoreCase, rfReplaceAll]);

        SQL.Text := 'SELECT Delivery.FDATE, FizFace.FIO, ' +
          'FizFace.PASSPORT, FizFace.ADDRESS, FizFace.PHONE, ' +
          'Product.NAIM, Product.FYEAR, Delivery.FCOUNT, Delivery.PRICE, ' +
          'Delivery.ID_PRODUCT, Delivery.ID FROM Product INNER JOIN ' +
          '(FizFace INNER JOIN Delivery ON FizFace.ID = Delivery.ID_Deliver) ' +
          'ON Product.ID = Delivery.ID_PRODUCT ' + 'WHERE ' +
          '(((FDATE) BETWEEN #' + Date1 + '# AND #' + Date2 + '#) ' +
          'AND ((TYPE_DELIVER)=True)) ORDER BY Delivery.FDATE;';
        Open;
      end;

Запрос нормально все отображает, за исключением фильтра по датам. Он либо возвращает пустой набор данных, либо отображает записи, в которых дата поставки отклоняется на день-два от диапазона, указанного в BETWEEN

[Аватар]

В Date еще вообще-то и время есть. И о параметризованных запросах не слышал? Типа такого

var d1: TDateTime;

  ADOQuery1.Close;
  ADOQuery1.SQL.Text:='select * from Delivery where fdate=:DateFrom';
  d1:=Trunc(DateTimePicker1.Date);
  ADOQuery1.Parameters.ParamByName('DateFrom').Value:=d1;
  ADOQuery1.Open;

PS для INSERT или UPDATE из делфи тоже применяй параметризованный запрос и не будет болячки с датами

[Serge_Bliznykov]

Используйте параметрический запрос

http://www.programmersforum.ru/showp...18&postcount=2

Сообщение от Евгений Келер

/ Преобразуем дату в формат "00/00/0000"

Даты не надо никуда преобразовывать.

Сообщение от Евгений Келер

затем выбираю период поставок: 2 компонента TDateTimePicker

там содержится не только дата, но время, поэтому нужно отрезать временную часть,
например, через Trunc()

http://www.programmersforum.ru/showp...18&postcount=2


ДОБАВЛЕНО

Сообщение от Аватар

И о параметризованных запросах не слышал? Типа такого

Упс.. я опоздал и повторил то же самое. Извините...

[Евгений Келер]

Понял. Спасибо большое.
А насчет коммента "Преобразования даты к виду 00/00/0000" - в DateTimePicker она хранится в виде 00.00.0000, а access в запросе требует слеш, а не точку. На этом месте кода ошибка была, прошлось поменять вид даты.

А разве передавая в переменную значение DateTimePicker1.Date я получаю не только дату?

И да, я не слышал о параметризованных запросах, но это исправлю.

[Аватар]

в DateTimePicker она хранится в виде 00.00.0000

Дата хранится в формате плавающего числа. Целая часть - дата, дробная - время. В access тоже. А отображаться может по разному, как отформатируешь так и будет

А разве передавая в переменную значение DateTimePicker1.Date я получаю не только дату?

ShowMessage(DateTimeToStr(DateTimePicker1.Date));

и вопросы отпадут