FUNCTION DaysInMonth
PARAMETER dDate
RETURN DAY(GOMONTH(dDate - DAY(dDate) + 1, 1) - 1)
FUNCTION EomDate
PARAMETER dDate
RETURN GOMONTH(dDate - DAY(dDate) + 1, 1) - 1
FUNCTION BomDate
PARAMETER dDate
RETURN dDate - DAY(dDate) + 1