Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как сделать запрос [D5, Access]


AlexTregubov ©   (2005-01-12 10:32:00) 

Мастера, подскажите как выбрать из базы всех ЮБИЛЯРОВ, т.е. тех, кому в текущем году исполняется 50, 55, 60, 65, 70, 75, 80 лет.
Их нужно еще сгруппировать по юбилейным датам.
Как бы это сделать попроще и правильнее.
Спасибо.


msguns   (2005-01-12 12:31:00) [1]

Конкурс на тему, кто лучше споет "у попа была собака" ?


Соловьев   (2005-01-12 10:56:00) [2]

select 1, *
from Persons
where Year(BirthDate) - Year() = 50
union
...
select 7, *
from Persons
where Year(BirthDate) - Year() = 80
order by 1


ЮЮ   (2005-01-12 10:48:00) [3]

SELECT
 (Год(BirthDay) - :CurYear) Age, *
FROM
 Persons
WHERE
 ПривестиКЦелому((Год(BirthDay) - :CurYear [+ 4]) / 5) * 5 =
 ((Год(BirthDay) - :CurYear1)
ORDER BY
 1

где Год и ПривестиКЦелому соответствующие функции соответствующего движка, а необходимость прибавления константы диктуется правилами округления


Александр Иванов   (2005-01-12 10:46:00) [4]

Александр Иванов ©   (12.01.05 10:45) [1]

Where (((Year(Now)-Year(BDate))/5)*5)-(Year(Now)-Year(BDate))=0


Александр Иванов   (2005-01-12 10:45:00) [5]

AlexTregubov   (12.01.05 10:32)

Примерно так:

Select * from Table1 Where (((Year(Now)-Year(BDate))/5)*5)=0


Наверх

Титульная страница Поиск, карта сайта Написать письмо