Firsttime = '18:00:00' Chk1time = '18:03:45' ? GetTimeDiff(Firsttime,Chk1time) PROCEDURE GetTimeDiff ( time1,time2 ) PRIVATE diffTime diffTime = EVALUATE('{^1900/01/01 '+m.time2+'}')-EVALUATE('{^1900/01/01 '+m.time1+'}') RETURN PADL(INT(m.diffTime/3600),2,'0')+':'+PADL(INT(ABS(m.diffTime)/60)%60,2,'0')+':'+PADL(ABS(m.diffTime)%60,2,'0') ENDPROCFabio