Hi Tariq

I would change the second DO WHILE to this:

SELECT VOUCHERS
LOCATE for date=AA and VOU_NO=bb and VOU_TYPE=cc

DO while date=AA and VOU_NO=bb and VOU_TYPE=cc
REPLACE d1 WITH dd

SKIP
ENDDO



>Dear Experts
>
>The following command do nothing and curosr seems to be working for a long time.
>Please make some changes to work
>

>SELECT vou_sum
>GO top
>DO while !eof()
>	AA=date 		&& date type
>	bb=VOU_NO 	&& numueric type
>	cc=ALLTRIM(VOU_TYPE)&& character type
>	dd=d1
>	
>	SELECT VOUCHERS
>	LOCATE for date=AA and VOU_NO=bb and VOU_TYPE=cc
>	DO while FOUND()
>		REPLACE d1 WITH dd
>	ENDDO
>
>	SELECT vou_sum
>	Skip
>ENDDO
>