>>>>Morning, Gang.
>>>>
>>>>I have a problem here that just cropped up
>>>>
>>>>In compiling our EXE, we get this error.....
>>>>
>>>>

>>>>Compiling c:\pharmacy\class libraries\forms\forms_rx.vcx
>>>>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, {00/00/0000}, drug.ndc, ALLTRIM(drug.name),This.Parent.DrugPage.pgfDrug.TradePage.txtQtyFilled.value,  This.txtGrossBilled.value, This.txtDiscount.value, This.txtNetBilled.value , 0.00 , drug.awp,  This.txtQtyAWP.value, drug.acquisition_cost, This.txtQtyAcq.value, drug.fmac, This.txtQtyFMAC.value,  Thisform.p_PriceCode,lcInsuranceName,lnMargin )
>>>>Error in line 270 of frmrx.pgfScreen.RapidPage.pgfData.PricingPage.Activate (record 4): Date/datetime evaluated to an invalid value.
>>>>

>>>>
>>>>So I do a hunt for this error in the Code References tool (searching for 00/00/0000) and I get a hit
>>>>
>>>>File name - c:\pharmacy\class libraries\forms\forms_rx.vcx
>>>>Class.Method, Line - frmrx.pgfScreen.RapidPage.pgfData.PricingPage.Activate, 60
>>>>Code - VALUES (.T.,0, 0, {00/00/0000}, drug.ndc, ALLTRIM(drug.name),This.Parent.DrugPage.pgfDrug.TradePage.txtQtyFilled.value, ;
>>>>
>>>>But when I dbl-click on the offending line to go edit it, I get code that DOES NOT have this error in it!!! Nowhere in the class is this 00/00/0000 in it !!!
>>>>
>>>>So, what do I do? I can't create the EXE and I can't remove the error.
>>>
>>>What's the actual insert statement? If you have anything like the date value with zeros, supply a proper one, like {}. A date with zeros is a no-no in Fox, however empty date compiles fine.
>>
>>Here is the code starting at line 270, where the Compiler said the error was located...
>>

>>* End STB add
>>	lyAWP = QtyAWP / QtyFilled * generic.size
>>	lyAcq = QtyAcq / QtyFilled * generic.size
>>	lyFMAC = QtyFMAC / QtyFilled * generic.size
>>*TMT 08/20/07 340B Rx
>>	ly340B = Qty340B / QtyFilled * generic.size
>>ENDIF
>>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, no 00/00/0000 to correct. I am baffled. Maybe corruption in the Class ?
>
>Hrm... You might be looking at wrong bit of code.
>* The error shows .T. as the first value in the VALUE part, while the code you list has .F
>* Some of the VALUE items don't match -- Error shows reference to form objects, while code you list has references to table/view fields)

Yes, it is very strange. The code that the error lists does not exist in the code that is pulled up when you search for the bad code.

Thanks