Quarter()

Quarter()

Returns a number equal to the quarter in which a date falls

Syntax

      Quarter( [<dDate>] ) -> nQuarter

Argument

<dDate> Designates in which quarter the specified date lies. The default is the system date.

Returns

Quarter() returns a number that identifies the quarter in which <dDate> lies.

Description

Returns a number equal to the quarter in which ddate falls. If <ddate> is empty, the system date is employed.

Note

. When no date is specified, the function automatically uses the system date. An empty date returns 0 as a result.

Example

       Compute a delivery date:
       ? "We will deliver in quarter ", Quarter(CTOD     ("07/12/1991")), "1991"

Compliance

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

Platforms

All

Files

Source is dattime2.prg, library is libct.

Seealso

BOQ(), EOQ()

EOY()

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()

EOM()

EOM()

End Of Month

Syntax

       EOM( [<dDate>] ) -> <dDateEndOfMon

Argument

[<dDate>] Date to find last day

Returns

<dDateEndOfMonth> Last date Of Month

Examples

       SET DATE ANSI
       ? EOM( hb_SToD( "20000101" ) ) // -> "2000.01.31"
       ? EOM( hb_SToD( "20000201" ) ) // -> "2000.02.29"
       PROC MAIN()
            SETMODE( 25, 80 )
            CLS
            SET DATE GERM
            SET CENT ON
            ? "Today is ", DATE()
            ? "Last day of this month ", EOM()
            ? "Remaining days in the current month:", EOM() - DATE() 
            ?
            WAIT "EOF EOM.prg"
         RETURN // MAIN
/*
Today is : 04.07.2013
Last day of this month : 31.07.2013
Remaining days in the current month: 27
EOF EOM.prg
*/

Compliance

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

Platforms

All

Files

Source is datetime.prg, library is libct.

See also

BOM(), BOQ(), EOQ(), BOY(), EOY()

BoY()

BoY()

Date to find first day of year, default is DATE()

Syntax

       BoY( [<dDate>] ) -> dDateBeginOfYear

Argument

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

Returns

<dDateBeginOfYear> : Beginning date Of year of given date

Example

       PROC MAIN()
          SETMODE( 25, 80 )
          CLS
          SET DATE GERM
          SET CENT ON
          ? "Today is :", DATE()
          ? "Date of first day of this year :", BOY()
          ? "Days elapsed in the current year:", DATE() - BOY()
          ?
          WAIT "EOF BoY.prg"
       RETURN // MAIN

Compliance

BoY() is compatible with CT3’s BoY()

Platforms

All

Files

Library is hbct.

See also

BoM(), EoM(), BoQ(), EoQ(), EoY()

BoQ()

BoQ()

Date of beginning Of quarter containing given date

Syntax

       BoQ( [<dDate>] ) -> <dDateBeginOfQuarter>

Argument

[<dDate>] : Date to find Begin Of Quarter, default is DATE()

Returns

<dDateBeginOfQuarter> : Date of beginning Of quarter containing given date

Example

       PROC MAIN()
            SETMODE( 25, 80 )
            CLS
            SET DATE GERM
            SET CENT ON
            ? "Today is :", DATE()
            ? "Beginning day of this quarter :", BOQ()
            ? "Days elapsed in the current quarter :", DATE() - BOQ()
            ?
            WAIT "EOF BOQ.prg"
         RETURN // MAIN

Compliance

BoQ() is compatible with CT3’s BoQ()

Platforms

All

Files

Library is hbct.

See also

BoM(), EoM(), EoQ(), BoY(), EoY()

BoM()

BoM()

Beginning date Of Month of given date

Syntax :

      BoM( [<dDate>] ) -> <dDateBeginOfMonth>

Argument :

[<dDate>] : Date to find first day of month, default is DATE()

Returns :

<dDateBeginOfMonth> : Beginning date Of Month of given date

Examples

       PROC MAIN()
          SETMODE( 25, 80 )
          CLS
          SET DATE GERM
          SET CENT ON
          ? "Today is :", DATE()
          ? "Date of first day of this month :", BOM()
          ? "Days elapsed in the current month:", DATE() - BOM()
          ?
          WAIT "EOF BOM.prg"
       RETURN // MAIN

Compliance

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

Platforms

All

Files

Library is hbct.

See also

EoM(), BoQ(), EoQ(), BoY(), EoY()