USE [RADIOLOGY]
GO
/****** Object:  StoredProcedure [dbo].[spRadio_CancelCMProcedure]    Script Date: 11/23/2023 3:09:45 PM ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO


ALTER PROCEDURE [dbo].[spRadio_CancelCMProcedure]
	@Revenueid as varchar(3),
	@RequestNum as varchar(15)
AS

Declare @RefNum as varchar(25)

set @RefNum = (Select @RefNum 
				FROM RADIOLOGY..tbRadiologyRequests_All where RequestNum = @RequestNum and RevenueId = @Revenueid)

	Update BILLING..tbCashAssessment set RecordStatus = 'R' 
		WHERE ORNumber = @RefNum and RevenueID = @Revenueid

IF @Revenueid = 'XR'
	BEGIN
		UPDATE tbXRRequest set SwFin = 'C' WHERE RequestNum = @RequestNum
	END

IF @Revenueid = 'CT'
	BEGIN
		UPDATE tbCTRequest set SwFin = 'C' WHERE RequestNum = @RequestNum
	END
	
IF @Revenueid = 'US'
	BEGIN
		UPDATE tbULRequest set SwFin = 'C' WHERE RequestNum = @RequestNum
	END

IF @Revenueid in ('MI','MR','RI')
	BEGIN
		UPDATE tbMRIRequest set SwFin = 'C' WHERE RequestNum = @RequestNum
	END

IF @Revenueid = 'MM'
	BEGIN
		UPDATE tbMammoMaster set SWMRK = 'C' WHERE RequestNum = @RequestNum
	END
	
IF @Revenueid = 'WC'
	BEGIN
		UPDATE tbOBULRequest set SwFin = 'C' WHERE RequestNum = @RequestNum
	END	
	
IF @Revenueid = 'NU'
	BEGIN
		UPDATE tbNucMaster set SwFin = 'C' WHERE RequestNum = @RequestNum
	END	
	
IF @Revenueid IN (SELECT Revenueid FROM tbRadiologyRevenues WHERE GType >= 8)
	BEGIN
		UPDATE tbRequestMaster set SwFin = 'C' WHERE RequestNum = @RequestNum and RevenueID = @Revenueid
	END