Напоминалка о Днях Рождения

[Harry]

Такую вот штуку пишу. Хочется, чтобы программа выдавала напоминание о днях рождения за выбранное количество дней. Есть база пиплов с занесенными датами рождения. Есть форма с SQL-запросом и DBGrid, есть два календаря для указания граничных значений времени (интервал "от" и "до").
Запрос:

Код:

SELECT Base."Code", Base."Name", Base."Birthday"
FROM "Base.DB" Base
WHERE Base."Birthday" BETWEEN :OT AND :DO

:OT и :DO - соответственно значения, которые будут выбираться в двух календарях на форме
Запрос должен вернуть людей, у которых ДР в интервале "от"-"до".
Но год мне не нужен, нужно, чтобы из даты выхватывался месяц. Из величин ОТ и ДО я его достаю функциями
DecodeDate(OT, Year, Month, Day) и DecodeDate(DO, Year, Month, Day). А вот как достать из набора данных Base."Birthday"? Там полная дата, день-месяц-год, сравнивать ее с месяцем - некорректно.
Как извлечь месяц из поля DateTime базы данных?  :nono:

[baldr]

Вообще дата, если закодированная - это BCD число. С ним можно производить операции сравнения и они будут корректными. Берешь текущую дату, кодируешь ее и сравниваешь - и все.

[Oldy]

Не совсем в топик, но все-же:

SELECT Base."Code", Base."Name", Base."Birthday"
FROM "Base.DB" Base
WHERE EXTRACT(DAY FROM  Base."Birthday")  BETWEEN :OT AND :DO AND
EXTRACT(MONTH FROM Base."Birthday") = :MESAC

See also: Local SQL Help  -> EXTRACT function