Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
CASE Condition
Message
 
 
À
02/04/2003 08:46:09
Jay Johengen
Altamahaw-Ossipee, Caroline du Nord, États-Unis
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Divers
Thread ID:
00772897
Message ID:
00772912
Vues:
5
This message has been marked as the solution to the initial question of the thread.
>>>In the debugger:
>>>
>>>RecNo('MyCursor') = 103
>>>RecCount('MyCursor') = 103
>>>RecNo('MyCursor') = RecCount('MyCursor') = .T.
>>>
>>>In the code:
>>>
>>>
>>>DO CASE
>>>     CASE RecNo('MyCursor') = RecCount('MyCursor')
>>>          * DO SOMETHING
>>>ENDCASE
>>>
>>>
>>>Except it does not execute "* DO SOMETHING"
>>>
>>>The condition is true, how could it not run the line?
>>>
>>Renoir,
>>
>>How do you know it's not executed? Can you post actual code?
>
>I'm stepping through it in the debugger, plus I'm putting a WAIT window inside the CASE. It skips right over it.
>
>
>
>SELECT csrTempAcct
>
>SCAN
>
>   DO CASE
>      CASE csrTempAcct.ECon < 0 OR csrTempAcct.EMat < 0
>         This.RollForwardInterestFund(tiPlanID, tcAcctNum, csrTempAcct.Acct_ID, csrTempAcct.Contrib_Dt, .T., .F.)
>      CASE RecNo('csrTempAcct') = RecCount('csrTempAcct')
>         WAIT WINDOW 'RUNS SECOND CASE CONDITION'
>         This.RollForwardInterestFund(tiPlanID, tcAcctNum, csrTempAcct.Acct_ID, csrTempAcct.Contrib_Dt, .T., .F.)
>   ENDCASE
>
>ENDSCAN
>
Maybe first CASE is executed?
--sb--
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform