Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.06.26;
Скачать: CL | DM;

Вниз

Две даты   Найти похожие ветки 

 
AtoL2k2   (2003-06-12 09:56) [0]

Проблема следующая. Как узнать, относятся ли две даты к одному месяцу, если месяц заканчивается 25м числом. То есть например
с 26.01.2000 по 25.02.2000- это один месяц.
То есть две даты (произвольные) d1.m1.y1 и d2.m2.y2
нужно условие, попадают ли они в один месяц.

з.ы. Причем период с 26.12.2000 по 25.01.2001 тоже считается месяцем.


 
Sandman25 ©   (2003-06-12 10:17) [1]

if d1>25 then newD1 := date1 + 10
else newD1 := date1;
if d2>25 then newD2 := date2 + 10
else newD2 := date2;
odinPeriod := (Year(date1)=Year(date2)) and (Month(date1)=Month(date2));


 
AtoL2k2   (2003-06-12 10:52) [2]

to Sandman25 :
огромное спасибо
правда
odinperiod:=(year(newd1)=year(newd2))and (month(newd1)=month(newd2))
но ничего. Классно! до этого я проверял трехэтажное условие, которое к тому же не работало.

Причем, Ваш пример работает в SQL процедуре!
Еще раз огромное спасибо. Сам бы не догадался


 
Sandman25 ©   (2003-06-12 11:11) [3]

Да, извиняюсь за ошибку.
Я сначала тоже начал писать трехэтажное условие, а потом стало лень, и я решил заставить все рассчитываться автоматически :)



Страницы: 1 вся ветка

Текущий архив: 2003.06.26;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.015 c
3-83909
Ann
2003-06-03 10:55
2003.06.26
Error


1-84383
inspirion
2003-06-09 10:24
2003.06.26
Отмена закрытия приложения


6-84509
FZ*XupypG
2003-04-20 08:53
2003.06.26
Доступ к папке с паролем


14-84730
SpoinT
2003-06-05 15:33
2003.06.26
Как изменить заголовок файла exe


4-84817
zolotov
2003-04-22 17:51
2003.06.26
Отслеживание запущенных приложений