814. EPMO Open Source Coordination Office Redaction File Detail Report

Produced by Araxis Merge on 10/26/2017 10:44:48 PM Eastern Daylight Time. See www.araxis.com for information about Merge. This report uses XHTML and CSS2, and is best viewed with a modern standards-compliant browser. For optimum results when printing this report, use landscape orientation and enable printing of background images and colours in your browser.

814.1 Files compared

#	Location	File	Last Modified
1	OSCIF_BMS_v2_iter 2_September_2017.zip\BMS_Cand\Source\Sources\Database\CreationScripts\BMS\4.Stored Procedures	dbo.usp_Manage_Deleted_Movements.sql	Wed Oct 18 19:07:02 2017 UTC
2	OSCIF_BMS_v2_iter 2_September_2017.zip\BMS_Cand\Source\Sources\Database\CreationScripts\BMS\4.Stored Procedures	dbo.usp_Manage_Deleted_Movements.sql	Thu Oct 26 19:45:37 2017 UTC

814.2 Comparison summary

Description	Between Files 1 and 2
Description	Text Blocks	Lines
Unchanged	2	210
Changed	1	2
Inserted	0	0
Removed	0	0

814.3 Comparison options

Whitespace
Character case	Differences in character case are significant
Line endings	Differences in line endings (`CR` and `LF` characters) are ignored
CR/LF characters	Not shown in the comparison detail

814.4 Active regular expressions

No regular expressions were active.

