USE [RADIOLOGY] GO /****** Object: StoredProcedure [dbo].[Sp_RadioSetup] Script Date: 8/30/2023 6:10:28 PM ******/ SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO /*ALTERd by Jetty P. Omo Setup for Radiology - Cash Rate ~ Opd Rate = RateA in the Build_File ~ Cash Rate = RateG in the Build_file ~ Socialized = Rate is according to Room Rate - Included PACS enable/disable - Markup Rate for Exam during Holiday and other special cases - Portable markup rate --02/02/2008 -Added Company setup ~ 1 = Enabled ~ 2 = Disabled ~ 3 = RateH File Altered By Gonzalo Added the following: -Option to disable the client/agents ie bonzi -Option to disable Dictation -Further Markup Specifications -Option to disable if result to be updated/verified only by radiologist; if results to be verified by thumbprint scanner; if exams are to be edited/displayed/printed through application extension; if the report to be used is through client's own requirements. */ ALTER PROCEDURE [dbo].[Sp_RadioSetup] @Mode as varchar(1), @Department as varchar(2) = '', @CashBasis as varchar(1) = '', @ChargeSlipSetup as bit = '', @UserID as varchar(20) = '', @Markup as varchar(5) = '0', @PortableMrkup as varchar(10) = '0', @PortableOperator as varchar(1) = '*', @PACS as varchar(1) = '', @Company as int = '1', @CompanyMarkup as int = '0', @FileNoSetup as bit = 1, @FileNumber as int = '0', @FileNoPrefix as varchar(10) = '', @Bonzi as varchar(1) = '0', @Merlin as varchar(1) = '0', @Dictation as varchar(1) = '0', @HighestMarkUpLimit as varchar(20) = '0', @HMarkUpLimitOperator as varchar(1) = '', @BeyondRegHrsMarkUp as varchar(20) = '0', @BeyondRegHrsMarkUpOperator as varchar(1) = '', @BeyondRegHrsFrom as varchar(20) = '', @BeyondRegHrsTo as varchar(20) = '', @StatOperator as varchar(1) = '', @ERPatientMarkUp as varchar(20) = '0', @ERPatientOperator as varchar(1) = '', @HolidayMarkUp as varchar(20) = '0', @HolidayOperator as varchar(1) = '', @ResultUpdateOnlyByRadiologist as varchar(1) = '0', @VerifyByFingerPrint as varchar(1) = '0', @ResultDLL as varchar(1) = '0', @ResultFormatted as varchar(1) = '0', @ExStat as varchar(1) = '0', @ExPortable as varchar(1) = '0', @ExBeyond as varchar(1) = '0', @ExER as varchar(1) = '0', @ExHoliday as varchar(1) = '0', @Signature as varchar(1) = '0', @ImagingReason as varchar(1) = '0', @AddNurseRequests as varchar(1) = '0', @CompanyRates as varchar(1) = '0', @OPDRequestForm as varchar(1) = '0', @CashRequestForm as varchar(1) = '0', @AdmRequestForm as varchar(1) = '0', @UnifiedSections as varchar(1) = '0', @AutoPrintForms as varchar(1) = '0', @MultipleFormat as varchar(1) = '0', @SelectFormat as varchar(1) = '0', @Film as varchar(1) = '0', @FilmStockCard as varchar(1) = '0', @JoneltaIn as varchar(1) = '0', @JoneltaOut as varchar(1) = '0', @JoneltaCash as varchar(1) = '0', @ERIn as varchar(1) = '0', @EROut as varchar(1) = '0', @ERCash as varchar(1) = '0', @OutsideDoctors as varchar(1) = '0', @SupplyNoPrice as varchar(1) = '0', @HMOFileNum as varchar(10) = '', @CashFileNum as varchar(10) = '', @ColorScheme as varchar(1) = '0', @WalkIn as varchar(1) = '0', @JoneltaFileNum as varchar(10) = '', @ClientForm as varchar(1) = '0', @LoginID as varchar(1) = '0', @ResultEdit as varchar(5) = '3', @BGImage as varchar(1) = '0', @ItemPF as varchar(10) = '', @ItemReader as varchar(1) = '0', @ZeroSupply as varchar(1) = '0', @ReasonEdit as varchar(5) = '3', @VerifyByPassword as varchar(1) = '0', @EditResultSameUser as varchar(1) = '0', @DraftBySameUser as varchar(1) = '0', @CancelRequestBy as varchar(1) = '1', @CancelRequestByStatus as varchar(1) = '1', @EvaluCashBaseWalkIn as varchar(1) = '0', @EvaluCashBaseOPD as varchar(1) = '0', @EvaluCashBaseIPD as varchar(1) = '1', @PACSProvider as varchar(10) ='', @AllowOPDRequest as varchar(1) = '0', @allowPrepaidRequest as varchar(1) = '0', @AllowICURate As Varchar(1) = '1', @AllowERRate As Varchar(1) = '0', @AllowZeroOnHand As Varchar(1) = '0', @SeparateRFCS As Varchar(1) = '0', @SchedPerExam As Varchar(1) = '0' AS if @Mode = '1' Begin select isnull(A.Cashbasis,1) as Cashbasis, isnull(A.chargeslipsetup,0)as chargeslipsetup, isnull(A.Userid,'')as Userid, isnull(A.Markup,0)as Markup/*Table A is for Stat Markup*/, isnull(A.MarkupOperator,'')as MarkupOperator, A.Department, isnull(B.Markup,0) as PMArkup/*Table B is for Portable Markup*/, B.Operator, isnull(A.Pacs,0) Pacs, isnull(A.Company,2) Company, isnull(A.CompanyMarkup,0) CompanyMarkup, isnull(A.FileNoSetup,1) as FileNoSetup, isnull(A.FileNumber,0) as FileNumber, isnull(FileNoPrefix,'') as FileNoPrefix, isnull(Bonzi,'0') as Bonzi, isnull(Merlin,'0') as Merlin, isnull(Dictation,'0') as Dictation, isnull(HighestMarkUpLimit,'0') as HighestMarkUpLimit, isnull(HMarkUpLimitOperator,'') as HMarkUpLimitOperator, isnull(BeyondRegHrsMarkUp,'0') as BeyondRegHrsMarkUp, isnull(BeyondRegHrsMarkUpOperator,'') as BeyondRegHrsMarkUpOperator, Convert(varchar(20), isnull(BeyondRegHrsFrom, getdate()), 108) as BeyondRegHrsFrom, Convert(varchar(20), isnull(BeyondRegHrsTo, getdate()), 108) as BeyondRegHrsTo, isnull(ERPatientMarkUp,'0') as ERPatientMarkUp, isnull(ERPatientOperator,'') as ERPatientOperator, isnull(HolidayMarkUp,'0') as HolidayMarkUp, isnull(HolidayOperator,'') as HolidayOperator, isnull(A.ResultUpdateOnlyByRadiologist,'0') as ResultUpdateOnlyByRadiologist, isNull(A.VerifyByFingerPrint,'0') as [VerifyByFingerPrint], isnull(A.ResultDLL,'0') as ResultDLL, isnull(A.ResultFormatted, '0') as ResultFormatted, isnull(B.ExStat, '0') as ExStat, isnull(B.ExPortable, '0') as ExPortable, isnull(B.ExBeyond, '0') as ExBeyond, isnull(B.ExER, '0') as ExER, isnull(B.ExHoliday, '0') as ExHOliday, isNull(A.Signature,'0') as Signature, isnull(A.ImagingReason,'0') as ImagingReason, isnull(A.AddNurseRequests,'0') as AddNurseRequests, isnull(A.CompanyRates,'0') as CompanyRates, isnull(A.OPDRequestForm,'0') as OPDRequestForm, isnull(A.CashRequestForm,'0') as CashRequestForm, isnull(A.AdmRequestForm,'0') as AdmRequestForm, isnull(A.UnifiedSections,'0') as UnifiedSections, isnull(A.AutoPrintForms,'0') as AutoPrintForms, isnull(A.MultipleFormat,'0') as MultipleFormat, isnull(A.SelectFormat,'0') as SelectFormat, isnull(A.Film,'0') as Film, isnull(A.FilmStockCard,'0') as FilmStockCard, isnull(A.JoneltaIn,'0') as JoneltaIn, isnull(A.JoneltaOut,'0') as JoneltaOut, isnull(A.JoneltaCash,'0') as JoneltaCash, isnull(A.ERIn,'0') as ERIn, isnull(A.EROut,'0') as EROut, isnull(A.ERCash,'0') as ERCash, isnull(A.OutsideDoctors,'0') as OutsideDoctors, isnull(A.SupplyNoPrice,'0') as SupplyNoPrice, isnull(A.HMOFileNum,'') as HMOFileNum, isnull(A.CashFileNum,'') as CashFileNum, isnull(A.ColorScheme,'0') as ColorScheme, isnull(A.WalkIn,'0') as WalkIn, isnull(A.JoneltaFileNum,'0') as JoneltaFileNum, isnull(A.ClientForm,'0') as ClientForm, isnull(A.LoginID,'0') as LoginID, isnull(A.ResultEdit,'3') as ResultEdit, isnull(A.BGImage,'0') as BGImage, isnull(A.ItemPF,'0') as ItemPF, isnull(A.ItemReader,'0') as ItemReader, isnull(A.ZeroSupply,'0') as ZeroSupply, isnull(A.ReasonEdit,'0') as ReasonEdit, ISNULL(A.VerifyByPassword, '0') as VerifyByPassword, ISNULL(A.EditResultSameUser, '0') as EditResultSameUser, ISNULL(A.DraftBySameUser, '0') as DraftBySameUser, ISNULL(a.cancelRequestby, '1') as cancelRequestby,--CANCEL REQUEST (ITEMIZED/PERSLIP) ISNULL(A.StatusAllowCancel, '1') as CancelRequestByStatus, ISNULL(A.EvaluCashBaseWalkIn, '0') as EvaluCashBaseWalkIn, ISNULL(A.EvaluCashBaseOPD, '0') as EvaluCashBaseOPD, ISNULL(A.EvaluCashBaseIPD, '1') as EvaluCashBaseIPD, ISNULL(A.PACSProvider,'MEDSYS') as PACSProvider, ISNULL(A.AllowOPDRequest,'0') as AllowOPDRequest, ISNULL(A.AllowPrepaidRequest,'0') as AllowPrepaidRequest, ISNULL(A.AllowICURate,'1') As AllowICURate, ISNULL(A.AllowERRAte,'0') As AllowERRate, ISNULL(A.AllowZeroOnHand,'0') As AllowZeroOnHand, ISNULL(A.SeparateRFCS,'0') As SeparateRFCS, ISNULL(A.SchedPerExam,'0') As SchedPerExam from tbRadiosetup A Left Outer Join tbRadioMarkUpOptions B on A.Department = B.DepartmentID where Department = @Department End if @Mode = '2' Begin delete tbRadiosetup WHERE Department = @Department Insert into tbRadiosetup( Department,CashBasis,ChargeSlipSetup,UserID,Markup, Pacs,Company,CompanyMarkup,FileNoSetup,FileNumber, FileNoPrefix, Bonzi, Merlin, Dictation, MarkUpOperator, ResultUpdateOnlyByRadiologist,VerifyByFingerPrint,ResultDLL, ResultFormatted,Signature,ImagingReason,AddNurseRequests, CompanyRates,OPDRequestForm,CashRequestForm, AdmRequestForm, UnifiedSections, AutoPrintForms, MultipleFormat, SelectFormat, Film, FilmStockCard, JoneltaIn, JoneltaOut, JoneltaCash, ERIn, EROut, ERCash, OutsideDoctors, SupplyNoPrice, HMOFileNum, CashFileNum, ColorScheme, WalkIn, JoneltaFileNum, ClientForm, LoginID, ResultEdit, BGImage, ItemPF, ItemReader, ZeroSupply, ReasonEdit, VerifyByPassword,EditResultSameUser,DraftBySameUser, cancelRequestby,StatusAllowCancel,EvaluCashBaseWalkIn,EvaluCashBaseOPD,EvaluCashBaseIPD, PACSProvider,AllowOPDRequest,AllowPrepaidRequest,AllowICURate, AllowERRate, SeparateRFCS,SchedPerExam) Values( @Department,@CashBasis,@ChargeSlipSetup,@UserID,@Markup, @Pacs,@Company,@CompanyMarkup,@FileNoSetup,@FileNumber, @FileNoPrefix, @Bonzi, @Merlin, @Dictation, @StatOperator, @ResultUpdateOnlyByRadiologist,@VerifyByFingerPrint,@ResultDLL, @ResultFormatted,@Signature,@ImagingReason,@AddNurseRequests, @CompanyRates,@OPDRequestForm,@CashRequestForm, @AdmRequestForm, @UnifiedSections, @AutoPrintForms, @MultipleFormat, @SelectFormat, @Film, @FilmStockCard, @JoneltaIn, @JoneltaOut, @JoneltaCash, @ERIn, @EROut, @ERCash, @OutsideDoctors, @SupplyNoPrice, @HMOFileNum, @CashFileNum, @ColorScheme, @WalkIn, @JoneltaFileNum, @ClientForm, @LoginID, @ResultEdit, @BGImage, @ItemPF, @ItemReader, @ZeroSupply, @ReasonEdit, @VerifyByPassword,@EditResultSameUser,@DraftBySameUser, @CancelRequestBy,@CancelRequestByStatus,@EvaluCashBaseWalkIn,@EvaluCashBaseOPD, @EvaluCashBaseIPD, @PACSProvider,@AllowOPDRequest,@allowPrepaidRequest, @AllowICURate,@AllowERRate,@SeparateRFCS,@SchedPerExam) delete tbRadioMarkUpOptions WHERE DepartmentID = @Department Insert into tbRadioMarkUpOptions( Markup, Operator, HighestMarkUpLimit, hMarkUpLimitOperator, BeyondRegHrsMarkUp, BeyondRegHrsMarkUpOperator, BeyondRegHrsFrom, BeyondRegHrsTo, ERPatientMarkUp, ERPatientOperator, HolidayMarkUp, HolidayOperator, DepartmentID, ExStat, ExPortable, ExBeyond, ExER, ExHoliday) Values( @PortableMrkup, @PortableOperator, @HighestMarkUpLimit, @hMarkUpLimitOperator, @BeyondRegHrsMarkUp, @BeyondRegHrsMarkUpOperator, @BeyondRegHrsFrom, @BeyondRegHrsTo, @ERPatientMarkUp, @ERPatientOperator, @HolidayMarkUp, @HolidayOperator, @Department, @ExStat, @ExPortable, @ExBeyond, @ExER, @ExHoliday) if @FileNoSetup = 0 Begin update tbRadiosetup set FileNoSetup = 0 end ELSE Begin update tbRadiosetup set FileNoSetup = 1 end End