>So, no 00/00/0000 to correct. I am baffled. Maybe corruption in the Class ?
Try opening the .VCX file as a table (use c:\pharmacy\class libraries\forms\forms_rx.vcx) and look for the object with that code (00/00/0000) in the methods memo field.
Maybe there's more than one record and one of them should be marked deleted() but isn't.
Best regards,
Rick C. Hodgin
>>>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 ?
