//The variable must contain a numeric value representing an OLE automation 
//date/time. Returns the day of week as an ordinal value from 0 TO 6 where 0 
//is Sunday.

ASSIGN MyDow = "{DOW}"

SWITCH MyDow
{
  CASE 0
  {
    ASSIGN NewToday = "Sunday"
  }
  CASE 1
  {
    ASSIGN NewToday = "Monday"
  }
  CASE 2
  {
    ASSIGN NewToday = "Tuesday"
  }
  CASE 3
  {
    ASSIGN NewToday = "Wednesday"
  }
  CASE 4
  {
    ASSIGN NewToday = "Thursday"
  }
  CASE 5
  {
    ASSIGN NewToday = "Friday"
  }
  CASE 6
  {
    ASSIGN NewToday = "Saturday"
  }
}