179. EPMO Open Source Coordination Office Redaction File Detail Report

Produced by Araxis Merge on 10/26/2017 10:43:16 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.

179.1 Files compared

#	Location	File	Last Modified
1	OSCIF_BMS_v2_iter 2_September_2017.zip\BMS_Cand\BMS_Build_C72898\BMS_Source-BuildC72898.zip\C72898\Source\Sources\Database\CreationScripts\BMS\4.Stored Procedures	dbo.usp_Update_Movements_Without_Bed.sql	Wed Oct 23 12:51:11 2013 UTC
2	OSCIF_BMS_v2_iter 2_September_2017.zip\BMS_Cand\BMS_Build_C72898\BMS_Source-BuildC72898.zip\C72898\Source\Sources\Database\CreationScripts\BMS\4.Stored Procedures	dbo.usp_Update_Movements_Without_Bed.sql	Thu Oct 26 15:44:58 2017 UTC

179.2 Comparison summary

Description	Between Files 1 and 2
Description	Text Blocks	Lines
Unchanged	5	204
Changed	4	8
Inserted	0	0
Removed	0	0

179.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

179.4 Active regular expressions

No regular expressions were active.

179.5 Comparison detail

	1	IF EXISTS (SELECT * FROM sys. objects WH ERE object _id = OBJE CT_ID(N'[d bo].[usp_U pdate_Move ments_With out_Bed]') AND type in (N'P', N'PC'))
	2	DROP PROCE DURE [dbo] .[usp_Upda te_Movemen ts_Without _Bed]
	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 : 01/15/ 2013
	11	-- Descrip tion : Update s admissio ns and mov ements wit hout bed.
	12	-- ======= ========== ========== ========== ========
	13	CREATE PRO CEDURE [db o].[usp_Up date_Movem ents_Witho ut_Bed]
	14	@I EN VARCHAR(MA X),
	15	@V ISTA_SITE_ UID UNIQUE IDENTIFIER
	16	AS
	17	BEGIN
	18	SE T NOCOUNT ON;
	19
	20	CR EATE TABLE #movement s (NR INT, IEN VARCHAR(50 ), WARD_UI D UNIQUEID ENTIFIER, BED_UID UN IQUEIDENTI FIER)
	21	IN SERT INTO #movements
	22	(NR, IEN, WARD _UID, BED_ UID)
	23	SE LECT ID, I EN, WARD_U ID, BED_UI D
	24	FR OM dbo.SPL IT_STRING_ IEN_WARD_B ED(@IEN, ' ,')
	25
	26	DE CLARE @I I NT, @MAX I NT, @tmpIE N VARCHAR(50 ), @tmpWAR D UNIQUEID ENTIFIER, @tmpBED UN IQUEIDENTI FIER, @ID INT, @ID2 INT,
	27	@ADM_I D INT, @DI S_ID INT, @MOVEMENT_ DATE DATET IME
	28
	29	SE LECT @MAX = COUNT(NR ) FROM #mo vements
	30	SE T @I = 1
	31	WH ILE (@I <= @MAX)
	32	BEGI N
	33	SELECT @tmpIEN = IEN, @tmp WARD = WAR D_UID, @tm pBED = BED _UID FROM #movements WHERE NR = @I
	34	SELECT @ID = ID, @ADM_ID = ADMISSION _ID, @MOVE MENT_DATE = MOVEMENT _DATE FROM MOVEMENT_ EVN WHERE IEN = @tmp IEN AND VI STA_SITE_U ID = @VIST A_SITE_UID
	35	IF (@I D IS NOT N ULL)
	36	BEGIN
	37	UPDATE MOV EMENT_EVN
	38	SE T WARD_UID = @tmpWAR D,
	39	BED_ UID = @tmp BED
	40	WH ERE ID = @ ID
	41	SELECT TOP 1 @ID2 = ID FROM MO VEMENT_EVN WHERE ADM ISSION_ID = @ADM_ID AND MOVEME NT_DATE > @MOVEMENT_ DATE ORDER BY MOVEME NT_DATE
	42	IF (@ID2 I S NOT NULL )
	43	UP DATE MOVEM ENT_EVN
	44	SET OLD_WARD_U ID = @tmpW ARD,
	45	OLD_BE D_UID = @t mpBED
	46	WHER E ID = @ID 2
	47	ELSE
	48	BE GIN
	49	UPDA TE ADMISSI ON_EVN
	50	SET WA RD_UID = @ tmpWARD,
	51	BED_UID = @tmpBED
	52	WHERE ID = @ADM_ ID
	53	SELE CT @DIS_ID = ID FROM DISCHARGE _EVN WHERE ADMISSION _ID = @ADM _ID
	54	IF ( @DIS_ID IS NOT NULL)
	55	UPDATE DISCHARGE _EVN
	56	SET WARD _UID = @tm pWARD,
	57	BED_UID = @tmpBED
	58	WHERE ID = @DIS_ID
	59	EN D
	60	END
	61	ELSE
	62	BEGIN
	63	SELECT @ID = ID FROM ADMISSION _EVN WHERE IEN = @tm pIEN AND V ISTA_SITE_ UID = @VIS TA_SITE_UI D
	64	IF (@ID IS NOT NULL)
	65	BE GIN
	66	IF N OT EXISTS (SELECT ID FROM MOVE MENT_EVN W HERE ADMIS SION_ID = @ID)
	67	BEGIN
	68	UPDATE A DMISSION_E VN
	69	SET WARD_U ID = @tmpW ARD,
	70	BE D_UID = @t mpBED,
	71	IN ITIAL_WARD _UID = @tm pWARD,
	72	IN ITIAL_BED_ UID = @tmp BED
	73	WHERE ID = @ID
	74	SELECT @ DIS_ID = I D FROM DIS CHARGE_EVN WHERE ADM ISSION_ID = @ID
	75	IF (@DIS _ID IS NOT NULL)
	76	UPDATE DIS CHARGE_EVN
	77	SE T WARD_UID = @tmpWAR D,
	78	BED_ UID = @tmp BED
	79	WH ERE ID = @ DIS_ID
	80	END
	81	ELSE
	82	BEGIN
	83	UPDATE A DMISSION_E VN
	84	SET INITIA L_WARD_UID = @tmpWAR D,
	85	IN ITIAL_BED_ UID = @tmp BED
	86	WHERE ID = @ID
	87	SELECT T OP 1 @ID2 = ID FROM MOVEMENT_E VN WHERE A DMISSION_I D = @ID OR DER BY MOV EMENT_DATE
	88	UPDATE M OVEMENT_EV N
	89	SET OLD_BE D_UID = @t mpBED,
	90	OL D_WARD_UID = @tmpWAR D
	91	WHERE ID = @ID2
	92	END
	93	EN D
	94	END
	95	SET @I D = NULL
	96	SET @I D2 = NULL
	97	SET @A DM_ID = NU LL
	98	SET @D IS_ID = NU LL
	99	SET @M OVEMENT_DA TE = NULL
	100	SET @I = @I + 1
	101	END
	102
	103	DR OP TABLE # movements
	104
	105	END
	106	GO