Function calcTime Completed