Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
CASE Condition
Message
From
02/04/2003 08:53:16
 
 
To
02/04/2003 08:46:09
Jay Johengen
Altamahaw-Ossipee, North Carolina, United States
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Miscellaneous
Thread ID:
00772897
Message ID:
00772911
Views:
4
Renoir,

It might be explainable if there is an INDEX in effect. Is there?


>>>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
>
Previous
Reply
Map
View

Click here to load this message in the networking platform