Return a text string of a date
──────────────────────────────────────────────────────────────────────────────

 Syntax

        GT_TextDate([<dDate>]) => cLongDate

 Arguments:

      <dDate> is the date to be used.

 Returns:

      "WeekDay the NNth of Month, Year" as a string

 Description:

      To return a text string giving the date in long
      hand for the date passed as the parameter.

 Examples:

      cLongDate := GT_TextDate(DATE())

      // "Thursday the 4th of February 1993"

 Source: GT_TEXTD.PRG

 Author:  Martin Bryant