Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Problems with seek on a view
Message
De
21/08/2000 13:26:55
Jimmy Ditta
Twin City Electronics
Monroe, Louisiane, États-Unis
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Base de données, Tables, Vues, Index et syntaxe SQL
Titre:
Problems with seek on a view
Divers
Thread ID:
00407408
Message ID:
00407408
Vues:
60
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()
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform