Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Scan ... endscan not working properly
Message
 
To
All
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Scan ... endscan not working properly
Miscellaneous
Thread ID:
00411108
Message ID:
00411108
Views:
37
When I am going though the following code, my scan...endscan only seems to loop through once. I have over 200 records and my table is a free table. Anyone have a clue what is going on?


With thisform
local r
use trial
go top
scan
r = recno()
if trial.min_sex = 'F'
update trial set min_f = .t. where recno() = r
update trial set min_m = .f. where recno() = r
endif
if trial.min_sex = 'M'
update trial set min_f = .t. where recno() = r
update trial set min_m = .f. where recno() = r
endif

endscan
endwith


Thanks Nick
Next
Reply
Map
View

Click here to load this message in the networking platform