>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. >>
>**TMT 08/28/07 Toggle the cmd340B Enable status >TMT 09/14/07 Modified to handle CASH Rx (No 3rd-party) >*IF Thisform.p_UseThirdparty > 0 && This is a 3rd-party > DO CASE > *Plan based 340B Pharmacy > CASE pharmacy_config.inv_340B = "P" > IF third_party_plans.tpp340b AND drug.drug340B && Only Plan and Drug needed here > This.cmd340B.Enabled = .T. > ELSE > IF rx.rx340b > This.cmd340B.Enabled = .T. > ELSE >Here is the line it found ---->>>> This.cmd340B.Enabled = .F. > ENDIF > ENDIF >>