Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Program is running slow - need advice for optimizing
Message
 
To
08/07/2004 02:54:19
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00921850
Message ID:
00921864
Views:
26
You can revise your code like below or use it...
SELECT 1
USE all

sele 2
USE ss
DO WHILE !EOF()
   m.a=name
   m.a1=p_o_box
   m.a2=Postal_cod
   m.a3=degree
   
   SELECT ALL
   APPEND BLANK
   REPLACE name WITH m.a;
           p_o_box WITH m.a1;
           postalcod WITH m.a2;
           degree WITH m.a3
   SELECT SS
   if .not. eof()
       skip 
   else
       exit
   endif
ENDDO
sele all
use
sele ss
use
return
if this a sub program, otherwise dont close your tables and removed return.....
Jojo R. dela Cuesta, B.Sc.
eConsultant, Programmer
Dalplus Technologies
http://www.dalplus.com
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform