General information
Category:
Databases,Tables, Views, Indexing and SQL syntax
Title:
Problems with seek on a view
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
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only