Numeric day of week from a full or partial character string
──────────────────────────────────────────────────────────────────────────────

 Syntax

            GT_DOW2N( <cDay> ) -> nValue

 Arguments:

                <cDay>       is a full or partial week day. "Mon", "Monday"

 Returns:

                A numeric value of the day of the week Sun -> 1

 Description:

                GT_DOW2N() can be used to get the numeric day of a character week day

 Examples:


                         local cDay := "Mon"

                         ? "Day of Week for", cDay, " is ", GT_DOW2N( cDay )

                         result :
                                          Day of Week for Mon is 2


 Source: GT_DOW2N.PRG

 Author:  George Brennan