Login
Templates, Tools and Utilities
for Clarion Developers
Templates, Tools and Utilities
|
||
|
|
|
Add a comment to an Icetips ArticlePlease add your comments to this article.
Please note that you must provide both a name and a valid email address in order
for us to publish your comment. Comments are moderated and are not visible until they have been approved. Spam is never approved!
Back to article list Search Articles Add Comment Printer friendly Direct link Par2: Months between dates 2002-08-23 -- Michael Ware For just the number of months between dates:
12 * (Year(Dt1) - Year(Dt2)) + Month(Dt1) - Month(Dt2)
If you're looking for fractional months (i.e. in your example March 20th is
about 2/3 into the month) it's more complicated, something like:
12*(Year(Dt1)-Year(Dt2)) + Month(Dt1) - Month(Dt2) +
(DAY(Dt1)/DAY(DATE(Month(Dt1)+1,1,YEAR(Dt1))+1)) -
(DAY(Dt2)/DAY(DATE(Month(Dt2)+1,1,YEAR(Dt2))+1))
Carl Barnes adds:
You're calc is close but you have an error in trying to find the last day of
the month, you had +1 where you wanted -1. Revised calc is:
MosMy = 12*(Year(Dt1)-Year(Dt2)) + Month(Dt1) - Month(Dt2) + |
(DAY(Dt1)/DAY(DATE(Month(Dt1)+1,1,YEAR(Dt1))-1)) - | ! +1))
changed to -1))
(DAY(Dt2)/DAY(DATE(Month(Dt2)+1,1,YEAR(Dt2))-1)) ! +1))
changed to -1))
To keep the result a little cleaner the below code only does the DAY calc if
the DAY() changes. Otherwise 6/1 to 7/1 would generate .998 instead of 1
month. It depends on how the developer wants fractional months handled. One
other way would be to (Day(Dt1)-Day(Dt2))/30.
MosMy2 = 12*(Year(Dt1)-Year(Dt2)) + Month(Dt1) - Month(Dt2) + |
CHOOSE(DAY(Dt1)=DAY(Dt2),0, | If
the Day changed
(DAY(Dt1)/DAY(DATE(Month(Dt1)+1,1,YEAR(Dt1))-1)) - |
(DAY(Dt2)/DAY(DATE(Month(Dt2)+1,1,YEAR(Dt2))-1)) |
)
The below function computes Fractional age and is well tested. The
fractional part is the days since your last Birthday divided by the days
between the last two birthdays (365 or 366)
BDay=DAY(DOB)
BMon=MONTH(DOB)
!Compute Year of the Last Birthday
YOLB=YEAR(TODAY())-CHOOSE(TODAY()
Today is May 3, 2024, 10:18 am This article has been viewed 35115 times.
|
|