Leap YearS

[virger]

Desde COSTA RICA
With only 8 lines of code list from 1900 to 2020 years Leap

Code: Select all

loop "1900" "2020" "[Yr]"
    DateToNum "29/02/[Yr]" "d/m/y" "[Year_[Yr]]"
    if "[Year_[Yr]]" "<>" "Error"
        setvar "[Year_[Yr]]" "Leap"
    else
        setvar "[Year_[Yr]]" ""
    endif
endloop

May help you with dates.
NEXT GRECIA

[Neosoft Support]

Terrific! Thank you.