ldDate = DATE(2012,02,01) ? BoM(ldDate) ? EoM(ldDate) ? NDoM(ldDate) *-- Begin of month FUNCTION BoM(tdFecha) RETURN DATE(YEAR(tdFecha),MONTH(tdFecha),1) ENDFUNC *-- End of month FUNCTION EoM(tdFecha) LOCAL ld ld = GOMONTH(tdFecha,1) RETURN ld - DAY(ld) ENDFUNC *-- Number of days of the month FUNCTION NDoM(tdFecha) LOCAL ld ld = GOMONTH(tdFecha,1) RETURN DAY(ld - DAY(ld)) ENDFUNC