Мастера! Помогите с запросом!!!

← →
Солер © (2003-06-13 08:40) [0]

Уважаемые, Мастера!
Начинающий запарился.

Помогите составить запрос.

В базе, в таблице которой есть столбец записываются данные в
формате DATE т.е. 12.12.1999 ну и так далее.
Как мне составить запрос,чтобы данные отбирались
игнорируя число и месяц, только по году.
Да ещё необходимый год для отбора данных обязательно вводится
в Edit.Text.

Спасибо

← →
Соловьев © (2003-06-13 09:35) [1]

в Query.SQL пишем:
select * from table1 where EXTRACT(YEAR FROM fielddate)=:P_Year
В проге пишем:
... with Query do begin if Active then Close; ParamByName("P_Year").AsDateTime := StrToDate(Edit1.Text); //вместо Edit1.Text лучше использовать DateTimePicker if Prepared then Prepare; Open; end; ...

← →
Соловьев © (2003-06-13 09:39) [2]

> where EXTRACT(YEAR FROM fielddate)=:P_Year

... where EXTRACT(YEAR FROM fielddate)=EXTRACT(YEAR FROM :P_Year) ...
наверное надо так :))

← →
HSolo © (2003-06-13 09:45) [3]

Выборка по году:
select ... from ...
where extract(year from СтолбецСДатой) = НужныйГод
А какая разница, куда год вводится? Есть проблемы со вводом?

← →
HSolo © (2003-06-13 10:22) [4]

опередил однофамилец :)) Ладно, еще 5 коп. Можно, конечно, и дату выбирать, но... зачем целая дата, если нужен только год? Может, проще вводить год чем-то вроде SpinEdit?

← →
Солер © (2003-06-13 10:23) [5]

=> Соловьёву
Попробовал. Не идёт
Ввожу в Edit 2000(чтобы отобрать записи по 2000 году) пишет 2000 не является датой.

=> HSolo
Для моей программы удобнее если в Edit вводится значение года - 1999, 2000 и т.д.

← →
Соловьев © (2003-06-13 10:25) [6]

> Ввожу в Edit 2000(чтобы отобрать записи по 2000 году) пишет
> 2000 не является датой.

конечно не является, тогда тебе надо StrToInt(Edit1.Text) и использовать первую конструкцию SQL.

← →
Солер © (2003-06-13 10:51) [7]

Теперь гад выдаёт
mismstch in expression
что - то про несоответствие типов :(

> ParamByName("P_Year").AsDateTime := StrToDate(Edit1.Text);

... ParamByName("P_Year").AsInteger := StrToInt(Edit1.Text); ...

Спасибо. Особено господину Соловьёву за терпение и выдержку с нами начинающими.
Ещё раз спасибо всё заработало

> за терпение и выдержку с нами начинающими.

я тоже начинающий, так что учусь вместе с Вами :)))

Мастера! Помогите с запросом!!! Найти похожие ветки