LPARAMETERS nKeyCode, nShiftAltCtrl if nkeycode=13 use table1 set talk off set echo off m.dat=thisform.text2.value m.plan=thisform.text3.value m.true=thisform.text4.value m.hot=thisform.text5.value m.balance=thisform.text6.value m.mint=thisform.text7.value m.other=thisform.text8.value m.rem=thisform.text9.value append blank gather memvar SUM CTOT(plan) - CTOT("00:00:00") to lnSec&& i need to sum a nother fields(true,hot,balanc,mint,other) as plan ? PADL(INT(lnSec/3600), 2, "0") + ":" + ; PADL(INT((lnSec%3600)/60),2, "0") + ":" + ; PADL(lnSec % 60,2, "0") SUM VAL(LEFT(plan,2))*3600 + ; VAL(SUBSTR(plan,4,2))*60 + ; VAL(RIGHT(plan,2)) TO lnSec THISFORM.TEXT10.VALUE= PADL(INT(lnSec/3600), 2, "0") + ":" + ; PADL(INT((lnSec%3600)/60),2, "0") thisform.refresh endifm.qasem