>LPARAMETERS nSeconds >* 86400 = Seconds per day >* 3600 = Seconds per hour >* 60 = Seconds per minute > >LOCAL nDays, nHours, nMinutes, cResult > >STORE 0 TO nDays, nHours, nMinutes >cResult = '' > >* How many days >DO WHILE nSeconds > 86400 > nDays = nDays + 1 > nSeconds = nSeconds - 86400 >ENDDO > >* How many hours >DO WHILE nSeconds > 3600 > nHours = nHours + 1 > nSeconds = nSeconds - 3600 >ENDDO > >* How many minutes >DO WHILE nSeconds > 60 > nMinutes = nMinutes + 1 > nSeconds = nSeconds - 60 >ENDDO > >IF nDays > 0 > cResult = TRANSFORM(nDays) + ' Days ' >ENDIF >IF nHours > 0 > cResult = cResult + TRANSFORM(nHours) + ' Hours ' >ENDIF >IF nMinutes > 0 > cResult = cResult + TRANSFORM(nMinutes) + ' Minutes ' >ENDIF >IF nSeconds > 0 > cResult = cResult + TRANSFORM(nSeconds) + ' Seconds ' >ENDIF > >RETURN cResult > >