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

864.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_Standard_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_Standard_View.sql Thu Oct 26 19:53:10 2017 UTC

864.2 Comparison summary

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

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

864.4 Active regular expressions

No regular expressions were active.

864.5 Comparison detail

  1   USE [BMS]
  2   GO
  3   /****** Ob ject:  Sto redProcedu re [dbo].[ usp_Filter _Patient_W aiting_Sta ndard_View ]    Scrip t Date: 02 /11/2016 1 1:02:46 ** ****/
  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 0.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   -- ======= ========== ========== ========== ========
  20   -- Updated By: Silvia  Pletea
  21   -- Updated  date: 02. 16.2012
  22   -- Descrip tion: Adde d new para meter: @IS _CURRENT_W AITING_LIS T. If this  is true r eturn all  the patien ts where t ransfer ev ent is nul l else fil ter by eve nt date. 
  23   -- ======= ========== ========== ========== ========
  24   -- ======= ========== ========== ========== ========
  25   -- Update  by:    PII
  26   -- Update  date: 05/1 4/2012
  27   -- Descrip tion: Pagi ng context  is ignore d when pag e size or  number are  negative.
  28   -- ======= ========== ========== ========== ========
  29  
  30   ALTER PROC EDURE [dbo ].[usp_Fil ter_Patien t_Waiting_ Standard_V iew]
  31           @F ACILITY_RE GION NVARC HAR(100),
  32           @F ACILITY_VI SN NVARCHA R(100),
  33           @S PECIALTY_C ODE NVARCH AR(100),
  34           @S PECIALTY_C ODE_SYSTEM  NVARCHAR( 100),
  35           @C REATION_DA TE DATETIM E = NULL,
  36           @I S_CURRENT_ WAITING_LI ST BIT,
  37           @I S_DISPLAY_ ONLY_NATIO NAL_PATIEN TS BIT
  38   AS
  39   BEGIN
  40   SET NOCOUN T ON
  41           
  42           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 )
  43           SE T @DOMAIN  = dbo.F_GE T_CURRENT_ DOMAIN()                  
  44           
  45           IF  (dbo.F_GE T_IS_SUPER USER() !=  1)
  46                    SET  @SQL_SECUR ITY = COAL ESCE(@SQL_ SECURITY,  '') + 'INN ER JOIN vP olicyConte xt V ON V. resource_r oot = '''  + @DOMAIN  + '''
  47                             AND V. resource_e xtension =  CAST(TR.F ACILITY_UI D AS nvarc har(36)) A ND v.actio n_name = ' 'BMS, Read '''
  48           EL SE 
  49                    SET  @SQL_SECUR ITY = ''           
  50           
  51           SE T @SQL_WHE RE = COALE SCE(@SQL_W HERE,'')
  52           IF  (@SPECIAL TY_CODE IS  NOT NULL)
  53           BE GIN
  54                    SELE CT TOP(1)  @SPECIALTY _ID = ID F ROM CONCEP T WHERE CO DE = @SPEC IALTY_CODE  AND CODE_ SYSTEM = @ SPECIALTY_ CODE_SYSTE M
  55                    IF ( @SPECIALTY _ID IS NUL L)
  56                             RETURN
  57                    SET  @SQL_WHERE  = @SQL_WH ERE + ' AN D REQSP.ID  = '+ CAST (@SPECIALT Y_ID AS NV ARCHAR(10) ) +' '               
  58           EN D
  59           IF  (@FACILIT Y_REGION I S NOT NULL )
  60                    SET  @SQL_WHERE  = @SQL_WH ERE + ' AN D [TR].[FA CILITY_REG ION] = '+  @FACILITY_ REGION +'  '
  61           IF  (@FACILIT Y_VISN IS  NOT NULL)
  62                    SET  @SQL_WHERE  = @SQL_WH ERE + ' AN D [TR].[FA CILITY_VIS N] = '+ @F ACILITY_VI SN +' '
  63           
  64           IF (@IS_CURRE NT_WAITING _LIST = 1)
  65                    SET  @SQL_WHERE  = @SQL_WH ERE + ' AN D TE.ACT_I D IS NULL'
  66           EL SE 
  67                    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) +  ''')'
  68                    
  69           IF (@IS_DISPL AY_ONLY_NA TIONAL_PAT IENTS = 1)
  70                    SET  @SQL_WHERE  = @SQL_WH ERE + ' AN D TR.IS_NA TIONAL_WAI T_LIST = 1 '
  71           
  72           
  73           SE T @SQL = C OALESCE(@S QL,'') + '
  74                    SELE CT DISTINC T
  75                             [A].[I D] AS [ACT _ID],
  76                             [A].[C REATION_DA TE] AS [CR EATION_DAT E],
  77                             [A].[C ANCELED_DA TE] AS [CA NCELED_DAT E],
  78                             [A].[P ARENT_ACT_ ID] AS [PA RENT_ACT_I D],
  79                             [A].[F LOW_ID] AS  [FLOW_ID] ,
  80                             [A].[D OMAIN_ID]  AS [DOMAIN _ID],
  81                             [A].[P ATIENT_UID ] AS [PATI ENT_UID],      
  82                             [TE].[ ADMISSION_ FACILITY_U ID] AS [EV N_ADMISSIO N_FACILITY _UID],           
  83                             [TE].[ DISPOSITIO N_DATE] AS  [EVN_DISP OSITION_DA TE],
  84                             [ERA]. [CODE] AS  [REQ_ERA_C ODE],
  85                             [ERA]. [CODE_SYST EM] AS [RE Q_ERA_CODE _SYSTEM],
  86                             [ERA]. [CODE_SYST EM_NAME] A S [REQ_ERA _CODE_SYST EM_NAME],
  87                             [ERA]. [DISPLAY_N AME] AS [R EQ_ERA_DIS PLAY_NAME] ,
  88                             [TR].[ FACILITY_U ID] AS [RE Q_FACILITY _UID],
  89                             [TR].[ COMMENTS]  AS [REQ_CO MMENTS],
  90                             [CC].[ CODE] AS [ REQ_CONTRA CT_CODE],
  91                             [CC].[ CODE_SYSTE M] AS [REQ _CONTRACT_ CODE_SYSTE M],
  92                             [CC].[ CODE_SYSTE M_NAME] AS  [REQ_CONT RACT_CODE_ SYSTEM_NAM E],
  93                             [CC].[ DISPLAY_NA ME] AS [RE Q_CONTRACT _DISPLAY_N AME],
  94                             [TR].[ DIAGNOSIS]  AS [REQ_D IAGNOSIS],
  95                             [TR].[ CURRENT_LO CATION] AS  [REQ_CURR ENT_LOCATI ON],
  96                             [REQSP ].[CODE] A S [REQ_SPE CIALITY_CO DE],
  97                             [REQSP ].[CODE_SY STEM] AS [ REQ_SPECIA LITY_CODE_ SYSTEM],
  98                             [REQSP ].[CODE_SY STEM_NAME]  AS [REQ_S PECIALITY_ CODE_SYSTE M_NAME],
  99                             [REQSP ].[DISPLAY _NAME] AS  [REQ_SPECI ALITY_DISP LAY_NAME],
  100                             [TR].[ FACILITY_R EGION] AS  [REGION_CO DE],
  101                             [TR].[ FACILITY_V ISN] AS [V ISN_CODE],
  102                             [TR].[ LOCATION_A DMISSION_D ATE] AS [E VN_EVENT_D ATE],
  103                             [TR].[ IS_NATIONA L_WAIT_LIS T] AS [IS_ NATIONAL_W AIT_LIST],
  104                             [TR].[ CREATED] A S [REQ_CRE ATED],
  105                             [TE].[ CREATED] A S [EVN_CRE ATED]
  106                    FROM  ACT A
  107                             INNER  JOIN TRANS FER_REQ TR  ON A.ID =  TR.ACT_ID
  108                             LEFT J OIN ACT AS  AEVN ON A EVN.PARENT _ACT_ID =  TR.ACT_ID
  109                             LEFT J OIN TRANSF ER_EVN AS  TE ON TE.A CT_ID = AE VN.ID              
  110                             LEFT J OIN CONCEP T AS CC ON  TR.CONTRA CT_ID = CC .ID                
  111                             LEFT J OIN CONCEP T AS ERA O N TR.ERA_I D = ERA.ID
  112                             LEFT J OIN CONCEP T AS REQSP  ON TR.SPE CIALITY_ID  = REQSP.I D
  113                             ' + 
  114                             --@SQL _SECURITY  + 
  115                             ' WHER E 1 = 1 '  + @SQL_WHE RE + '                                   
  116                    ORDE R BY [A].[ ID] '
  117                    
  118                    EXEC UTE sp_exe cutesql @S QL
  119  
  120   END
  121  

Araxis Merge (but not the data content of this report) is Copyright © 1993-2016 Araxis Ltd (www.araxis.com). All rights reserved.