145. EPMO Open Source Coordination Office Redaction File Detail Report

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

145.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_Insert_Discharge_Request.sql	Wed Oct 23 12:51:10 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_Insert_Discharge_Request.sql	Thu Oct 26 15:45:53 2017 UTC

145.2 Comparison summary

Description	Between Files 1 and 2
Description	Text Blocks	Lines
Unchanged	3	184
Changed	2	4
Inserted	0	0
Removed	0	0

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

145.4 Active regular expressions

No regular expressions were active.

145.5 Comparison detail

	1	/**** Ob ject: Sto redProcedu re [dbo].[ usp_Insert _Discharge _Request] Script Date: 03/2 2/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_Requ est]') AND type in ( N'P', N'PC '))
	3	DROP PROCE DURE [dbo] .[usp_Inse rt_Dischar ge_Request ]
	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 request .
	13	-- ======= ========== ========== ========== ========
	14	CREATE PRO CEDURE [db o].[usp_In sert_Disch arge_Reque st]
	15	@I D INT OUTPUT,
	16	@D OMAIN_ID V ARCHAR(50) ,
	17	@I EN VARCHAR (50),
	18	@P ATIENT_UID UNIQUEIDE NTIFIER,
	19	@O RDERED_DAT E DATETIME ,
	20	@I S_ACTIVE B IT,
	21	@R ELEASED_DA TE DATETIM E,
	22	@S IGNED_DATE DATETIME,
	23	@S IGNED_BY_U ID UNIQUEI DENTIFIER,
	24	@P ROVIDER_UI D UNIQUEID ENTIFIER,
	25	@S CHEDULER_U ID UNIQUEI DENTIFIER,
	26	@V ISTA_SITE_ UID UNIQUE IDENTIFIER ,
	27	@H OSPITAL_LO CATION_UID UNIQUEIDE NTIFIER,
	28	@O RDER_TEXT VARCHA R(MAX),
	29	@O RDERABLE_I TEM_CODE V ARCHAR(100 ),
	30	@O RDERABLE_I TEM_CODE_S YSTEM VARC HAR(100),
	31	@O RDERABLE_I TEM_CODE_S YSTEM_NAME VARCHAR(1 00),
	32	@O RDERABLE_I TEM_DISPLA Y_NAME VAR CHAR(250),
	33	@W ARD_UID UN IQUEIDENTI FIER,
	34	@F ACILITY_LI ST VARCHAR(MA X)
	35	AS
	36	SET NOCOUN T ON
	37
	38	BEGIN
	39
	40	DE CLARE @OR DERABLE_IT EM_ID INT
	41	-- ORDERABLE ITEM CONC EPT EXISTE NCE CHECK
	42	EX EC dbo.usp _Manage_Co ncept
	43	@COD E = @ORDER ABLE_ITEM_ CODE,
	44	@COD E_SYSTEM = @ORDERABL E_ITEM_COD E_SYSTEM,
	45	@COD E_SYSTEM_N AME = @ORD ERABLE_ITE M_CODE_SYS TEM_NAME,
	46	@DIS PLAY_NAME = @ORDERAB LE_ITEM_DI SPLAY_NAME ,
	47	@ID = @ORDERAB LE_ITEM_ID OUTPUT
	48
	49	SE LECT @ID = ID FROM D ISCHARGE_R EQ WHERE I EN = @IEN AND VISTA_ SITE_UID = @VISTA_SI TE_UID
	50
	51	IF (@ID IS N ULL)
	52	BEGI N
	53	INSERT INTO DISC HARGE_REQ
	54	(DOMAIN_ ID,
	55	IEN,
	56	PATIENT_ UID ,
	57	ORDERED_ DATE,
	58	IS_ACTIV E,
	59	RELEASED _DATE,
	60	SIGNED_D ATE,
	61	SIGNED_B Y_UID,
	62	SCHEDULE R_UID,
	63	PROVIDER _UID,
	64	VISTA_SI TE_UID,
	65	HOSPITAL _LOCATION_ UID,
	66	ORDER_TE XT,
	67	ORDERABL E_ITEM_ID,
	68	WARD_UID )
	69	VALUES
	70	(@DOMAIN _ID,
	71	@IEN,
	72	@PATIENT _UID,
	73	@ORDERED _DATE,
	74	@IS_ACTI VE,
	75	@RELEASE D_DATE,
	76	@SIGNED_ DATE,
	77	@SIGNED_ BY_UID,
	78	@SCHEDUL ER_UID,
	79	@PROVIDE R_UID,
	80	@VISTA_S ITE_UID,
	81	@HOSPITA L_LOCATION _UID,
	82	@ORDER_T EXT,
	83	@ORDERAB LE_ITEM_ID ,
	84	@WARD_UI D)
	85
	86	SET @I D = IDENT_ CURRENT('d bo.DISCHAR GE_REQ')
	87
	88	INSERT INTO ORDE R_FACILITY
	89	(ORDER_I D, FACILIT Y_UID, ORD ER_TYPE)
	90	SELECT @ID, S.VA LUE, 'DIS'
	91	FROM d bo.fn_Spli t(@FACILIT Y_LIST, ', ') AS S
	92	END
	93	END
	94	GO