Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
LOCATE not functioning properly
Message
From
23/09/1999 17:22:50
Ronald Suen
Epic Solutions Inc.
Edmonton, Alberta, Canada
 
 
To
22/09/1999 16:10:13
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00267352
Message ID:
00268269
Views:
22
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
Previous
Reply
Map
View

Click here to load this message in the networking platform