qtDateTime
|
Public Member Functions | |
integer function | qtdt_f_leapyeari (iYear) |
qtDT_F_LeapYearChecks, if a year is a leap-year. More... | |
integer function | qtdt_f_leapyeart (tDate) |
qtDT_F_LeapYearChecks, if a year is a leap-year. More... | |
integer function qtdt_f_leapyeari | ( | integer, intent(in) | iYear | ) |
Usage:
iRet = qtDT_F_LeapYear( iYear )
iYear | : year specification |
Returns 0 if year is not a leap-year
1 if year is a leap-year
If a year is a leap-year, the month February has 29 days. Otherwise it has 28.
integer function qtdt_f_leapyeart | ( | type (qtdt_t_date), intent(in) | tDate | ) |
Usage:
iRet = qtDT_F_LeapYear( tDate )
tDate | : date specification |
Returns 0 if year is not a leap-year
1 if year is a leap-year
If a year in a date specification is a leap-year, and if, the month February has 29 days. Otherwise it has 28.