863. EPMO Open Source Coordination Office Redaction File Detail Report

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

863.1 Files compared

# Location File Last Modified
1 OSCIF_BMS_v2_iter 2_September_2017.zip\BMS_Cand\Source\Sources\Database\MaintenanceScripts usp_Filter_Patient_Waiting_Date_View.sql Wed Oct 18 18:58:10 2017 UTC
2 OSCIF_BMS_v2_iter 2_September_2017.zip\BMS_Cand\Source\Sources\Database\MaintenanceScripts usp_Filter_Patient_Waiting_Date_View.sql Thu Oct 26 19:53:10 2017 UTC

863.2 Comparison summary

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

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

863.4 Active regular expressions

No regular expressions were active.

863.5 Comparison detail

  1   USE [BMS]
  2   GO
  3   /****** Ob ject:  Sto redProcedu re [dbo].[ usp_Filter _Patient_W aiting_Dat e_View]     Script Da te: 02/11/ 2016 11:01 :21 ****** /
  4   SET ANSI_N ULLS ON
  5   GO
  6   SET QUOTED _IDENTIFIE R ON
  7   GO
  8  
  9   -- ======= ========== ========== ========== ========
  10   -- Author:                
P II
  11   -- Create  date: 10.1 2.2011
  12   -- Descrip tion: Filt er transfe rs by faci lity.
  13   -- ======= ========== ========== ========== ========
  14   -- ======= ========== ========== ========== ========
  15   -- Update  by:    PII
  16   -- Update  date: 10/2 5/2011
  17   -- Descrip tion: Filt er transfe rs by faci lity
  18   -- ======= ========== ========== ========== ========
  19   -- Updated By: Silvia  Pletea
  20   -- Updated  date: 02. 16.2012
  21   -- Descrip tion: Adde d new para meter: @IS _CURRENT_W AITING_LIS T. If this  is true r eturn all  the patien ts where 
  22   -- transfe r event is  null else  filter by  event dat e. 
  23   -- ======= ========== ========== ========== ========
  24  
  25   ALTER PROC EDURE [dbo ].[usp_Fil ter_Patien t_Waiting_ Date_View]  
  26           @F ACILITY_RE GION NVARC HAR(100),
  27           @F ACILITY_VI SN NVARCHA R(100),
  28           @S PECIALTY_C ODE NVARCH AR(100),
  29           @S PECIALTY_C ODE_SYSTEM  NVARCHAR( 100),
  30           @C REATION_DA TE DATETIM E = NULL,
  31           @I S_CURRENT_ WAITING_LI ST BIT,
  32           @I S_DISPLAY_ ONLY_NATIO NAL_PATIEN TS BIT
  33   AS
  34   BEGIN
  35           SE T NOCOUNT  ON;
  36  
  37           DE CLARE @SQL  NVARCHAR( MAX), @SQL _SECURITY  NVARCHAR(M AX), @DOMA IN NVARCHA R(250), @S PECIALTY_I D INT, @SQ L_WHERE NV ARCHAR(MAX )
  38           SE T @DOMAIN  = dbo.F_GE T_CURRENT_ DOMAIN()                  
  39           
  40           IF  (dbo.F_GE T_IS_SUPER USER() !=  1)
  41                    SET  @SQL_SECUR ITY = COAL ESCE(@SQL_ SECURITY,  '') + 'INN ER JOIN vP olicyConte xt V ON V. resource_r oot = '''  + @DOMAIN  + '''
  42                             AND V. resource_e xtension =  CAST(TR.F ACILITY_UI D AS nvarc har(36)) A ND v.actio n_name = ' 'BMS, Read '''
  43           EL SE 
  44                    SET  @SQL_SECUR ITY = ''           
  45                    
  46           SE T @SQL_WHE RE = COALE SCE(@SQL_W HERE,'')
  47           IF  (@SPECIAL TY_CODE IS  NOT NULL)
  48           BE GIN
  49                    SELE CT TOP(1)  @SPECIALTY _ID = ID F ROM CONCEP T WHERE CO DE = @SPEC IALTY_CODE  AND CODE_ SYSTEM = @ SPECIALTY_ CODE_SYSTE M
  50                    IF ( @SPECIALTY _ID IS NUL L)
  51                             RETURN
  52                    SET  @SQL_WHERE  = @SQL_WH ERE + ' AN D REQSP.ID  = '+ CAST (@SPECIALT Y_ID AS NV ARCHAR(10) ) +' '               
  53           EN D
  54           IF  (@FACILIT Y_REGION I S NOT NULL )
  55                    SET  @SQL_WHERE  = @SQL_WH ERE + ' AN D [TR].[FA CILITY_REG ION] = '+  @FACILITY_ REGION +'  '
  56           IF  (@FACILIT Y_VISN IS  NOT NULL)
  57                    SET  @SQL_WHERE  = @SQL_WH ERE + ' AN D [TR].[FA CILITY_VIS N] = '+ @F ACILITY_VI SN +' '                 
  58           
  59           IF (@IS_CURRE NT_WAITING _LIST = 1)
  60                    SET  @SQL_WHERE  = @SQL_WH ERE + ' AN D TE.ACT_I D IS NULL'
  61           EL SE 
  62                    SET  @SQL_WHERE  = @SQL_WH ERE + ' AN D (TE.ACT_ ID IS NULL  OR TE.ACT _ID IS NOT  NULL AND  AEVN.CREAT ION_DATE >  ''' + CON VERT(VARCH AR(25), @C REATION_DA TE, 126) +  ''')'
  63                             
  64           IF (@IS_DISPL AY_ONLY_NA TIONAL_PAT IENTS = 1)
  65                    SET  @SQL_WHERE  = @SQL_WH ERE + ' AN D TR.IS_NA TIONAL_WAI T_LIST = 1 '
  66           
  67           SE T @SQL = C OALESCE(@S QL,'') + '         
  68                    SELE CT DISTINC T
  69                             [A].[C REATION_DA TE] AS [CR EATION_DAT E],
  70                             [A].[C ANCELED_DA TE] AS [CA NCELED_DAT E],
  71                             [A].[D OMAIN_ID]  AS [DOMAIN _ID],
  72                             [A].[P ATIENT_UID ] AS [PATI ENT_UID],
  73                             [TE].[ ADMISSION_ FACILITY_U ID] AS [EV N_ADMISSIO N_FACILITY _UID],
  74                             [TE].[ DISPOSITIO N_DATE] AS  [EVN_DISP OSITION_DA TE],      
  75                             [TR].[ FACILITY_U ID] AS [RE Q_FACILITY _UID],
  76                             [REQSP ].[DISPLAY _NAME] AS  [REQ_SPECI ALITY_DISP LAY_NAME],
  77                             [TR].[ FACILITY_R EGION] AS  [REGION_CO DE],
  78                             [TR].[ FACILITY_V ISN] AS [V ISN_CODE],
  79                             [TR].[ REQUESTED_ DATE] AS [ EVN_EVENT_ DATE],
  80                             [TR].[ ENTERED_BY ] AS [ENTE R_BY],
  81                             [TR].[ LAST_EDIT_ BY] AS [LA ST_EDIT_BY ],
  82                             [TR].[ EDITED] AS  [LAST_EDI T_DATE],
  83                             [TR].[ IS_NATIONA L_WAIT_LIS T] AS [IS_ NATIONAL_W AIT_LIST],
  84                             [TR].[ CREATED] A S [REQ_CRE ATED],
  85                             [TE].[ CREATED] A S [EVN_CRE ATED]                   
  86                    FROM  ACT A
  87                             INNER  JOIN TRANS FER_REQ TR  ON A.ID =  TR.ACT_ID
  88                             LEFT J OIN ACT AS  AEVN ON A EVN.PARENT _ACT_ID =  TR.ACT_ID
  89                             LEFT J OIN TRANSF ER_EVN AS  TE ON TE.A CT_ID = AE VN.ID
  90                             LEFT J OIN CONCEP T AS REQSP  ON TR.SPE CIALITY_ID  = REQSP.I D                         
  91                             ' + 
  92                             --@SQL _SECURITY 
  93                             ' WHER E 1 = 1 '  + @SQL_WHE RE + '
  94                    ORDE R BY [A].[ CREATION_D ATE] '
  95                    
  96                    EXEC UTE sp_exe cutesql @S QL
  97   END
  98