ISLEAPYEAR()

IS_LEAP_YEAR(1)

PURPOSE

This function return true or false if the date in question falls within a leap year.

PARTS

1. f/c/e Required: - the date value to use, must be of D type.

RETURN TYPE - L

EXAMPLE

define date type D size 10

date = ctod("07/01/2012")

if is_leap_year(date)

//2012 is a leap year, in this case will return true.

msg 'This date falls within a leap year.'

else

msg 'This date does not fall within a leap year.'

endif