EOY()

Last date Of Year

Syntax

       EOY( [<dDate>] ) -> dDateEndOfYear

Argument

[<dDate>] Date to find last day of year, default is DATE()

Returns

<dDateEndOfYear> Last date Of Year of given date

Example

       SET DATE ANSI
       ? EOY( hb_SToD( "20000101" ) ) // -> "2000.12.31"
       ? EOY( hb_SToD( "20010101" ) ) // -> "2001.12.31"
       *--------------------
       PROC MAIN()
             SETMODE( 25, 80 )
             CLS
             SET DATE GERM
             SET CENT ON
             ? "Today is ", DATE()
             ? "Last day of this year ", EoY()
             ? "Remaining days in the current year", EoY() - DATE()
             ?
             WAIT "EOF EoY.prg"
          RETURN // MAIN

Compliance

EOY() is compatible with CT3’s EOY().

Platforms

All

Files

Source is datetime.prg, library is libct.

See also

BOM(), EOM(), BOQ(), EOQ(), BOY()