793. EPMO Open Source Coordination Office Redaction File Detail Report

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

793.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_Insert_Discharge_Event.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_Insert_Discharge_Event.sql	Thu Oct 26 19:45:37 2017 UTC

793.2 Comparison summary

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

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

793.4 Active regular expressions

No regular expressions were active.

793.5 Comparison detail

	1	/**** Ob ject: Sto redProcedu re [dbo].[ usp_Insert _Discharge _Event] Script Da te: 03/22/ 2012 11:04 :49 **** /
	2	IF EXISTS (SELECT * FROM sys. objects WH ERE object _id = OBJE CT_ID(N'[d bo].[usp_I nsert_Disc harge_Even t]') AND t ype in (N' P', N'PC') )
	3	DROP PROCE DURE [dbo] .[usp_Inse rt_Dischar ge_Event]
	4	GO
	5	SET ANSI_N ULLS ON
	6	GO
	7	SET QUOTED _IDENTIFIE R ON
	8	GO
	9	-- ======= ========== ========== ========== ========
	10	-- Author: PII
	11	-- Create date: 24.1 0.2012
	12	-- Descrip tion: Inse rt dischar ge event.
	13	-- ======= ========== ========== ========== ========
	14	CREATE PRO CEDURE [db o].[usp_In sert_Disch arge_Event ]
	15	@I D INT OUTPUT,
	16	@D OMAIN_ID V ARCHAR(50) ,
	17	@P ATIENT_UID UNIQUEIDE NTIFIER,
	18	@I EN VARCHAR (50),
	19	@E NTERED_DAT E DATETIME ,
	20	@W ARD_UID UN IQUEIDENTI FIER,
	21	@B ED_UID UNI QUEIDENTIF IER,
	22	@V ISTA_SITE_ UID UNIQUE IDENTIFIER ,
	23	@D ISCHARGED_ DATE DATET IME,
	24	@T YPE_OF_MOV EMENT_CODE VARCHAR(1 00),
	25	@T YPE_OF_MOV EMENT_CODE _SYSTEM VA RCHAR(100) ,
	26	@T YPE_OF_MOV EMENT_CODE _SYSTEM_NA ME VARCHAR (100),
	27	@T YPE_OF_MOV EMENT_DISP LAY_NAME V ARCHAR(250 ),
	28	@E NTERED_BY_ UID UNIQUE IDENTIFIER ,
	29	@A DMISSION_I EN NVARCHA R(20)
	30
	31	AS
	32	SET NOCOUN T ON
	33
	34	BEGIN
	35
	36	IF EXISTS (S ELECT ID F ROM DISCHA RGE_EVN WH ERE IEN = @IEN AND V ISTA_SITE_ UID = @VIS TA_SITE_UI D)
	37	SELE CT @ID = I D FROM DIS CHARGE_EVN WHERE IEN = @IEN AN D VISTA_SI TE_UID = @ VISTA_SITE _UID
	38	EL SE
	39	BEGI N
	40	DECLAR E @TYPE_OF _MOVEMENT_ ID INT, @A DMISSION_I D INT
	41	SELECT @ADMISSIO N_ID = ID FROM ADMIS SION_EVN W HERE IEN = @ADMISSIO N_IEN AND VISTA_SITE _UID = @VI STA_SITE_U ID
	42
	43	-- TYP E OF MOVEM ENT CONCEP T EXISTENC E CHECK
	44	EXEC d bo.usp_Man age_Concep t
	45	@CODE = @TYPE_OF_M OVEMENT_CO DE,
	46	@CODE_SY STEM = @TY PE_OF_MOVE MENT_CODE_ SYSTEM,
	47	@CODE_SY STEM_NAME = @TYPE_OF _MOVEMENT_ CODE_SYSTE M_NAME,
	48	@DISPLAY _NAME = @T YPE_OF_MOV EMENT_DISP LAY_NAME,
	49	@ID = @T YPE_OF_MOV EMENT_ID O UTPUT
	50
	51	INSERT INTO DISC HARGE_EVN
	52	(
	53	DOMAIN_I D,
	54	IEN,
	55	PATIENT_ UID,
	56	ENTERED_ DATE,
	57	WARD_UID ,
	58	BED_UID,
	59	VISTA_SI TE_UID,
	60	DISCHARG ED_DATE,
	61	ENTERED_ BY_UID,
	62	TYPE_OF_ MOVEMENT_I D,
	63	ADMISSIO N_ID
	64	)
	65	VALUES
	66	(
	67	@DOMAIN_ ID,
	68	@IEN,
	69	@PATIENT _UID,
	70	@ENTERED _DATE,
	71	@WARD_UI D,
	72	@BED_UID ,
	73	@VISTA_S ITE_UID,
	74	@DISCHAR GED_DATE,
	75	@ENTERED _BY_UID,
	76	@TYPE_OF _MOVEMENT_ ID,
	77	@ADMISSI ON_ID
	78	)
	79
	80	SET @I D = IDENT_ CURRENT('d bo.DISCHAR GE_EVN')
	81
	82	IF (@A DMISSION_I D IS NOT N ULL)
	83	BEGIN
	84	UPDATE ADM ISSION_EVN
	85	SE T HAS_DISC HARGE = 1
	86	WH ERE ID = @ ADMISSION_ ID
	87	END
	88	END
	89	END
	90	GO