INWEEKS(<D start date>, <D end date>)
 Evaluates the number of weeks between two dates.
 Returns <expN> number of weeks between two dates.

 Returns -1 if start date is greater than end date.

 Useful in applications that handle dates by weeks.

 date1 = CTOD("08/07/86")
 date2 = CTOD("08/17/86")
 date3 = CTOD("11/26/86")

 INWEEKS( date1, date2 ) returns  1.57
 INWEEKS( date1, date3 ) returns 16.00
 INWEEKS( date2, date3 ) returns 14.57
 INWEEKS( date3, date1 ) returns -1


             Placed in the Public Domain by Tom Rettig Assoc.