LPARAMETERS ttDateTime as Datetime LOCAL ltDateTime as Datetime, lnMinDT as Integer lnMinDT = MINUTE(ttDateTime) lnMinDiff = ICASE( BETWEEN(lnMinDT,0,14), 15-lnMinDT ; , BETWEEN(lnMinDT,15,29), 30-lnMinDT ; , BETWEEN(lnMinDT,30,44), 45-lnMinDT ; , 60-lnMinDT) ltDateTime = ttDateTime + lnMinDiff*60 - SEC(ttDateTime) RETURN ltDateTime