>SELECT srvceid, COUNT(DATE) AS wrksrvceDate , ALLT(STR(MONTH(DATE)))+ALLT(STR(YEAR(DATE))), ; > C1, C4 ; > FROM cost, cstcoef ; > WHERE cost.costcoef == cstcoef.coefid AND ; > (RIGHT("00"+ALLT(STR(MONTH(DATE))),2)+ALLT(STR(YEAR(DATE)))=ALLTR(sPeriod) ; > AND NOT EMPTY(dateappr) AND ALLT(STATUS)=='' AND NOT schoolclose AND NOT Cancelled) ; > GROUP BY srvceid, C1, C4 ; > INTO CURSOR c7 > >SELECT (sCur) >GO TOP >SCAN > SELECT (sCur) > UPDATE BL731 SET BL731.wrksrvceDate=c7.wrksrvceDate ; > WHERE srvceid=c7.srvceid AND C1 = c7.C1 AND C4 = c7.C4 >ENDSCAN >USE IN c7 >>