Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
CASE Condition
Message
From
02/04/2003 08:57:40
Jay Johengen
Altamahaw-Ossipee, North Carolina, United States
 
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Miscellaneous
Thread ID:
00772897
Message ID:
00772916
Views:
6
>>>>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?

DOH!!

I had actually commented-out the line in the first CASE so it just jumped over everything. I couldn't see the forest for the trees... Thanks!
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform