149. EPMO Open Source Coordination Office Redaction File Detail Report

Produced by Araxis Merge on 3/27/2018 2:07:04 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.

149.1 Files compared

#	Location	File	Last Modified
1	BMS_v2.4_Code.zip\BMS_v2.4_Code\Database\CreationScripts\BMS_DW\4.StoredProcedures	dbo.usp_Rpt_VisnNetworkDisposition.StoredProcedure.sql	Wed Mar 21 14:51:20 2018 UTC
2	BMS_v2.4_Code.zip\BMS_v2.4_Code\Database\CreationScripts\BMS_DW\4.StoredProcedures	dbo.usp_Rpt_VisnNetworkDisposition.StoredProcedure.sql	Thu Mar 22 00:14:40 2018 UTC

149.2 Comparison summary

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

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

149.4 Active regular expressions

No regular expressions were active.

149.5 Comparison detail

	1	/**** Ob ject: Sto redProcedu re [dbo].[ usp_Rpt_Vi snNetworkD isposition ] Scrip t Date: 03 /21/2012 1 6:29:46 ****/
	2	IF EXISTS (SELECT * FROM sys. objects WH ERE object _id = OBJE CT_ID(N'[d bo].[usp_R pt_VisnNet workDispos ition]') A ND type in (N'P', N' PC'))
	3	DROP PROCE DURE [dbo] .[usp_Rpt_ VisnNetwor kDispositi on]
	4	GO
	5
	6	SET ANSI_N ULLS ON
	7	GO
	8	SET QUOTED _IDENTIFIE R ON
	9	GO
	10
	11	CREATE PRO CEDURE [db o].[usp_Rp t_VisnNetw orkDisposi tion]
	12	@U serID N DNS AR(500) = NULL,
	13	@F ACILITIES_ IDS N DNS AR(MAX) = '',
	14	@D isposition Id INT = N ULL,
	15	@S tartDate d atetime = NULL,
	16	@E ndDate dat etime = NU LL,
	17	@V ISN_EXTENS ION nvarch ar(250),
	18	@T IME_ZONE_M INUTES_OFF SET INT
	19	AS
	20	BEGIN
	21
	22	IF @StartDat e > @EndDa te
	23	RAIS ERROR ('Th e start da te is grea ter than t he end dat e. Please correct.', 18, 13)
	24	EL SE
	25	BE GIN
	26
	27	CR EATE TABLE #FACILITY (ID INT P RIMARY KEY )
	28	DE CLARE @SQL _SELECT N DNS AR(4000), @SQL_WHERE N DNS AR(4000), @SQL N DNS AR(4000), @SQL_ORDER BY N DNS AR(4000)
	29
	30	se t @StartDa te = DATEA DD (minute , -@TIME_ ZONE_MINUT ES_OFFSET , @StartDa te );
	31	se t @EndDate = DATEADD (minute , -@TIME_ZO NE_MINUTES _OFFSET , @EndDate ) ;
	32
	33	-- create pe rmission t able
	34	CR EATE TABLE #PERMISSI ON
	35	(
	36	D IM_ORGANIZ ATION_ID I NT,
	37	D IM_WARD_ID INT
	38	)
	39	--in sert permi ssion for the user
	40	IN SERT INTO #PERMISSIO N
	41	SE LECT * FRO M dbo.ufn_ GetPermiss ionByUserN ame(@UserI D)
	42
	43	CR EATE NONCL USTERED IN DEX [DIM_O RGANIZATIO N_ID] ON # PERMISSION ([DIM_ORG ANIZATION_ ID] ASC)
	44	WITH (PAD_INDE X = OFF, STATISTICS _NORECOMPU TE = OFF, SORT_IN_T EMPDB = OF F,
	45	IGNORE _DUP_KEY = OFF,DROP_ EXISTING = OFF,ONLIN E = OFF,
	46	ALLOW_ ROW_LOCKS = ON, ALL OW_PAGE_LO CKS = ON)
	47	CR EATE NONCL USTERED IN DEX DIM_WA RD_ID ON # PERMISSION (DIM_WARD _ID ASC)
	48	WITH (PAD_INDE X = OFF,S TATISTICS_ NORECOMPUT E = OFF,S ORT_IN_TEM PDB = OFF,
	49	IGNORE _DUP_KEY = OFF, DROP _EXISTING = OFF, ONL INE = OFF,
	50	ALLOW_ ROW_LOCKS = ON, ALL OW_PAGE_LO CKS = ON) ;
	51
	52	IN SERT INTO #FACILITY( ID)
	53	SE LECT CONVE RT(INT, VA LUE) FROM dbo.ufn_Sp lit(@FACIL ITIES_IDS, ',')
	54
	55	DE LETE FROM #FACILITY
	56	WH ERE ID NOT IN (SELEC T DIM_ORGA NIZATION_I D FROM #PE RMISSION)
	57
	58
	59	SE T @SQL_SEL ECT = 'SEL ECT org.NA ME as Faci lity,
	60	pt.L AST_NAME + '' '' + R IGHT(pt.SS N,4) as Pa tient,
	61	pt.S SN as SSN,
	62	con. DISPLAY_NA ME as [Con tract],
	63	pt.S ERVICE_CON NECTED_PER CENTAGE as SvcCon,
	64	ft.D IAGNOSIS a s Diagnosi s,
	65	spec .DISPLAY_N AME as Spe cialty,
	66	disp .DISPLAY_N AME as Dis position,
	67	admi ssionFac.N ame as Adm itHosp,
	68	EVN_ DISPOSITIO N_DATE as DispDate,
	69	EVN_ COMMENTS a s DispComm ents,
	70	ft.C URRENT_LOC ATION as C ommunityHo spital,
	71	CONVERT( DNS AR(8),DATE ADD (minut e, ' + cas t(@TIME_ZO NE_MINUTES _OFFSET as varchar(1 0)) + ',ft .REQ_LOCAT ION_ADMISS ION_DATE), 1) as CHAd mDate,
	72	REQ_ ENTERED_BY as Entere dBy,
	73	REQ_ LAST_EDIT_ BY as Last EditBy,
	74	REQ_ EDITED as DTEdited
	75	FR OM FACT_TR ANSFER ft
	76	INNER JOIN DIM_P ATIENT pt ON ft.DIM_ PATIENT_ID = pt.ID
	77	LEFT J OIN DIM_OR GANIZATION org ON ft .FACILITY_ DIM_ORGANI ZATION_ID = org.ID
	78	LEFT J OIN DIM_SP ECIALTY sp ec ON ft.D IM_SPECIAL TY_ID = sp ec.ID
	79	LEFT J OIN DIM_OR GANIZATION admission Fac ON ft. ADMISSION_ FACILITY_D IM_ORGANIZ ATION_ID = admission Fac.ID
	80	LEFT J OIN DIM_DI SPOSITION disp ON ft .DIM_DISPO SITION_ID = disp.ID
	81	LEFT J OIN DIM_CO NTRACT con ON ft.REQ _CONTRACT_ ID = con.I D '
	82	SE T @SQL_WHE RE = ' WHE RE (ft.FA CILITY_DIM _ORGANIZAT ION_ID IN (SELECT ID FROM #FAC ILITY) OR ft.ADMISSI ON_FACILIT Y_DIM_ORGA NIZATION_I D in (SELE CT ID FROM #FACILITY ))
	83	A ND ft.EVN_ DISPOSITIO N_DATE bet ween ''' + convert(v archar(25) ,@StartDat e,126) + ' '' and ''' + conver t(varchar( 25),@EndDa te,126) + ''''
	84
	85	IF @Dis positionId <> -1
	86	SET @SQL_ WHERE += ' AND ft.DI M_DISPOSIT ION_ID = ' '' + cast( @Dispositi onId as va rchar(25)) + ''''
	87	EL SE
	88	SET @SQL_ WHERE += ' AND ft.DI M_DISPOSIT ION_ID in (SELECT ID FROM DIM_ DISPOSITIO N) '
	89
	90	SE T @SQL_ORD ERBY = ' O RDER BY ft .EVN_DISPO SITION_DAT E desc '
	91
	92	SE T @SQL = @ SQL_SELECT + @SQL_WH ERE + @SQL _ORDERBY
	93	EX ECUTE sp_e xecutesql @SQL
	94
	95	DR OP TABLE # FACILITY
	96
	97	IF OBJECT_ID ('tempdb.. #PERMISSIO N') IS NOT NULL
	98	BE GIN
	99	DROP TABLE #PE RMISSION
	100	EN D
	101
	102	EN D --error
	103	END
	104	GO