>>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. >>>>
* 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 ?