>>Compiling c:\pharmacy\class libraries\forms\forms_rx.vcx >>#INCLUDE gcPath + "\L_FOX.H" >>Error in line 13 of frmrx.pgfScreen.FillPage.cmdPrefill.Click (record 1756): File does not exist. >>>>
>>*TMN 03/21/08 - take prescription picture >>IF pharmacy_config.digitize_scripts = .T. >> *-- check to see if an existing image file already exists for script >> lcEditImageFile = gcPath + "\RxImages\" + ALLTRIM(STR(rx.rx_no)) + ".jpg" >> IF FILE(lcEditImageFile) >> *-- do nothing >> ELSE >> IF Thisform.P_Formtype = 0 && only do for new Rx >> # DEFINE UNLOCK_APP_ONCE 2 >> SZ_DEFAULTAPPID = "LEADTOOLS Multimedia Application" >> #INCLUDE gcPath + "\L_FOX.H" >> >> pszAppID = SZ_DEFAULTAPPID >> Kernel2 = CREATEOBJECT("DSKernel.LMDSKernel.2") >> Kernel2.UnlockModule("721501-4410099-000", UNLOCK_APP_ONCE, pszAppID) >> >> count = Thisform.LTMMCapture.VideoDevices.count >> >> If (count > 0) Then >> Thisform.m_load(23,.T.) >> NODEFAULT >> ENDIF >> ENDIF >> ENDIF >>ENDIF >>*TMN 03/21/08 >>>>