Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Do While
Message
 
To
19/06/2002 00:47:40
Henry Ravichander
RC Management Systems Inc.
Saskatchewan, Canada
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Miscellaneous
Thread ID:
00670004
Message ID:
00670008
Views:
17
This message has been marked as the solution to the initial question of the thread.
Make sure you are getting back onto the right alias before the SKIP
SELECT blah
SKIP 
...
>Hi All:
>
>Here is a do While loop that I have. The problem is that it exits after the first iteration itself.
>
>
do while not eof()
>        mclaim_no = paylisttotal.claim_no
>	mclaim_pay = paylisttotal.amt_paid
>		
>        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
>
>
>Where am I going wrong? Thanks in advance.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform