[Lazarus] DateDif function needed

[waldo kitty]

On 11/16/2013 11:07 AM, waldo kitty wrote:
[...]
> but i still wonder if the last day of a month to the last day of another month
> should be counted as a full month...
>
> eg:
>    CalendarDateDiff: 2012-01-31 to 2012-02-29 =    0 yrs    0 mos   29 days
>    JediDateDiff:     2012-01-31 to 2012-02-29 =    0 yrs    0 mos   29 days
>
> should this actually be
>
>    2012-01-31 to 2012-02-29 =    0 yrs    1 mos   0 days

to this end, i now have my routine doing this... note *'s below...

CalendarDateDiff: 2012-01-31 to 2012-01-31 =    0 yrs    0 mos    0 days
JediDateDiff:     2012-01-31 to 2012-01-31 =    0 yrs    0 mos    0 days

CalendarDateDiff: 2012-01-31 to 2012-02-29 =    0 yrs    1 mos    0 days*
JediDateDiff:     2012-01-31 to 2012-02-29 =    0 yrs    0 mos   29 days

CalendarDateDiff: 2012-01-31 to 2012-03-31 =    0 yrs    2 mos    0 days
JediDateDiff:     2012-01-31 to 2012-03-31 =    0 yrs    2 mos    0 days

CalendarDateDiff: 2012-01-31 to 2012-04-30 =    0 yrs    3 mos    0 days*
JediDateDiff:     2012-01-31 to 2012-04-30 =    0 yrs    2 mos   30 days

CalendarDateDiff: 2012-01-31 to 2012-05-31 =    0 yrs    4 mos    0 days
JediDateDiff:     2012-01-31 to 2012-05-31 =    0 yrs    4 mos    0 days

CalendarDateDiff: 2012-01-31 to 2012-06-30 =    0 yrs    5 mos    0 days*
JediDateDiff:     2012-01-31 to 2012-06-30 =    0 yrs    4 mos   30 days

CalendarDateDiff: 2012-01-31 to 2012-07-31 =    0 yrs    6 mos    0 days
JediDateDiff:     2012-01-31 to 2012-07-31 =    0 yrs    6 mos    0 days

CalendarDateDiff: 2012-01-31 to 2012-08-31 =    0 yrs    7 mos    0 days
JediDateDiff:     2012-01-31 to 2012-08-31 =    0 yrs    7 mos    0 days

CalendarDateDiff: 2012-01-31 to 2012-09-30 =    0 yrs    8 mos    0 days*
JediDateDiff:     2012-01-31 to 2012-09-30 =    0 yrs    7 mos   30 days

CalendarDateDiff: 2012-01-31 to 2012-10-31 =    0 yrs    9 mos    0 days
JediDateDiff:     2012-01-31 to 2012-10-31 =    0 yrs    9 mos    0 days

CalendarDateDiff: 2012-01-31 to 2012-11-30 =    0 yrs   10 mos    0 days*
JediDateDiff:     2012-01-31 to 2012-11-30 =    0 yrs    9 mos   30 days

CalendarDateDiff: 2012-01-31 to 2012-12-31 =    0 yrs   11 mos    0 days
JediDateDiff:     2012-01-31 to 2012-12-31 =    0 yrs   11 mos    0 days



-- 
NOTE: No off-list assistance is given without prior approval.
       Please keep mailing list traffic on the list unless
       private contact is specifically requested and granted.