380. EPMO Open Source Coordination Office Redaction File Detail Report

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

380.1 Files compared

# Location File Last Modified
1 OSCIF_BMS_v2_iter 2_September_2017.zip\BMS_Cand\BMS_Source_C72993\C72993-Sources.zip\C72993\Source\Sources\Database\CreationScripts\BMS_DW\2.Functions dbo.ufn_GetPatientIntraWardTransferTransaction.UserDefinedFunction.sql Fri Nov 22 17:02:52 2013 UTC
2 OSCIF_BMS_v2_iter 2_September_2017.zip\BMS_Cand\BMS_Source_C72993\C72993-Sources.zip\C72993\Source\Sources\Database\CreationScripts\BMS_DW\2.Functions dbo.ufn_GetPatientIntraWardTransferTransaction.UserDefinedFunction.sql Thu Oct 26 18:33:58 2017 UTC

380.2 Comparison summary

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

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

380.4 Active regular expressions

No regular expressions were active.

380.5 Comparison detail

  1   /****** Ob ject:  Use rDefinedFu nction [db o].[ufn_Ge tPatientIn traWardTra nsferTrans action]     Script Da te: 03/21/ 2012 16:03 :44 ****** /
  2   IF  EXISTS  (SELECT *  FROM sys. objects WH ERE object _id = OBJE CT_ID(N'[d bo].[ufn_G etPatientI ntraWardTr ansferTran saction]')  AND type  in (N'FN',  N'IF', N' TF', N'FS' , N'FT'))
  3   DROP FUNCT ION [dbo]. [ufn_GetPa tientIntra WardTransf erTransact ion]
  4   GO
  5  
  6   SET ANSI_N ULLS ON
  7   GO
  8   SET QUOTED _IDENTIFIE R ON
  9   GO
  10   -- ======= ========== ========== ========== ========
  11   -- Author:                
P II
  12   -- Create  date: 30/0 5/2012
  13   -- Descrip tion: Func tion for g etting the  patient m ovements d ata (intra  ward tran sfer)
  14   -- ======= ========== ========== ========== ========
  15   CREATE FUN CTION [dbo ].[ufn_Get PatientInt raWardTran sferTransa ction] 
  16   (
  17           @F ACILITY_ID  INT,
  18           @D IVISION_ID  INT, 
  19           @S TART_DATE  DATETIME,
  20           @E ND_DATE DA TETIME,
  21           @T IME_ZONE_M INUTES_OFF SET INT
  22   )
  23   RETURNS @P ATIENT_MOV EMENT TABL E
  24   (   
  25           IE N INT,
  26           RE CORD_DATE  VARCHAR(30 ),
  27           EN TERED_DATE  VARCHAR(3 0),
  28           DI FF VARCHAR (10),
  29           WA RD_NAME NV ARCHAR(250 ),
  30           BE D_NAME NVA RCHAR(250) ,
  31           PA TIENT_NAME  NVARCHAR( 250),
  32           TY PE_OF_TRAN SACTION NV ARCHAR(50) ,
  33           TY PE_OF_MOVE MENT NVARC HAR(250),
  34           DI FF_MINUTE  INT
  35   )
  36   AS
  37   BEGIN
  38           
  39                    DECL ARE @WARD  TABLE(ID I NT PRIMARY  KEY);
  40                    
  41                -- inser t wards be longing to  @FACILITY _ID or by      @divis ion_id
  42                    IF @ DIVISION_I D = -1
  43                             INSERT  INTO @WAR D(ID)
  44                             SELECT  WARD.ID F ROM dbo.uf n_GetWards ByFacility Id(@FACILI TY_ID) AS  WARD
  45                             INNER  JOIN dbo.D IM_WARD AS  ACTIVE_WA RD ON ACTI VE_WARD.ID  = WARD.ID
  46                             WHERE  ACTIVE_WAR D.STATUS =  'active'
  47                    ELSE
  48                             INSERT  INTO @WAR D(ID) -- V ALUES (@WA RD_ID)
  49                             SELECT  DIM_WARD_ ID FROM db o.GROUP_WA RD_ORGANIZ ATION GWO
  50                             WHERE  DIM_ORGANI ZATION_ID  = @DIVISIO N_ID
  51                    
  52                    DELE TE FROM @W ARD WHERE  ID NOT IN  (SELECT DI M_WARD_ID  FROM dbo.F ACT_BED_SW ITCH)
  53                    
  54                    INSE RT INTO @P ATIENT_MOV EMENT(IEN,  RECORD_DA TE, ENTERE D_DATE, DI FF, WARD_N AME, BED_N AME, PATIE NT_NAME, T YPE_OF_TRA NSACTION,  TYPE_OF_MO VEMENT, DI FF_MINUTE)
  55                                      SELECT   BED_SWITCH .IEN,
  56                                                       CO NVERT(VARC HAR, DATEA DD (minute  ,@TIME_ZO NE_MINUTES _OFFSET ,  BED_SWITCH .ENTERED_D ATE), 101)  + ' ' + C ONVERT(VAR CHAR(5), D ATEADD (mi nute ,@TIM E_ZONE_MIN UTES_OFFSE T , BED_SW ITCH.ENTER ED_DATE),  108),
  57                                                       CO NVERT(VARC HAR, DATEA DD (minute  ,@TIME_ZO NE_MINUTES _OFFSET ,  BED_SWITCH .ENTERED_D ATE), 101)  + ' ' + C ONVERT(VAR CHAR(5), D ATEADD (mi nute ,@TIM E_ZONE_MIN UTES_OFFSE T , BED_SW ITCH.ENTER ED_DATE),  108),
  58                                                   '00:00 ',
  59                                                   WARD.N AME,
  60                                                       BE D.NAME,
  61                                                       PA TIENT.LAST _NAME + '  ' + RIGHT( PATIENT.SS N,4),
  62                                                       'I NTRA WARD  TRANSFER',
  63                                                       CA SE WHEN MO V.ID IS NU LL THEN 
  64                                                                ADM_ MOVEMENT_T YPE.DISPLA Y_NAME
  65                                                                 ELS E
  66                                                                MOV_ MOVEMENT_T YPE.DISPLA Y_NAME
  67                                                   END,
  68                                                       0                                       
  69                                                   
  70                                                       FR OM dbo.FAC T_BED_SWIT CH AS BED_ SWITCH 
  71                                                       IN NER JOIN @ WARD AS W  ON W.ID =  BED_SWITCH .DIM_WARD_ ID
  72                                                       IN NER JOIN d bo.FACT_AD MISSION_EV N adm ON a dm.ID = BE D_SWITCH.F ACT_ADMISS ION_EVN_ID
  73                                                       IN NER JOIN d bo.DIM_PAT IENT AS PA TIENT ON P ATIENT.ID  = BED_SWIT CH.DIM_PAT IENT_ID
  74                                                       IN NER JOIN d bo.DIM_BED  AS BED ON  BED.ID =  BED_SWITCH .DIM_BED_I D
  75                                                       IN NER JOIN d bo.DIM_WAR D AS WARD  ON WARD.ID  = BED_SWI TCH.DIM_WA RD_ID
  76                                                       LE FT  JOIN d bo.FACT_MO VEMENT_EVN  MOV ON MO V.FACT_ADM ISSION_EVN _ID = ADM. ID AND MOV .IEN = BED _SWITCH.IE N
  77                                                       LE FT JOIN db o.DIM_MOVE MENT_TYPE  AS ADM_MOV EMENT_TYPE  ON ADM_MO VEMENT_TYP E.ID = adm .DIM_MOVEM ENT_TYPE_I D
  78                                                       LE FT JOIN db o.DIM_MOVE MENT_TYPE  AS MOV_MOV EMENT_TYPE  ON MOV_MO VEMENT_TYP E.ID = MOV .DIM_MOVEM ENT_TYPE_I
  79                                                       WH ERE ((@END _DATE IS N ULL AND BE D_SWITCH.E NTERED_DAT E >= @STAR T_DATE) OR  BED_SWITC H.ENTERED_ DATE BETWE EN @START_ DATE AND   @END_DATE)
  80                             
  81           RE TURN 
  82   END
  83   GO