3.17 (3 hours and .17 of an hour)
I suppose you could try this
//@QuarterHourRound
WhilePrintingRecords;
NumberVar Hour;
NumberVar Whole;
NumberVar Fraction;
StringVar result;
Whole := DateDiff(whatever the expression is);
Hour := Truncate(whole,0);
Fraction := Whole - hour;
if Fraction < .125 then
result := totext(Hour,0) + ":00"
else if Fraction < .375 then
result := totext(Hour,0) + ":15"
else if Fraction < .625 then
result := totext(Hour,0) + ":30"
else if Fraction < .875 then
result := totext(Hour,0) + ":45"
else if Hour + 1 > 23 then
result := "00:00"
else
result := totext(Hour + 1,0) + ":00";
result;
that should do it.
Jim Broadbent