Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
DBC Event Insufficient Stack Space?
Message
General information
Forum:
Visual FoxPro
Category:
Databases,Tables, Views, Indexing and SQL syntax
Miscellaneous
Thread ID:
00646636
Message ID:
00646660
Views:
11
I don't know why you get this error but your code doesn't do what it suppose to do because command
Update (cTableName) Set iDel=1 Where iDel=0
updates all records with iDel=0.

>I am trying to prevent a certain number of rows from getting into a table. When the total row count passes 950, I want to pop older rows from the beginning of the table. I made a stand-alone procedure file for my DBC events, and I just have one proc in it. When I open a table called "CATLV05" for example, I get "Insufficient Stack Space". I've been good, what's wrong?
>
>
>Procedure dbc_AfterOpenTable ;
>	(cTableName)
>		If Upper(cTableName) = "CATLV"
>			Select Count(iID) from (cTableName) where iDel=0 Into Array arCatLvCnt
>			If arCatLvCnt[1] > 950
>				For iDelIt = 1 to (arCatLvCnt[1] - 949)
>					Update (cTableName) Set iDel=1 Where iDel=0
>				Next
>			EndIf
>		EndIf
>EndProc
>
--sb--
Previous
Reply
Map
View

Click here to load this message in the networking platform