Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Scan/scanfor
Message
From
17/03/2009 19:19:09
 
 
To
17/03/2009 19:09:32
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Miscellaneous
Thread ID:
01388826
Message ID:
01388890
Views:
43
>I got an "unreconized phrase/keyword" on the "WHERE" line. So i chaned it too:
>
>USE D:\Work\client\fossil_creek\lanproconversion1\for_luigi\use\stage5\legals.dbf In 0 Shared Again
>USE D:\Work\client\fossil_creek\lanproconversion1\for_luigi\use\stage5\leases.dbf In 0 Shared Again
>USE D:\VlpData\emptydata\tract.dbf In 0 Shared Again
>SELECT Leases
>SCAN ALL
> m.Lease_ID = Leases.Lease_ID
> SELECT ;
> FROM Legals ;
> INTO CURSOR leaseleagals ;
> WHERE Lower(Alltrim(legals.lease_id)) == m.Lease_ID ;
> m.TractInfo = ""
> SELECT LeaseLegals
> SCAN ALL
> m.TractInfo = tract.tra_namememo
> ENDSCAN
> USE IN LeaseLegals
> UPDATE Leases ;
> SET legal_desc = tract.tra_namememo ;
> WHERE Lower(Alltrim(legals.lease_id)) == m.Lease_ID
>ENDSCAN
>
>Now i get the error on the "INTO" line.

There should not be a ; (semicolon) at the end of the first WHERE line.

In your inner SCAN loop, you should be building the memvar, e.g.
m.TractInfo = m.TractInfo + tract.tra_namememo
* otherwise you'll just get the value of the last lease

* Also you need to use the m.TractInfo memvar in the final UPDATE,
* if you're trying to use the logic I originally presented
Regards. Al

"Violence is the last refuge of the incompetent." -- Isaac Asimov
"Never let your sense of morals prevent you from doing what is right." -- Isaac Asimov

Neither a despot, nor a doormat, be

Every app wants to be a database app when it grows up
Previous
Reply
Map
View

Click here to load this message in the networking platform