Firsttime = '18:00:00' Chk1time = '08:03:45' ? GetTimeDiff(Firsttime,Chk1time) PROCEDURE GetTimeDiff ( time1,time2 ) RETURN STUFF(STUFF(RIGHT(TTOC({^1900/01/01 00:00} + (EVALUATE('{^1900/01/01 '+m.time2+'}')-EVALUATE('{^1900/01/01 '+m.time1+'}'))%86400,1),6),5,0,':'),3,0,':') ENDPROCFabio