>We need to determine exactly how many months difference there is between 2 dates in VFP
>Example:
>01/01/2001 - 03/01/2001 = 3 months
>
>We are currently trying the following:
>x=date1 (01/01/2001)
>y=date2 (03/01/2001)
>z=y - x
>b=z/365*12
>c=b +1
>
>result=int(c)
>
>The problem we are running into is short months
>
>
>Larry

lparameters tdStart, tdEnd
local ldStart, ldEnd, lnMonths
ldEnd = max(tdStart,tdEnd) && Swap start-end if necessary
ldStart = min(tdStart,tdEnd)
lnMonths = int((ldEnd-ldStart)/28) && Max possible months
do while gomonth(ldStart,lnMonths)>ldEnd
	lnMonths = lnMonths - 1
enddo
return lnMonths

Cetin