Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Problems with seek on a view
Message
From
21/08/2000 13:26:55
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
Databases,Tables, Views, Indexing and SQL syntax
Title:
Problems with seek on a view
Miscellaneous
Thread ID:
00407408
Message ID:
00407408
Views:
59
I'm getting "No Index Order Set" with using a seek command on a view.
Thanks
JD

Here's the code:

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

SET SAFETY OFF

Init:
Thisform.transactn_search()

Transactn_search():
SELECT trancustin

GO TOP

Thisform.trans_num = Thisform.Combo1.displayvalue

SEEK Thisform.Combo1.displayvalue ORDER TAG trans_id IN trancustin

IF FOUND()
Thisform.Combo1.value = trans_id
Thisform.Text1.VALUE = track_num
Thisform.Text2.VALUE = company
Thisform.Text3.VALUE = lot_worth
Thisform.Text4.VALUE = amt_initial_owed
Thisform.Text5.VALUE = amt_owed
Thisform.Text6.VALUE = trans_date
Thisform.Edit1.VALUE = transdesc
Thisform.trans_num = Thisform.Combo1.displayvalue
ELSE
= messagebox('The record you searched for is invalid and should be deleted')
ENDIF

THISFORM.cursor_trans_items()
THISFORM.browse_gridcontrols()
Next
Reply
Map
View

Click here to load this message in the networking platform