PROCEDURE ElapseTime(pdStart, pdEnd) LOCAL lnSeconds, lndays, lnhours, lnminutes, lnseconds, lcResult lnSeconds = pdEnd - pdStart lnDays = INT(lnSeconds/86400) lnSeconds = lnSeconds - (lnDays*86400) lnHours = INT(lnSeconds/3600) lnSeconds = lnSeconds - (lnHours*3600) lnMinutes = INT(lnSeconds/60) lnSeconds = lnSeconds - (lnMinutes*60) lcResult = ALLTRIM(STR(lnDays,5,0)) + " Days " + ; PADL(ALLTRIM(STR(lnHours,5,0)),2,"0") + ":" + ; PADL(ALLTRIM(STR(lnMinutes,5,0)),2,"0") + ":" + ; PADL(ALLTRIM(STR(lnSeconds,5,0)),2,"0") RETURN lcResult