Фильтр по пустому полю data

[alanpa]

Есть поле dataprint - дата открытия магазина - (ftdata).
Как создать фильтр по дате вообще - получается, например, так:

Код: Выделить всё

   dbnalog.Filter:='DTOS(dataprint)>"20110101"'
   dbnalog.Filtered:=true; 

А как отфильтровать записи, у которых это поле пустое? (нужен список магазинов, у которых дата открытия не определена.

lazarus v0.9.31
win7, ubuntu

[Ism]

Может

Код: Выделить всё

dbnalog.Filter:='DTOS(dataprint) is null '

Что за функция DTOS ? Какая база данных ? Разрешены ли null значения в поле ?

[alanpa]

DTOS(data) преобразует дату в строку вида yyyymmdd
База dbf
null не запрещены
Так:

Код: Выделить всё

dbnalog.Filter:=('dataprint is null');   

и так

Код: Выделить всё

dbnalog.Filter:=(DTOS('dataprint) is null');   

не получилось.

[Ism]

значит осталось
dbnalog.Filter:='DTOS(dataprint) = "" '

Нужно выяснить какое значение возвращает DTOS в случае пустого поля. И вообще, что это за функция ?

[Vadim]

И вообще, что это за функция ?

Те, кто работал с dBase и FoxPro в конце прошлого века, её прекрасно помнят. Для более молодого поколения - заморачиваться не стоит, т.к. это уже дикий анахронизм, что-то вроде как ездить по горам на деревянном амокате, вместо горного байка.

[Ism]

Возможно DTOS(dataprint) вообще не работает, так как компонент связан с dbf напрямую. Хотя по идее должно выдавать ошибку.
Через какой компонент подключена база данных ?

[Vadim]

Через какой компонент подключена база данных ?

99% - через TDBF. Никаких других компонент для работы с dbf-файлами в Lazarus нет.

Возможно DTOS(dataprint) вообще не работает

Работает, если судить по сообщению:

Как создать фильтр по дате вообще - получается, например, так:
Код: Выделить всё
dbnalog.Filter:='DTOS(dataprint)>"20110101"'
dbnalog.Filtered:=true;

Можно попробовать вообще без DTOS():

Код: Выделить всё

dbnalog.Filter:='dataprint>""'

[alanpa]

Выпутался пока так:

Код: Выделить всё

if toolbutton4.down then
         dbnalog.Filter:='DTOS(dataprint)>"20110101"'
  else begin
          dbnalog.Filter:=('DTOS(dataprint)<"00010101"'); // <- магазин не имеет даты создания, если создан ранее первого года
  end;  

Те, кто работал с dBase и FoxPro в конце прошлого века, её прекрасно помнят. Для более молодого поколения - заморачиваться не стоит, т.к. это уже дикий анахронизм, что-то вроде как ездить по горам на деревянном амокате, вместо горного байка.

Подскажите, а куда смотреть, что бы тоже на байке?

[Mr.Smart]

Подскажите, а куда смотреть, что бы тоже на байке?

Смотрите в сторону любого SQL сервера. Если не требуется клиент-серверное решение, посмотрите в сторону SQLite3.