*FUCTION SecToTime * Convert seconds to the Time string PARAM nSeconds LOCAL cHH, nTm, cMM, cSec, cTime, i cHH = ALLT(STR(INT(nSeconds / 3600))) nTm = nSeconds % 3600 cMM = PADL(INT(nTm / 60), 2, "0") cSec = PADL(MOD(nTm, 60), 2, "0") cTime = cHH + ":" + cMM + ":" + cSec RETURN cTime