or...

Function LeapinLizards
lpar pYear
return day(date(pYear,3,1)-1) = 29

I am amazed how many cats with fur are around when there are SOO many ways to skin a cat!

Glenn

>>Jim it returns .T. for all the years ????
>>
>>
>>>Akhan,
>>>
>>>Here's a UDF that skips the math stuff;
>>>
>>>

>>>PROCEDURE IsLeapYear(tnYear)
>>>
>>>RETURN MONTH(DATE(tnYear,2,27) + 1 ) = 2
>>>

>
>Jim made a correction to his formula. It should be 28 instead of 27.
>RETURN MONTH(DATE(tnYear,2,28) + 1 ) = 2