FT_MONTH()
Return Calendar or Fiscal Month Data
──────────────────────────────────────────────────────────────────────────────

Syntax

FT_MONTH( [ <dGivenDate> ], [nMonthNum] ) -> aDateInfo

Arguments

<dGivenDate> is any valid date in any date format. Defaults
to current system date if not supplied.

<nMonthNum> is a number from 1 to 12 signifying a month.
Defaults to current month if not supplied.

Returns

A three element array containing the following data:

aDateInfo[1] - The year and month as a character string "YYYYMM"
aDateInfo[2] - The beginning date of the month
aDateInfo[3] - The ending date of the month

Description

FT_MONTH() returns an array containing data about the month
containing the given date.

Normally the return data will be based on a year beginning
on January 1st with weeks beginning on Sunday.

The beginning of year date and/or beginning of week day can be
changed by using FT_DATECNFG(), which will affect all subsequent
calls to FT_MONTH() until another call to FT_DATECNFG().

The beginning of year date and beginning of week day may be reset
to January 1 and Sunday by calling FT_DATECNFG() with no
parameters.

Examples

// get info about month containing 9/15/90
aDateInfo := FT_MONTH( CTOD("09/15/90") )
? aDateInfo[1] // 199009 (9th month)
? aDateInfo[2] // 09/01/90 beginning of month 9
? aDateInfo[3] // 09/30/90 end of week month 9

// get info about month 5 in year containing 9/15/90
aDateInfo := FT_MONTH( CTOD("09/15/90"), 5 )
? aDateInfo[1] // 199005
? aDateInfo[2] // 05/01/90 beginning of month 5
? aDateInfo[3] // 05/31/90 end of month 5

// get info about month 5 in current year (1991)
aDateInfo := FT_MONTH( , 5 )
? aDateInfo[1] // 199105
? aDateInfo[2] // 05/01/91 beginning of month 5
? aDateInfo[3] // 05/31/91 end of month 5

Source: MONTH.PRG

Author: Jo W. French dba Practical Computing