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

755.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_Get_Bed_Unavailable.sql	Wed Oct 18 19:07:00 2017 UTC
2	OSCIF_BMS_v2_iter 2_September_2017.zip\BMS_Cand\Source\Sources\Database\CreationScripts\BMS\4.Stored Procedures	dbo.usp_Get_Bed_Unavailable.sql	Thu Oct 26 19:45:38 2017 UTC

755.2 Comparison summary

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

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

755.4 Active regular expressions

No regular expressions were active.

755.5 Comparison detail

	1	/**** Ob ject: Sto redProcedu re [dbo].[ usp_Get_Be d_Unavaila ble] Sc ript Date: 03/22/201 2 11:04:49 ****/
	2	IF EXISTS (SELECT * FROM sys. objects WH ERE object _id = OBJE CT_ID(N'[d bo].[usp_G et_Bed_Una vailable]' ) AND type in (N'P', N'PC'))
	3	DROP PROCE DURE [dbo] .[usp_Get_ Bed_Unavai lable]
	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: 07.0 9.2011
	12	-- Descrip tion: Get bed unavai lable by I D.
	13	-- ======= ========== ========== ========== ========
	14	CREATE PRO CEDURE [db o].[usp_Ge t_Bed_Unav ailable]
	15	@A CT_ID INT = NULL,
	16	@D OMAIN_ID N VARCHAR(50 ) = NULL,
	17	@B ED_UID UNI QUEIDENTIF IER = NULL
	18	AS
	19	BEGIN
	20	SET NOCOUN T ON
	21
	22	DE CLARE @SQL _SELECT NV ARCHAR(MAX ), @SQL_WH ERE NVARCH AR(MAX), @ SQL NVARCH AR(MAX)
	23
	24	-- GET THE L IST OF WAR DS
	25	DE CLARE @I I NT, @ROWCO UNT INT, @ FK INT, @W ARD_LIST N VARCHAR(MA X)
	26	IF (@BED_UID IS NULL)
	27	SET @FK = @ACT _ID
	28	EL SE
	29	SELE CT @FK = A CT_ID FROM BED_UNAVA ILABLE AS BU
	30	INNER JOIN ACT A S A ON A.I D = BU.ACT _ID
	31	WHER E BED_UID = @BED_UID AND COMPL ETEDBY IS NULL AND C OMPLETED_D ATE IS NUL L AND A.CA NCELED_DAT E IS NULL
	32
	33	CR EATE TABLE #WARDS (I D INT, WAR D_UID UNIQ UEIDENTIFI ER)
	34
	35	IN SERT INTO #WARDS (ID , WARD_UID )
	36	SELE CT ROW_NUM BER() OVER (ORDER BY WARD_UID) , WARD_UID
	37	FRO M BED_UNAV AILABLE_WA RD
	38	WHER E BED_UNAV AILABLE_ID = @FK
	39	SE T @ROWCOUN T = @@ROWC OUNT
	40
	41	SE T @I = 1
	42	SE T @WARD_LI ST = COALE SCE(@WARD_ LIST,'')
	43	WH ILE (@I <= @ROWCOUNT )
	44	BEGI N
	45	SELECT @WARD_LIS T = @WARD_ LIST + CAS T(WARD_UID AS NVARCH AR(50)) + ',' FROM # WARDS WHER E ID = @I
	46	SET @I = @I + 1
	47	END
	48
	49	DR OP TABLE # WARDS
	50
	51	SET @S QL_SELECT = 'SELECT
	52	[A ].[ID] AS ACT_ID,
	53	[A ].[CREATIO N_DATE],
	54	[A ].[CANCELE D_DATE],
	55	[A ].[PARENT_ ACT_ID],
	56	[A ].[FLOW_ID ],
	57	[A ].[DOMAIN_ ID],
	58	[A ].[IEN],
	59	[T OCC].[CODE ] AS [TYPE _CODE],
	60	[T OCC].[CODE _SYSTEM] A S [TYPE_CO DE_SYSTEM] ,
	61	[T OCC].[CODE _SYSTEM_NA ME] AS [TY PE_CODE_SY STEM_NAME] ,
	62	[T OCC].[DISP LAY_NAME] AS [TYPE_D ISPLAY_NAM E],
	63	[R OCC].[CODE ] AS [REAS ON_CODE],
	64	[R OCC].[CODE _SYSTEM] A S [REASON_ CODE_SYSTE M],
	65	[R OCC].[CODE _SYSTEM_NA ME] AS [RE ASON_CODE_ SYSTEM_NAM E],
	66	[R OCC].[DISP LAY_NAME] AS [REASON _DISPLAY_N AME],
	67	[B U].[DIVISI ON_UID] AS [DIVISION _UID],
	68	[B U].[BED_UI D] AS [BED _UID],
	69	[B U].[CREATI ONBY] AS [ CREATED_BY ],
	70	[B U].[EDITED BY] AS [ED ITED_BY],
	71	[B U].[EDITED _DATE] AS [EDITED_DA TE],
	72	[B U].[COMPLE TEDBY] AS [COMPLETED _BY],
	73	[B U].[COMPLE TED_DATE] AS [COMPLE TED_DATE],
	74	[B U].[VISTA_ SITE_UID] AS [VISTA_ SITE_UID],
	75	[B U].[IS_UNA VAILABLE_F ROM_VISTA] AS IS_UNA VAILABLE_F ROM_VISTA,
	76	'' ' + @WARD_ LIST + ''' AS [WARD_ LIST],
	77	[B U].EXPECTE D_COMPLETE D_DATE AS EXPECTED_C OMPLETED_D ATE
	78	FROM AC T A
	79	IN NER JOIN B ED_UNAVAIL ABLE AS BU ON A.ID = BU.ACT_ID
	80	LE FT JOIN CO NCEPT AS T OCC ON BU. TYPE_ID = TOCC.ID
	81	LE FT JOIN CO NCEPT AS R OCC ON BU. REASON_ID = ROCC.ID'
	82
	83	SET @SQ L_WHERE = ' WHERE [A ].[DOMAIN_ ID] = ''' + @DOMAIN_ ID + '''
	84	AND [BU] .[COMPLETE DBY] IS NU LL AND [BU ].[COMPLET ED_DATE] I S NULL AND [A].[CANC ELED_DATE] IS NULL'
	85
	86	IF @ACT _ID IS NOT NULL
	87	SET @ SQL_WHERE += ' AND [ A].[ID] = ''' + CAST (@ACT_ID A S VARCHAR) + ''''
	88
	89	IF @BED _UID IS NO T NULL
	90	BEGIN
	91	SET @SQL_WHER E += ' AND BU.BED_UI D = ''' + CAST(@BED_ UID AS VAR CHAR(50)) + ''''
	92	END
	93
	94	SET @SQ L = @SQL_S ELECT + @S QL_WHERE
	95
	96	EXECUTE sp_execut esql @SQL
	97
	98	END
	99	GO