Click above to get retro games delivered to your door ever month!

                                 L_ISLEAP()


Syntax:        L_ISLEAP(<expD>)


Purpose:       To test whether a date falls within a leap year.


Arguments:     <expD> is a Clipper date.


Returns:       A logical (.T.) if the date falls within a leap year
               else returns a logical (.F.).


Usage:         In date based calculations and validation routines.


Examples:      ? L_ISLEAP(CTOD("01/01/1900")    && Result: .F.
               ? L_ISLEAP(CTOD("01/01/2000")    && Result: .T.


Notes:         For "century years", these are only leap years if
               exactly divisible by 400.


Language:      Clipper