Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Tablebuffering Problem
Message
From
26/07/2000 14:18:52
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
Databases,Tables, Views, Indexing and SQL syntax
Title:
Tablebuffering Problem
Miscellaneous
Thread ID:
00397194
Message ID:
00397194
Views:
52
Here's the situation:

Combo1 (with inventory_search in it's interactivechange) has item stocknumbers for selections. It searches for the record selected and populates the other objects with appropriate data. I can edit and save the very 1st record all I like. When I select a different record, choose edit and save, I get the error "Table buffer for alias intrancust contains uncommitted changes". When the error occurs, the debugger points to the Requery() immediately following a tableupdate().

Here's the code:

Load:
DBSETPROP('intrancust', 'view', 'Tables', 'Tomparco!inventory')
DBSETPROP('intrancust', 'view', 'SendUpdates',.T.)
=CURSORSETPROP("Buffering", 3, "intrancust")
INDEX ON stocknum TAG stocknum
=CURSORSETPROP("Buffering", 5, "intrancust")

Init:
Thisform.Inventory_Search() && <-This is also in the interactivechange of combo1

Inventory_Search():
GO TOP
SEEK Thisform.Combo1.value
IF FOUND()
Thisform.Combo1.value = stocknum
Thisform.Text3.VALUE = cut
Thisform.Text10.VALUE = colors
Thisform.Text11.VALUE = clarity
ENDIF

Editbutton Click Event:
ThisForm.Combo1.Enabled = .F. &&Locks Combo1

Thisform.Combo2.Visible = .T. &&takes the place of Text3
Thisform.Combo3.Visible = .T. &&takes the place of Text10
Thisform.Combo4.Visible = .T. &&takes the place of Text11

Thisform.Text3.Visible = .F.
Thisform.Text10.Visible = .F.
Thisform.Text11.Visible = .F.

ThisForm.Combo2.displayvalue = cut
ThisForm.Combo3.displayvalue = colors
ThisForm.Combo4.displayvalue = clarity

Save:
REPLACE cut WITH Thisform.Combo2.Displayvalue
REPLACE colors WITH Thisform.Combo3.Displayvalue
REPLACE clarity WITH Thisform.Combo4.Displayvalue

TableUpdate(0,.T.,"intrancust")

&&Tablerevert(.F., 'intrancust')
REQUERY('intrancust') &&...I stopped here because this is where the error occurs

Thanks ahead of time
JD
Next
Reply
Map
View

Click here to load this message in the networking platform