>DO WHILE NOT EOF() > m.divi = curbilldata.divi > DO WHILE m.divi = curbilldata.divi AND NOT EOF() > SKIP > ENDDO > > > IF NOT EOF() > m.lnCurRec = RECNO() > INSERT BEFORE BLANK ><pre> >&&&i mean instead this part >m.dae=SecondToHour( TimeToSeconds('34:20') + TimeToSeconds('36:40') + TimeToSeconds('71:10') + TimeToSeconds('66:10')) > > >***************************************************************** >SUM TimeToSeconds(m1_m)TO lnSec for m.divi = curbilldata.divi >m.dae=SecondToHour(lnSec) > >* >* I hope you see how much readable this is >* >************************************************************** > > > > GOTO m.lnCurRec > replace m1_m WITH m.dae > SKIP &&& i get error > ENDIF >ENDDO>
>>DO WHILE NOT EOF() >> m.divi = curbilldata.divi >> DO WHILE m.divi = curbilldata.divi AND NOT EOF() >> SKIP >> ENDDO >> >> >> IF NOT EOF() >> m.lnCurRec = RECNO() >> INSERT BEFORE BLANK >><pre> >>&&&i mean instead this part >>m.dae=SecondToHour( TimeToSeconds('34:20') + TimeToSeconds('36:40') + TimeToSeconds('71:10') + TimeToSeconds('66:10')) >> >> >>***************************************************************** >> SUM VAL(LEFT(m1_m,2))*3600 + ; >> VAL(SUBSTR(m1_m,4,2))*60 + ; >> VAL(RIGHT(m1_m,2)) TO lnSec for m.divi = curbilldata.divi >>m.dae= PADL(INT(lnSec/3600), 6, "0") + ":" + ; >> PADL(INT((lnSec%3600)/60),2, "0") && >>************************************************************** >> >> >> >> GOTO m.lnCurRec >> replace m1_m WITH m.dae >> SKIP &&& i get error >> ENDIF >>ENDDO >>