746. EPMO Open Source Coordination Office Redaction File Detail Report

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

746.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_Filter_Patient_Waiting_Date_View.sql Wed Oct 18 19:06:58 2017 UTC
2 OSCIF_BMS_v2_iter 2_September_2017.zip\BMS_Cand\Source\Sources\Database\CreationScripts\BMS\4.Stored Procedures dbo.usp_Filter_Patient_Waiting_Date_View.sql Thu Oct 26 19:45:38 2017 UTC

746.2 Comparison summary

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

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

746.4 Active regular expressions

No regular expressions were active.

746.5 Comparison detail

  1   /****** Ob ject:  Sto redProcedu re [dbo].[ usp_Filter _Patient_W aiting_Dat e_View]     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_F ilter_Pati ent_Waitin g_Date_Vie w]') AND t ype in (N' P', N'PC') )
  3   DROP PROCE DURE [dbo] .[usp_Filt er_Patient _Waiting_D ate_View]
  4   GO
  5   SET ANSI_N ULLS ON
  6   GO
  7   SET QUOTED _IDENTIFIE R ON
  8   GO
  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   CREATE PRO CEDURE [db o].[usp_Fi lter_Patie nt_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                    FROM  ACT A
  85                             INNER  JOIN TRANS FER_REQ TR  ON A.ID =  TR.ACT_ID
  86                             LEFT J OIN ACT AS  AEVN ON A EVN.PARENT _ACT_ID =  TR.ACT_ID
  87                             LEFT J OIN TRANSF ER_EVN AS  TE ON TE.A CT_ID = AE VN.ID
  88                             LEFT J OIN CONCEP T AS REQSP  ON TR.SPE CIALITY_ID  = REQSP.I D                         
  89                             ' + @S QL_SECURIT Y + '
  90                             WHERE  1 = 1 ' +  @SQL_WHERE  + '
  91                    ORDE R BY [A].[ CREATION_D ATE] '
  92                    
  93                    EXEC UTE sp_exe cutesql @S QL
  94   END
  95   GO