Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Do While
Message
 
À
19/06/2002 00:47:40
Henry Ravichander
RC Management Systems Inc.
Saskatchewan, Canada
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Divers
Thread ID:
00670004
Message ID:
00670008
Vues:
16
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.
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform