Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Compile Error problem
Message
General information
Forum:
Visual FoxPro
Category:
Installation, Setup and Configuration
Environment versions
Visual FoxPro:
VFP 9 SP2
OS:
Windows XP SP2
Network:
Windows 2003 Server
Database:
Visual FoxPro
Application:
Desktop
Miscellaneous
Thread ID:
01540061
Message ID:
01540076
Views:
17
>>I suggest to try to search for 'PriceCode,InsName,Margin)' if the 00/00 does not work.
>
>I found 5 places.....
>
>
>IF rx.rx340b
>	This.cmd340B.Enabled = .T.
>Here -----  >>ELSE 
>	This.cmd340B.Enabled = .F.
>ENDIF 
>
>
>
>and
>
>
>Thisform.pgfScreen.RapidPage.txtSearch.value = ""
>
>
>
> and
>
>
>*!*	INSERT INTO csrHistory (Current,Rx_no, Refill_no, DateFilled, NDC, Name, QtyFilled, Price, Discount, Cash, ;
>*!*		ThirdParty, AWP, QtyAWP, Acq, QtyAcq, FMAC, QtyFMAC,PriceCode,InsName,Margin);  
>*!*		VALUES (.T.,0, 0, DATE(), drug.ndc, ALLTRIM(drug.name),This.Parent.DrugPage.pgfDrug.TradePage.txtQtyFilled.value, ;
>*!*		This.txtIngredientCost.value, This.txtDiscount.value, This.txtGrossAmountDue.value , 0.00 , drug.awp, ;
>*!*		Thisform.p_QtyAWP, drug.acquisition_cost, Thisform.p_QtyAcq, drug.fmac, Thisform.p_QtyFMAC, ;
>*!*		Thisform.p_PriceCode,lcInsuranceName,lnMargin )
>
>>
>
>and
>
>
>INSERT INTO csrHistory (Current,Rx_no, Refill_no, DateFilled, NDC, Name, QtyFilled, Price, Discount, Cash, ;
>	ThirdParty, AWP, QtyAWP, Acq, QtyAcq, FMAC, QtyFMAC,PriceCode,InsName,Margin, ISThree40B, Three40B, Qty340B);  
>	VALUES (.T.,0, 0, DATE(), drug.ndc, ALLTRIM(drug.name),This.Parent.DrugPage.pgfDrug.TradePage.txtQtyFilled.value, ;
>	This.txtIngredientCost.value, This.txtDiscount.value, This.txtGrossAmountDue.value , 0.00 , drug.awp, ;
>	Thisform.p_QtyAWP, drug.acquisition_cost, Thisform.p_QtyAcq, drug.fmac, Thisform.p_QtyFMAC, ;
>	Thisform.p_PriceCode,lcInsuranceName,lnMargin,drug.drug340b,drug.acq340b_cost,Thisform.p_qty340bacq )
>
>
>
>and finally
>
>
>INSERT INTO csrHistory (Current,Rx_no, Refill_no, DateFilled, NDC, Name, QtyFilled, Price, Discount, Cash, ;
>ThirdParty, AWP, QtyAWP, Acq, QtyAcq, FMAC, QtyFMAC,PriceCode,InsName,Margin,ISThree40B, Three40B, Qty340B);
>VALUES (.F.,refill.rx_no, refill.refill_no, refill.filled_date, generic.ndc, ALLTRIM(generic.name), refill.quantity_filled, ;
>lyPrice, refill.discount, lyRetail , lyThirdParty , lyAWP, ;
>refill.qty_awp, lyAcq, refill.qty_acq, lyFMAC, refill.qty_fmac, ;
>refill.price_code_used,lcInsuranceName,lnMargin, refill.Rx340B, ly340B, refill.qty_340Bacq)
>
>
>So, it is very weird ......
>
Indeed. I think it is probably using a different form (from a wrong path). Try activating debugout window before building the project to see which path it is used. Also see, if the path is in the error message itself.

And also, try compiling just this form alone

compile form myForm
If it's not broken, fix it until it is.


My Blog
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform