Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
REPLACE problem - weird (I think)
Message
 
To
02/07/1998 00:43:13
Bruce Gilmour
Cal-Mour Consultants
Calgary, Alberta, Canada
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00113674
Message ID:
00113675
Views:
19
Hi Bruce,

What are you trying to replace if a record is not found via seek. You would probably be at the EOF() if the seek is unsucessful. Are you missing an APPEND BLANK?

>OK - Another full day of programming and chasing my tail over what seems to be a simple piece of code - but - here it is
>
> WITH thisform.bgpageframe1.page2.grdordlines
> SELECT Item_Master
> SET ORDER TO TAG itemnumber
> SEEK this.value
> IF FOUND()
> REPLACE ordentlines.description WITH Item_Master.description
> REPLACE ordentlines.nonstock WITH .T.
> REPLACE ordentlines.saleunit WITH Item_Master.saleunit
> REPLACE ordentlines.salemult WITH Item_Master.salemult
> REPLACE
> ELSE
> REPLACE ordentlines.nonstock WITH .T.
> REPLACE ordentlines.saleunit WITH "EA"
> REPLACE ordentlines.salemult WITH 1.000
> REPLACE
> ENDIF
>
>And the but is that the REPLACES before the ELSE work but those after the ELSE don't. It is entering the correct section based on whether I enter a stocked item or not. The nonstock setting is in both places as a control and again it works in the first instance but not in the second. What is my smoking brain missing? Help please.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform