Click above to get retro games delivered to your door ever month!

Function:    ALPHADATE()

Purpose:     Convert date variables to alphabetic format

Syntax:      ALPHADATE( [ date ] )

Arguments:   date        - Optional date type date variable to display.
                           If omitted the default DATE() is used.

Returns:     The specified date as a character string in the form
             January 1, 1990

Description: ALPHADATE() provides a convenient method of printing a date
             in the form January 1, 1988.  If you print out text date
             strings often in your application, using the following code
             gets old quick:

             CMONTH(date) + ' ' + LTRIM(STR(DAY(date))) + ;
                           '  ' + STR(YEAR(date),4,0)

Notes:       If an invalid parameter is passed, RLIBERROR() will be set
             and a null string will be returned.

Example:     ? DATE()                        && if it is 01/01/90,
             ? ALPHADATE()                   && returns "January 1, 1990"
             ? ALPHADATE(DATE()+1)           && and "January 2, 1990"

             ? ALPHADATE(CTOD("12/31/90"))   && "December 31, 1990"

             ? ALPHADATE(12/31/90)           && bad parameter, returns ""
                                             && and sets RLIBERROR()=1008

Source:      RL_ALPHA.PRG

See also:    FILEDATE()