Hmm, the start date isn't relevant. It's all about the difference so the
ldDate1 = Date(2000,1,1) should not matter for the outcome.
The ldDate2 = ldDate1 + tnTotDays + 1 seems fault to me. If you pass a value
of 0 to the function, the difference should be 0 years, 0 months and 0 days.
Adding the 1 to the equation would result in a difference of 1 day?

Sietse

-----Oorspronkelijk bericht-----
Van: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
Namens aihsan
Verzonden: donderdag 29 maart 2007 12:01
Aan: [EMAIL PROTECTED]
Onderwerp: RE: Date calculations.

I think to get correct answer, two line should change like these:

>  ldDate1 = DATE()
>  ldDate2 = DATE() + tnTotDays

ldDate1 = Date(2000,1,1)
ldDate2 = ldDate1 + tnTotDays + 1

-----Original Message-----
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On
Behalf Of Vince Teachout
Sent: Thursday, March 29, 2007 6:49 AM
To: [EMAIL PROTECTED]
Subject: Re: Date calculations.

Sietse Wijnker wrote:
> And my stab at it:
> IMHO, less calculations, less problems
>
> FUNCTION verbosedate
>  LPARAMETERS tnTotDays
>
>  LOCAL lnYears, lnMonths, lnDays
>  LOCAL ldDate1, ldDate2
>  ldDate1 = DATE()
>  ldDate2 = DATE() + tnTotDays
>
>  lnYears = YEAR(ldDate2) - YEAR(ldDate1)
>  lnMonths = MONTH(ldDate2) - MONTH(ldDate1)
>  lnDays = DAY(ldDate2) - DAY(ldDate1)
>  ? lnYears, lnMonths, lnDays
>
> RETURN
> ENDFUNC




[excessive quoting removed by server]

_______________________________________________
Post Messages to: [email protected]
Subscription Maintenance: http://leafe.com/mailman/listinfo/profox
OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech
** All postings, unless explicitly stated otherwise, are the opinions of the 
author, and do not constitute legal or medical advice. This statement is added 
to the messages for those lawyers who are too stupid to see the obvious.

Reply via email to