* AddTimeStrings([08:35], [06:55]) = [15:30] FUNCTION AddTimeStrings LPARAMETERS ; tcTimeString1, ; tcTimeString2 RETURN MinutesToTimeString(TimeStringToMinutes(tcTimeString1) + TimeStringToMinutes(tcTimeString2)) * EOM() **************** FUNCTION TimeStringToMinutes LPARAMETERS ; tcTimeString RETURN VAL(RIGHT(tcTimeString, 2)) ; + (60 * VAL(SUBSTR(tcTimeString, 1, LEN(tcTimeString) - 3))) * EOM() **************** FUNCTION MinutesToTimeString LPARAMETERS ; tnMinutes LOCAL ; lnHours, ; lnMinutes lnMinutes = MOD(tnMinutes, 60) lnHours = INT(tnMinutes / 60) RETURN LTRIM(STR(lnHours)) ; + [:] ; + IIF(lnMinutes < 10, [0], []) ; + LTRIM(STR(lnMinutes)) * EOM() ****************