FUNCTION LastDay(dDate)
LOCAL ret_val
ret_val = dDate + (7-DOW(dDate,2))
RETURN CDOW(ret_val) + " " + DTOC(ret_val)
Against Stupidity the Gods themselves Contend in Vain - Johann Christoph Friedrich von Schiller
The only thing normal about database guys is their tables.