100. EPMO Open Source Coordination Office Redaction File Detail Report

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

100.1 Files compared

# Location File Last Modified
1 OSCIF_BMS_v2_iter 2_September_2017.zip\BMS_Cand\BMS_Build_C72898\BMS_Source-BuildC72898.zip\C72898\Source\Sources\Database\CreationScripts\BMS\4.Stored Procedures dbo.usp_Filter_Patient_Waiting_Standard_View.sql Wed Oct 23 12:51:10 2013 UTC
2 OSCIF_BMS_v2_iter 2_September_2017.zip\BMS_Cand\BMS_Build_C72898\BMS_Source-BuildC72898.zip\C72898\Source\Sources\Database\CreationScripts\BMS\4.Stored Procedures dbo.usp_Filter_Patient_Waiting_Standard_View.sql Thu Oct 26 15:46:39 2017 UTC

100.2 Comparison summary

Description Between
Files 1 and 2
Text Blocks Lines
Unchanged 6 220
Changed 5 16
Inserted 0 0
Removed 0 0

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

100.4 Active regular expressions

No regular expressions were active.

100.5 Comparison detail

  1   /****** Ob ject:  Sto redProcedu re [dbo].[ usp_Filter _Patient_W aiting_Sta ndard_View ]    Scrip t Date: 03 /22/2012 1 1: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_Standard _View]') A ND type in  (N'P', N' PC'))
  3   DROP PROCE DURE [dbo] .[usp_Filt er_Patient _Waiting_S tandard_Vi ew]
  4   GO
  5   SET ANSI_N ULLS ON
  6   GO
  7   SET QUOTED _IDENTIFIE R ON
  8   GO
  9   -- ======= ========== ========== ========== ========
  10   -- Author:                Silvic a Pletea
  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   CREATE PRO CEDURE [db o].[usp_Fi lter_Patie nt_Waiting _Standard_ View]
  31           @F ACILITY_RE GION 
VARCHAR(10 0),
  32           @F ACILITY_VI SN 
VARCHAR(10 0),
  33           @S PECIALTY_C ODE 
VARCHAR(10 0),
  34           @S PECIALTY_C ODE_SYSTEM  
VARCHAR(10 0),
  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  
VARCHAR(MA X), @SQL_S ECURITY 
VARCHAR(MA X), @DOMAI N 
VARCHAR(25 0), @SPECI ALTY_ID IN T, @SQL_WH ERE 
VARCHAR(MA X)
  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_W HERE = @SQ L_WHERE +  ' AND REQS P.ID = '+  CAST(@SPEC IALTY_ID A S 
VARCHAR(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                    FROM  ACT A
  105                             INNER  JOIN TRANS FER_REQ TR  ON A.ID =  TR.ACT_ID
  106                             LEFT J OIN ACT AS  AEVN ON A EVN.PARENT _ACT_ID =  TR.ACT_ID
  107                             LEFT J OIN TRANSF ER_EVN AS  TE ON TE.A CT_ID = AE VN.ID              
  108                             LEFT J OIN CONCEP T AS CC ON  TR.CONTRA CT_ID = CC .ID                
  109                             LEFT J OIN CONCEP T AS ERA O N TR.ERA_I D = ERA.ID
  110                             LEFT J OIN CONCEP T AS REQSP  ON TR.SPE CIALITY_ID  = REQSP.I D
  111                             ' + @S QL_SECURIT Y + '
  112                             WHERE  1 = 1 ' +  @SQL_WHERE  + '                            
  113                    ORDE R BY [A].[ ID] '
  114                    
  115                    EXEC UTE sp_exe cutesql @S QL
  116  
  117   END
  118   GO

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