WEEK()
 Returns the calendar week for a date
------------------------------------------------------------------------------
 Syntax

     WEEK([<dDate>]) --> nWeekOfYear

 Argument

     <dDate>  Designates a date for which the week it lies in, is
     determined.  The default is the system date.

 Returns

     WEEK() returns a sequential week number that designates in which week of
     the year <dDate> lies.

 Description

     The week of the year in which a day lies is information required by a
     number of technical financial calculations or wage accounting.  This
     function determines this week and acknowledged all calendar rules.

 Note

     .  When no date is specified, then WEEK() uses the system date.
        An empty date leads to a 0 result.

 Example

     Determine the week for a date:

     dDate  :=  CTOD("03/14/92")

     ? "This date is in week:  ", WEEK(dDate)