It looks ok,
Step through it in the debugger, and see the value of mclaim_no is what you expect it to be.

>Thank Chris:
>
>I am running into another problem now. The update statement does not do anything, in that the services tables is not being updated as requested in the statment below.
>

IF mclaim_no <> 0
>	   SELECT (feesubmit+feesubmit1+feesubmit2+feesubmit3+;
>	        feesubmit4+feesubmit5+feesubmit6) as fee_billed;
>		from services ;
>		into cursor CurrentClaim nofilter ;
>		where services.claim_no = mclaim_no
>		
>	   Update services set services.amt_paid = mclaim_pay ,;
>		services.paid_date = date() ,;
>		services.close_rec = "YES" ;
>		where services.claim_no = mclaim_no
>	   IF mclaim_pay = CurrentClaim.Fee_Billed
>		UPDATE services set services.paid = "YES",;
>		   services.closeclaim = "YES",;
>		   services.closedate = DATE();
>		   WHERE services.claim_no = mclaim_no
>	   ENDIF
>	ENDIF
>	mclaim_no = 0
>	mclaim_pay = 0
>	
>	SKIP
>	if eof()
>	  exit
>	else
>	  loop
>	endif
>ENDDO

>
>
>Should I be selecting the aliases again for the Update statments to work? Thanks.