814.5 Comparison detail

	1	IF EXISTS (SELECT * FROM sys. objects WH ERE object _id = OBJE CT_ID(N'[d bo].[usp_M anage_Dele ted_Moveme nts]') AND type in ( N'P', N'PC '))
	2	DROP PROCE DURE [dbo] .[usp_Mana ge_Deleted _Movements ]
	3	GO
	4	SET ANSI_N ULLS ON
	5	GO
	6	SET QUOTED _IDENTIFIE R ON
	7	GO
	8	-- ======= ========== ========== ========== ========
	9	-- Author : PII
	10	-- Created date : 12/18/ 2012
	11	-- Descrip tion : Delete movements .
	12	-- ======= ========== ========== ========== ========
	13	CREATE PRO CEDURE [db o].[usp_Ma nage_Delet ed_Movemen ts]
	14	@I EN NVARCHA R(MAX),
	15	@V ISTA_SITE_ UID UNIQUE IDENTIFIER ,
	16	@V ISTA_SITE_ CODE NVARC HAR(20)
	17	AS
	18	BEGIN
	19	SE T NOCOUNT ON;
	20
	21	CR EATE TABLE #temp (NR INT, IEN NVARCHAR(2 0))
	22
	23	IN SERT INTO #temp (NR, IEN)
	24	SE LECT ID, V ALUE
	25	FROM dbo.fn_Sp lit_String (@IEN, ',' )
	26
	27	DE CLARE @I I NT, @MAX I NT, @tmpIE N NVARCHAR (20), @ID INT, @ADM_ ID INT,
	28	@ID2 I NT, @BED U NIQUEIDENT IFIER, @WA RD UNIQUEI DENTIFIER, @DIS_ID I NT, @MOVEM ENT_DATE D ATETIME
	29	SE LECT @MAX = COUNT(NR ) FROM #te mp
	30	SE T @I = 1
	31	WH ILE (@I <= @MAX)
	32	BEGI N
	33	SELECT @tmpIEN = IEN FROM #temp WHER E NR = @I
	34	SELECT @ID = ID FROM SPECI ALTY_TRANS FER WHERE IEN = @tmp IEN AND VI STA_SITE_U ID = @VIST A_SITE_UID
	35	IF (@I D IS NOT N ULL)
	36	DELETE F ROM SPECIA LTY_TRANSF ER WHERE I D = @ID
	37	ELSE
	38	BEGIN
	39	SELECT @ID = ID, @AD M_ID = ADM ISSION_ID FROM DISCH ARGE_EVN W HERE IEN = @tmpIEN A ND VISTA_S ITE_UID = @VISTA_SIT E_UID
	40	IF (@ID IS NOT NULL)
	41	BE GIN
	42	IF N OT EXISTS (SELECT ID FROM DISC HARGE_EVN WHERE CAST (IEN AS BI GINT) > CA ST(@tmpIEN AS BIGINT ) AND ADMI SSION_ID = @ADM_ID)
	43	UPDATE ADMISSION _EVN
	44	SET HAS_ DISCHARGE = 0 WHERE ID = @ADM_ ID
	45	DELE TE FROM DI SCHARGE_EV N WHERE ID = @ID
	46	EN D
	47	ELSE
	48	BE GIN
	49	SELE CT @ID = I D, @ADM_ID = ADMISSI ON_ID, @BE D = OLD_BE D_UID, @WA RD = OLD_W ARD_UID, @ MOVEMENT_D ATE = MOVE MENT_DATE
	50	FROM M OVEMENT_EV N WHERE IE N = @tmpIE N AND VIST A_SITE_UID = @VISTA_ SITE_UID
	51	IF ( @ID IS NOT NULL)
	52	BEGIN
	53	SELECT T OP 1 @ID2 = ID FROM MOVEMENT_E VN WHERE A DMISSION_I D = @ADM_I D AND MOVE MENT_DATE > @MOVEMEN T_DATE ORD ER BY MOVE MENT_DATE
	54	IF (@ID2 IS NOT NU LL)
	55	UPDATE MOV EMENT_EVN
	56	SE T OLD_WARD _UID = @WA RD, OLD_BE D_UID = @B ED
	57	WH ERE ID = @ ID2
	58	ELSE
	59	BEGIN
	60	UP DATE ADMIS SION_EVN
	61	SET WARD_UID = @WARD, BE D_UID = @B ED
	62	WHER E ID = @AD M_ID
	63	SE LECT @DIS_ ID = ID FR OM DISCHAR GE_EVN WHE RE ADMISSI ON_ID = @A DM_ID
	64	IF (@DIS_ID IS NOT NUL L)
	65	UPDA TE DISCHAR GE_EVN
	66	SET WA RD_UID = @ WARD, BED_ UID = @BED
	67	WHERE ID = @DIS_ ID
	68	END
	69	DELETE F ROM BED_SW ITCH WHERE IEN = @tm pIEN AND V ISTA_SITE_ UID = @VIS TA_SITE_UI D
	70	DELETE F ROM MOVEME NT_EVN WHE RE ID = @I D
	71	END
	72	ELSE
	73	BEGIN
	74	SELECT @ ID = ID FR OM ADMISSI ON_EVN WHE RE IEN = @ tmpIEN AND VISTA_SIT E_UID = @V ISTA_SITE_ UID
	75	IF (@ID IS NOT NUL L)
	76	BEGIN
	77	DE LETE FROM VISTA_INTE GRATION_LO G WHERE VI STA = @VIS TA_SITE_CO DE AND VIS TA_FILE = 'PM'
	78	AND IEN IN (SE LECT IEN F ROM SPECIA LTY_TRANSF ER WHERE A DMISSION_I D = @ID)
	79	DE LETE FROM SPECIALTY_ TRANSFER W HERE ADMIS SION_ID = @ID
	80	DE LETE FROM VISTA_INTE GRATION_LO G WHERE VI STA = @VIS TA_SITE_CO DE AND VIS TA_FILE = 'PM'
	81	AND IEN IN (SE LECT IEN F ROM MOVEME NT_EVN WHE RE ADMISSI ON_ID = @I D)
	82	DE LETE FROM MOVEMENT_E VN WHERE A DMISSION_I D = @ID
	83	DE LETE FROM VISTA_INTE GRATION_LO G WHERE VI STA = @VIS TA_SITE_CO DE AND VIS TA_FILE = 'PM'
	84	AND IEN IN (SE LECT IEN F ROM DISCHA RGE_EVN WH ERE ADMISS ION_ID = @ ID)
	85	DE LETE FROM DISCHARGE_ EVN WHERE ADMISSION_ ID = @ID
	86	DE LETE FROM BED_SWITCH WHERE ADM ISSION_ID = @ID
	87	DE LETE FROM ADMISSION_ LEVEL_OF_C ARE WHERE ADMISSION_ ID = @ID
	88	DE LETE FROM ADMISSION_ EVN WHERE ID = @ID
	89	END
	90	END
	91	SET @ID2 = NUL L
	92	SET @BED = NUL L
	93	SET @WARD = NU LL
	94	SET @DIS_ID = NULL
	95	SET @MOVEMENT_ DATE = NUL L
	96	EN D
	97	END
	98	DELETE FROM VIST A_INTEGRAT ION_LOG WH ERE VISTA = @VISTA_S ITE_CODE A ND VISTA_F ILE = 'PM' AND IEN = @tmpIEN
	99	SET @I = @I + 1
	100	SET @I D = NULL
	101	SET @A DM_ID = NU LL
	102	END
	103
	104	DR OP TABLE # temp
	105	END
	106	GO