Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Revert a insert in a many side table.
Message
From
18/04/2002 05:57:50
Cetin Basoz
Engineerica Inc.
Izmir, Turkey
 
 
To
18/04/2002 05:50:21
Dino Liberale
Ministero Lavori Pubblici
Trieste, Italy
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00646212
Message ID:
00646222
Views:
29
>Thanks all,
>I revert all so:
>
>AUSED(aCursors)
>
>FOR i = 1 TO ALEN(aCursors,1)
> nBuffer = CURSORGETPROP("Buffering",aCursors(i,1))
> IF nBuffer > 1
> TABLEREVERT(.T.,aCursors(i,1))
> ENDIF
>ENDFOR

Dino,
Yes. Code is right. However slight modification :)
This might never catch you but do not use a-j as variable names (known as aliases since foxbase). Also include m. at least for performance issue in VFP7 :
local array aCursors[1]
local lnUsed, ix
lnUsed = aused(aCursors)
for m.ix = 1 to m.lnUsed
 if CursorGetProp('Buffering',aCursors[m.ix]) > 1
    TableRevert(.t., aCursors[m.ix])
 endif
endfor
Cetin
Çetin Basöz

The way to Go
Flutter - For mobile, web and desktop.
World's most advanced open source relational database.
.Net for foxheads - Blog (main)
FoxSharp - Blog (mirror)
Welcome to FoxyClasses

LinqPad - C#,VB,F#,SQL,eSQL ... scratchpad
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform