660. EPMO Open Source Coordination Office Redaction File Detail Report

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

660.1 Files compared

# Location File Last Modified
1 OSCIF_BMS_v2_iter 2_September_2017.zip\BMS_Cand\Source\Sources\Database\BMSv2Updates\2.1.6.3\Reports DROP_CREATE_BMS_DW_usp_Rpt_DischargeInProgress.sql Wed Oct 18 19:06:44 2017 UTC
2 OSCIF_BMS_v2_iter 2_September_2017.zip\BMS_Cand\Source\Sources\Database\BMSv2Updates\2.1.6.3\Reports DROP_CREATE_BMS_DW_usp_Rpt_DischargeInProgress.sql Thu Oct 26 19:34:32 2017 UTC

660.2 Comparison summary

Description Between
Files 1 and 2
Text Blocks Lines
Unchanged 2 264
Changed 1 2
Inserted 0 0
Removed 0 0

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

660.4 Active regular expressions

No regular expressions were active.

660.5 Comparison detail

  1   USE [BMS_D W]
  2   GO
  3  
  4   /****** Ob ject:  Sto redProcedu re [dbo].[ usp_Rpt_Di schargeInP rogress]     Script D ate: 6/14/ 2016 9:19: 46 AM **** **/
  5   DROP PROCE DURE [dbo] .[usp_Rpt_ DischargeI nProgress]
  6   GO
  7  
  8   /****** Ob ject:  Sto redProcedu re [dbo].[ usp_Rpt_Di schargeInP rogress]     Script D ate: 6/14/ 2016 9:19: 46 AM **** **/
  9   SET ANSI_N ULLS ON
  10   GO
  11  
  12   SET QUOTED _IDENTIFIE R ON
  13   GO
  14  
  15  
  16   --exec usp _Rpt_Disch argeInProg ress @WARD GROUP_ID=- 1,@START_D ATE='2012- 01-21 00:0 0:00',@END _DATE='201 6-03-29 00 :00:00',@U SER_NAME=N ' DNS ',@FACILIT Y_EXTENSIO N=N'69378E 0F-B210-49 3B-B2A1-21 30C9F7F394 ',@TIME_ZO NE_MINUTES _OFFSET=0
  17   CREATE PRO CEDURE [db o].[usp_Rp t_Discharg eInProgres s] 
  18           @W ARDGROUP_I D INT,
  19           @S TART_DATE  DATETIME,
  20           @E ND_DATE DA TETIME,
  21           @U SER_NAME N VARCHAR(10 0)=NULL,
  22           @F ACILITY_EX TENSION NV ARCHAR(250 ),
  23           @T IME_ZONE_M INUTES_OFF SET INT   
  24   AS
  25   BEGIN
  26  
  27           IF  @START_DA TE > @END_ DATE
  28                    RAIS ERROR ('Th e start da te is grea ter than t he end dat e. Please  correct.',  18, 13)
  29           EL SE
  30           BE GIN
  31           
  32           se t @START_D ATE = DATE ADD (minut e , -@TIME _ZONE_MINU TES_OFFSET  , @START_ DATE );
  33           se t @END_DAT E = DATEAD D (minute  , -@TIME_Z ONE_MINUTE S_OFFSET ,  @END_DATE  );
  34           --  create pe rmission t able
  35           CR EATE TABLE  #PERMISSI ON
  36           (
  37            D IM_ORGANIZ ATION_ID I NT,
  38            D IM_WARD_ID  INT
  39           )
  40       --inse rt permiss ion for th e user
  41       INSERT  INTO #PER MISSION 
  42                    SELE CT * FROM  dbo.ufn_Ge tPermissio nByUserNam e(@USER_NA ME)
  43                             CREATE  NONCLUSTE RED INDEX  [DIM_ORGAN IZATION_ID ] ON #PERM ISSION ([D IM_ORGANIZ ATION_ID]  ASC)
  44                                      WITH (
  45                                                PAD_INDEX   = OFF,
  46                                                STATISTIC S_NORECOMP UTE  = OFF ,
  47                                                SORT_IN_T EMPDB = OF F,
  48                                                IGNORE_DU P_KEY = OF F,
  49                                                DROP_EXIS TING = OFF ,
  50                                                ONLINE =  OFF,
  51                                                ALLOW_ROW _LOCKS  =  ON,
  52                                                ALLOW_PAG E_LOCKS  =  ON)
  53                             CREATE  NONCLUSTE RED INDEX  DIM_WARD_I D ON #PERM ISSION (DI M_WARD_ID  ASC)
  54                                      WITH (
  55                                                PAD_INDEX   = OFF,
  56                                                STATISTIC S_NORECOMP UTE  = OFF ,
  57                                                SORT_IN_T EMPDB = OF F,
  58                                                IGNORE_DU P_KEY = OF F,
  59                                                DROP_EXIS TING = OFF ,
  60                                                ONLINE =  OFF,
  61                                                ALLOW_ROW _LOCKS  =  ON,
  62                                                ALLOW_PAG E_LOCKS  =  ON) ;
  63           
  64           
  65           
  66           DE CLARE @FAC ILITY_ID I NT
  67           -- get facili ty id
  68           SE T @FACILIT Y_ID = dbo .ufn_GetFa cilityIdBy Identifier (@FACILITY _EXTENSION );
  69           
  70           -- check if t he user ha s permissi on for the  facility               
  71           IF  EXISTS(SE LECT 1 
  72                               FROM  #PERMISSI ON
  73                               WHER E DIM_ORGA NIZATION_I D = @FACIL ITY_ID)
  74                    BEGI N
  75                                                       
  76                                      DECLARE  @WARD TABL E(ID INT P RIMARY KEY );
  77                    
  78                                --  insert war ds belongi ng to @FAC ILITY_ID 
  79                                      IF @WARD GROUP_ID =  -1
  80                                               INSERT INT O @WARD(ID )
  81                                               SELECT WAR D.ID FROM  dbo.ufn_Ge tWardsByFa cilityId(@ FACILITY_I D) as WARD
  82                                               INNER JOIN  dbo.DIM_W ARD AS ACT IVE_WARD O N ACTIVE_W ARD.ID = W ARD.ID
  83                                               WHERE ACTI VE_WARD.ST ATUS = 'ac tive'
  84                                      ELSE
  85                                               INSERT INT O @WARD(ID ) -- VALUE S (@WARD_I D)
  86                                               SELECT DIM _WARD_ID F ROM dbo.GR OUP_WARD_O RGANIZATIO N GWO
  87                                               WHERE DIM_ ORGANIZATI ON_ID = @W ARDGROUP_I D
  88  
  89                                      SELECT W ARD.NAME A S WARD_NAM E,
  90                                                  PATIENT .LAST_NAME  + ' ' + R IGHT(PATIE NT.SSN,4)  as PATIENT _NAME,
  91                                                  PHYSICI AN.FULL_NA ME AS PHYS ICIAN,
  92                                                  CONVERT (VARCHAR,  DATEADD (m inute, @TI ME_ZONE_MI NUTES_OFFS ET, DISCH_ REQ.ORDERE D_DATE), 1 01) + ' ' 
  93                                                  + CONVE RT(VARCHAR (5), DATEA DD (minute , @TIME_ZO NE_MINUTES _OFFSET, D ISCH_REQ.O RDERED_DAT E), 108) A S ORDERED_ DATE,
  94                                                  CONVERT (VARCHAR,  DATEADD (m inute, @TI ME_ZONE_MI NUTES_OFFS ET, DISCHA RGE.DISCHA RGED_DATE) , 101) + '  ' 
  95                                                  + CONVE RT(VARCHAR (5), DATEA DD (minute , @TIME_ZO NE_MINUTES _OFFSET, D ISCHARGE.D ISCHARGED_ DATE), 108 ) AS DISCH ARGED_DATE ,
  96                                                  CONVERT (VARCHAR,  DATEADD (m inute, @TI ME_ZONE_MI NUTES_OFFS ET, DISCHA RGE.ENTERE D_DATE), 1 01) + ' ' 
  97                                                  + CONVE RT(VARCHAR (5), DATEA DD (minute , @TIME_ZO NE_MINUTES _OFFSET, D ISCHARGE.E NTERED_DAT E), 108) A S ENTERED_ DATE,
  98                                                  dbo.ufn _GetDateDi ff(DISCHAR GE.ENTERED _DATE, DIS CHARGE.DIS CHARGED_DA TE) AS DIF F,
  99                                                  DATEDIF F(MINUTE,D ISCHARGE.E NTERED_DAT E, DISCHAR GE.DISCHAR GED_DATE)  AS DIFF_MI NUTE,
  100                                                  MOVEMEN T_TYPE.DIS PLAY_NAME  AS MOVEMEN T_TYPE,
  101                                                  --ORDER ED_DATE,
  102                                                  CONVERT (VARCHAR,  DATEADD (m inute, @TI ME_ZONE_MI NUTES_OFFS ET, DISCH_ REQ.SIGNED _DATE), 10 1) + ' ' 
  103                                                  + CONVE RT(VARCHAR (5), DATEA DD (minute , @TIME_ZO NE_MINUTES _OFFSET, D ISCH_REQ.S IGNED_DATE ), 108) AS  SIGNED_DA TE,
  104                                                  dbo.ufn _GetDateDi ff(DISCHAR GE.ENTERED _DATE, DIS CH_REQ.SIG NED_DATE)  AS SIGNED_ DIFF,
  105                                                  DISCH_R EQ.ID
  106                                      FROM dbo .FACT_DISC HARGE_EVN  AS DISCHAR GE
  107                                               INNER JOIN  dbo.DIM_W ARD AS WAR D ON WARD. ID = DISCH ARGE.DIM_W ARD_ID
  108                                               INNER JOIN  dbo.DIM_P ATIENT AS  PATIENT ON  PATIENT.I D = DISCHA RGE.DIM_PA TIENT_ID                                      
  109                                               LEFT JOIN  dbo.DIM_MO VEMENT_TYP E AS MOVEM ENT_TYPE O N MOVEMENT _TYPE.ID =  DISCHARGE .DIM_MOVEM ENT_TYPE_I D
  110                                               LEFT JOIN  DBO.FACT_D ISCHARGE_R EQ AS DISC H_REQ ON D ISCH_REQ.I D = 
  111                                                                  (S ELECT MAX( ID) AS ID
  112                                                                   F ROM DBO.FA CT_DISCHAR GE_REQ AS  DISCH_REQ 
  113                                                                   W HERE DISCH _REQ.DIM_P ATIENT_ID  = DISCHARG E.DIM_PATI ENT_ID
  114                                                                   A ND DISCH_R EQ.VISTA_S ITE_DIM_OR GANIZATION _ID = DISC HARGE.VIST A_SITE_DIM _ORGANIZAT ION_ID
  115                                                                   A ND ORDERED _DATE BETW EEN @START _DATE AND  DATEADD(ms , -3, @END _DATE + 1) )  
  116                                               LEFT JOIN  dbo.DIM_PH YSICIAN AS  PHYSICIAN  On PHYSIC IAN.ID = D ISCH_REQ.S IGNED_BY_D IM_PHYSICI AN_ID
  117                                                       
  118                                      WHERE DI SCHARGE.EN TERED_DATE  BETWEEN @ START_DATE  AND DATEA DD(ms, -3,  @END_DATE  + 1)
  119                                               --AND DISC HARGE.REQ_ CANCELED_D ATE IS NUL L
  120                                               AND DISCHA RGE.DISCHA RGED_DATE  IS NOT NUL L
  121                                               AND DISCHA RGE.DIM_WA RD_ID IN ( SELECT ID  FROM @WARD )
  122                    END
  123  
  124  
  125           DR OP TABLE # PERMISSION           
  126           
  127           EN D
  128   END
  129  
  130  
  131   GO
  132  
  133  

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