Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Database gets lost
Message
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00236029
Message ID:
00236074
Views:
13
Mark I never ever use the near fct so it is always off. I will test your code chgs. however 'select 0' gives an error

>First some code cleanup for better flow. I also include modifications for you to try:
>lcOldNear = set("near")
>set near off   && see if the setting for NEAR is ON. if so turn it off.
>select 0
>use Scanfile
>select 0
>use Ecu  &&dump from  sql
>index on alltrim(label) to z
>select Scanfile     && new line of code
>locate
>do while .not. eof("Scanfile")
>   lab = allt(data)
>   select Ecu
>   seek lab
>   if .not. eof("Ecu")
>      replace scanfile.acct with  acct  && ok here
>   else
>      replace scanfile.noun with 'UNKNOWN'   && NEVER happens, remains blank
>   endif
>   select Scanfile
>   skip
>enddo
>select Scanfile
>set filter to noun = ' '
>browse
>select Scanfile
>replace all noun with 'UNKNOWN'
>set filter to
>browse           && ALIAS NOT FOUND!
>
>set near &lcOldNear
"Build a man a fire, and he's warm for a day.
Set a man on fire, and he's warm for the rest of his life."
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform