Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
LOCATE not functioning properly
Message
De
23/09/1999 17:22:50
Ronald Suen
Epic Solutions Inc.
Edmonton, Alberta, Canada
 
 
À
22/09/1999 16:10:13
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
00267352
Message ID:
00268269
Vues:
21
Oh, I included the aliases in the commands as a point of readability and maintainability. CurrMast is the only table open in the DataSession.

>Ronald,
>It's not obvious that you have CurrMast currently selected. The fact that you are using RECNO("CurrMast") and FOUND("CurrMast") even suggests it isn't. I'd either change the code to:
>
>lnRecNo = RECNO("CurrMast")
>GO TOP IN CurrMast
>SET EXACT OFF
>=SEEK(UPPER(ALLTRIM(THISFORM.txtCurrID.Value)), "CurrMast")
>SET EXACT ON
>
>IF NOT FOUND("CurrMast")
> GO lnRecNo IN CurrMast
> MsgBox("Currency was not found.",,,16)
> RETURN .F.
>ENDIF
>
>OR:
>
>SELECT CurrMast
>lnRecNo = RECNO()
>GO TOP
>SET EXACT OFF
>SEEK UPPER(ALLTRIM(THISFORM.txtCurrID.Value))
>SET EXACT ON
>
>IF NOT FOUND()
> GO lnRecNo
> MsgBox("Currency was not found.",,,16)
> RETURN .F.
>ENDIF
>
>Rick
Ronald Suen
Epic Information Solutions Inc.
Ph: (780) 488-4418
Fax: (780) 488-0402
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform