121. EPMO Open Source Coordination Office Redaction File Detail Report

Produced by Araxis Merge on 3/27/2018 2:07:02 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.

121.1 Files compared

# Location File Last Modified
1 BMS_v2.4_Code.zip\BMS_v2.4_Code\Database\BMSv2Updates\2.1.6.3\Reports DROP_CREATE_BMS_DW_usp_Rpt_BedSwitch.sql Wed Mar 21 14:51:00 2018 UTC
2 BMS_v2.4_Code.zip\BMS_v2.4_Code\Database\BMSv2Updates\2.1.6.3\Reports DROP_CREATE_BMS_DW_usp_Rpt_BedSwitch.sql Mon Mar 26 14:23:23 2018 UTC

121.2 Comparison summary

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

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

121.4 Active regular expressions

No regular expressions were active.

121.5 Comparison detail

  1   USE [BMS_D W]
  2   GO
  3   /****** Ob ject:  Sto redProcedu re [dbo].[ usp_Rpt_Be dSwitch]     Script D ate: 6/15/ 2016 9:23: 51 AM **** **/
  4   SET ANSI_N ULLS ON
  5   GO
  6   SET QUOTED _IDENTIFIE R ON
  7   GO
  8   --Bed Swit ch Report
  9   --NEED REC #, PM Reco rd D/T Ent ered D/T,  Patient Na me (DDUCK  1234), Fro m ROOM/BED , Ward, To  RoomBed,  Ward, Stat us, Commen t
  10  
  11   --EXEC usp _Rpt_BedSw itch -1, ' 4/5/2012',  '4/5/2016 ', ' DNS . URL \bms_svc_s qa', '2712 7BEC-7FFC- 4AE3-AB51- 5FC12E9497 8E', 0
  12  
  13   ALTER PROC EDURE [dbo ].[usp_Rpt _BedSwitch
  14           @W ARDGROUP_I D INT,
  15           @S TART_DATE  DATETIME,
  16           @E ND_DATE DA TETIME,
  17           @U SER_NAME N VARCHAR(10 0)=NULL,
  18           @F ACILITY_EX TENSION NV ARCHAR(250 ),
  19           @T IME_ZONE_M INUTES_OFF SET INT =  0       
  20   AS
  21   BEGIN
  22  
  23           /* SELECT NUL L AS ADMIS SION_RECOR D, NULL AS  PATIENT_N AME, NULL  AS ENTERED _DATE, NUL L AS BEDNA ME,
  24           NU LL AS WARD NAME, NULL  AS FROMBE D_NAME, NU LL AS FROM WARD_NAME  */
  25  
  26           IF  @START_DA TE > @END_ DATE
  27                    RAIS ERROR ('Th e start da te is grea ter than t he end dat e. Please  correct.',  18, 13)
  28           EL SE
  29           BE GIN
  30           
  31           se t @START_D ATE = DATE ADD (minut e , -@TIME _ZONE_MINU TES_OFFSET  , @START_ DATE );
  32           se t @END_DAT E = DATEAD D (minute  , -@TIME_Z ONE_MINUTE S_OFFSET ,  @END_DATE  );
  33           --  create pe rmission t able
  34           CR EATE TABLE  #PERMISSI ON
  35           (
  36            D IM_ORGANIZ ATION_ID I NT,
  37            D IM_WARD_ID  INT
  38           )
  39       --inse rt permiss ion for th e user
  40       INSERT  INTO #PER MISSION 
  41                    SELE CT * FROM  dbo.ufn_Ge tPermissio nByUserNam e(@USER_NA ME)
  42                             CREATE  NONCLUSTE RED INDEX  [DIM_ORGAN IZATION_ID ] ON #PERM ISSION ([D IM_ORGANIZ ATION_ID]  ASC)
  43                                      WITH (
  44                                                PAD_INDEX   = OFF,
  45                                                STATISTIC S_NORECOMP UTE  = OFF ,
  46                                                SORT_IN_T EMPDB = OF F,
  47                                                IGNORE_DU P_KEY = OF F,
  48                                                DROP_EXIS TING = OFF ,
  49                                                ONLINE =  OFF,
  50                                                ALLOW_ROW _LOCKS  =  ON,
  51                                                ALLOW_PAG E_LOCKS  =  ON)
  52                             CREATE  NONCLUSTE RED INDEX  DIM_WARD_I D ON #PERM ISSION (DI M_WARD_ID  ASC)
  53                                      WITH (
  54                                                PAD_INDEX   = OFF,
  55                                                STATISTIC S_NORECOMP UTE  = OFF ,
  56                                                SORT_IN_T EMPDB = OF F,
  57                                                IGNORE_DU P_KEY = OF F,
  58                                                DROP_EXIS TING = OFF ,
  59                                                ONLINE =  OFF,
  60                                                ALLOW_ROW _LOCKS  =  ON,
  61                                                ALLOW_PAG E_LOCKS  =  ON) ;
  62  
  63           EN D
  64           
  65           DE CLARE @FAC ILITY_ID I NT
  66           -- get facili ty id
  67           SE T @FACILIT Y_ID = dbo .ufn_GetFa cilityIdBy Identifier (@FACILITY _EXTENSION );
  68  
  69           -- check if t he user ha s permissi on for the  facility               
  70           IF  EXISTS(SE LECT 1 
  71                               FROM  #PERMISSI ON
  72                               WHER E DIM_ORGA NIZATION_I D = @FACIL ITY_ID)
  73                    BEGI N
  74           
  75                                      DECLARE  @WARD TABL E(ID INT P RIMARY KEY );
  76  
  77                                --  insert war ds belongi ng to @FAC ILITY_ID 
  78                                      IF @WARD GROUP_ID =  -1
  79                                               INSERT INT O @WARD(ID )
  80                                               SELECT WAR D.ID FROM  dbo.ufn_Ge tWardsByFa cilityId(@ FACILITY_I D) as WARD
  81                                               INNER JOIN  dbo.DIM_W ARD AS ACT IVE_WARD O N ACTIVE_W ARD.ID = W ARD.ID
  82                                               WHERE ACTI VE_WARD.ST ATUS = 'ac tive'
  83                                              
  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                                                       SE LECT BSW.I EN as ADMI SSION_RECO RD,
  90                                                                   B SW.ENTERED _DATE,
  91                                                                   P ATIENT.LAS T_NAME + '  ' + RIGHT (PATIENT.S SN,4) as P ATIENT_NAM E,
  92                                                                   C ONVERT(VAR CHAR, DATE ADD (minut e, 0, BSW. ENTERED_DA TE), 101)  + ' ' 
  93                                                                                                            + CO NVERT(VARC HAR(5), DA TEADD (min ute, 0, BS W.ENTERED_ DATE), 108 ) AS ENTER ED_DATE,
  94                                                                   - -CONVERT(V ARCHAR, DA TEADD (min ute, 0, BS W.MOVEMENT _DATE), 10 1) + ' ' 
  95                                                                   - -                                      + CO NVERT(VARC HAR(5), DA TEADD (min ute, 0, FM .MOVEMENT_ DATE), 108 ) AS MOVEM ENT_DATE,
  96                                                                   B ED.NAME as  BEDNAME,   
  97                                                                   W ARD.NAME a s WARDNAME
  98                                                                   F ROMBED.NAM E as FROMB ED_NAME,
  99                                                                   F ROMWARD.NA ME as FROM WARD_NAME- -,
  100   --                                                              ' ??' as MOV EMENT_DATE ,
  101   --                                                              N ULL as COM MENT, 
  102   --                                                              N ULL as STA TUS
  103                                                                   - -CASE WHEN  MAX(BC.CO MPLETED_DA TE) IS NUL L THEN 'Ac tive' ELSE  'Complete d' END as  STATUS
  104                                                       FR OM FACT_BE D_SWITCH B SW
  105                                                       LE FT JOIN DI M_PATIENT  PATIENT
  106                                                       ON  BSW.DIM_P ATIENT_ID  = PATIENT. ID
  107                                                       LE FT JOIN DI M_BED BED
  108                                                       ON  BSW.DIM_B ED_ID = BE D.ID
  109                                                       LE FT JOIN DI M_BED FROM BED
  110                                                       ON  BSW.DIM_O LD_BED_ID  = FROMBED. ID
  111                                                       LE FT JOIN DI M_WARD WAR D
  112                                                       ON  BSW.DIM_W ARD_ID = W ARD.ID
  113                                                       LE FT JOIN FA CT_ADMISSI ON_EVN ADM
  114                                                       ON  BSW.FACT_ ADMISSION_ EVN_ID = A DM.ID
  115                                                       LE FT JOIN DI M_WARD FRO MWARD
  116                                                       ON  ADM.INITI AL_DIM_WAR D_ID = FRO MWARD.ID
  117                                                       -- LEFT JOIN  FACT_BED_C LEAN BC
  118                                                       -- ON BSW.IEN  = BC.EVEN T_IEN
  119                                                   WHERE  BSW.DIM_WA RD_ID in ( SELECT ID  FROM @WARD )
  120                                                   AND BS W.ENTERED_ DATE BETWE EN @START_ DATE AND @ END_DATE
  121                                                       GR OUP BY BSW .IEN, BSW. ENTERED_DA TE, PATIEN T.LAST_NAM E + ' ' +  RIGHT(PATI ENT.SSN,4)
  122                                                       BS W.ENTERED_ DATE, BED. NAME, WARD .NAME, FRO MBED.NAME,  FROMWARD. NAME--, BC .COMMENT
  123                                                   ORDER  BY PATIENT .LAST_NAME  + ' ' + R IGHT(PATIE NT.SSN,4),  BSW.ENTER ED_DATE
  124                                      END 
  125  
  126   DROP TABLE  #PERMISSI ON
  127  
  128   END