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.
| # | Location | File | Last Modified |
|---|---|---|---|
| 1 | OSCIF_BMS_v2_iter 2_September_2017.zip\BMS_Cand\Source\Sources\Database\MaintenanceScripts | ufn_GetPatientMovementTransferTransaction_TIME_ZONE.sql | Wed Oct 18 18:58:12 2017 UTC |
| 2 | OSCIF_BMS_v2_iter 2_September_2017.zip\BMS_Cand\Source\Sources\Database\MaintenanceScripts | ufn_GetPatientMovementTransferTransaction_TIME_ZONE.sql | Thu Oct 26 19:53:10 2017 UTC |
| Description | Between Files 1 and 2 |
|
|---|---|---|
| Text Blocks | Lines | |
| Unchanged | 2 | 188 |
| Changed | 1 | 2 |
| Inserted | 0 | 0 |
| Removed | 0 | 0 |
| 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 |
No regular expressions were active.
| 1 | USE [BMS_D W] | |
| 2 | GO | |
| 3 | ||
| 4 | /****** Ob ject: Use rDefinedFu nction [db o].[ufn_Ge tPatientMo vementTran sferTransa ction_TIME _ZONE_DT] Script Date: 07/2 8/2015 14: 58:40 **** **/ | |
| 5 | SET ANSI_N ULLS ON | |
| 6 | GO | |
| 7 | ||
| 8 | SET QUOTED _IDENTIFIE R ON | |
| 9 | GO | |
| 10 | ||
| 11 | ||
| 12 | ||
| 13 | ||
| 14 | ||
| 15 | -- ======= ========== ========== ========== ======== | |
| 16 | -- Author:
|
|
| 17 | -- Create date: 30/0 5/2012 | |
| 18 | -- Descrip tion: Func tion for g etting the patient m ovements d ata (trans fer transa ction) | |
| 19 | -- | |
| 20 | -- Change History | |
| 21 | -- Date Auth or Descri ption | |
| 22 | -- 6/23/15 AKR Modified to use Mo vement Dat e instead of entered date for range comp arison | |
| 23 | -- ======= ========== ========== ========== ======== | |
| 24 | ALTER FUNC TION [dbo] .[ufn_GetP atientMove mentTransf erTransact ion_TIME_Z ONE] | |
| 25 | ( | |
| 26 | @F ACILITY_ID INT, | |
| 27 | @D IVISION_ID INT, | |
| 28 | @S TART_DATE DATETIME, | |
| 29 | @E ND_DATE DA TETIME, | |
| 30 | @F ACILITYTIM EZONE nvar char(250) | |
| 31 | ) | |
| 32 | RETURNS @P ATIENT_MOV EMENT TABL E | |
| 33 | ( | |
| 34 | IE N INT, | |
| 35 | RE CORD_DATE VARCHAR(30 ), | |
| 36 | EN TERED_DATE VARCHAR(3 0), | |
| 37 | DI FF VARCHAR (10), | |
| 38 | WA RD_NAME NV ARCHAR(250 ), | |
| 39 | BE D_NAME NVA RCHAR(250) , | |
| 40 | PA TIENT_NAME NVARCHAR( 250), | |
| 41 | TY PE_OF_TRAN SACTION NV ARCHAR(50) , | |
| 42 | TY PE_OF_MOVE MENT NVARC HAR(250), | |
| 43 | DI FF_MINUTE INT | |
| 44 | ) | |
| 45 | AS | |
| 46 | BEGIN | |
| 47 | ||
| 48 | DECL ARE @WARD TABLE(ID I NT PRIMARY KEY); | |
| 49 | ||
| 50 | -- inser t wards be longing to @FACILITY _ID or by @divis ion_id | |
| 51 | IF @ DIVISION_I D = -1 | |
| 52 | INSERT INTO @WAR D(ID) | |
| 53 | SELECT WARD.ID F ROM dbo.uf n_GetWards ByFacility Id(@FACILI TY_ID) AS WARD | |
| 54 | INNER JOIN dbo.D IM_WARD AS ACTIVE_WA RD ON ACTI VE_WARD.ID = WARD.ID | |
| 55 | WHERE ACTIVE_WAR D.STATUS = 'active' | |
| 56 | ELSE | |
| 57 | INSERT INTO @WAR D(ID) | |
| 58 | SELECT DIM_WARD_ ID FROM db o.GROUP_WA RD_ORGANIZ ATION GWO | |
| 59 | WHERE DIM_ORGANI ZATION_ID = @DIVISIO N_ID | |
| 60 | ||
| 61 | 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) | |
| 62 | SELECT MOVEMENT .IEN, | |
| 63 | CONVERT(VA RCHAR, [db o].[ufn_Ti mezoneConv ersion](MO VEMENT.MOV EMENT_DATE , 'UTC',@F ACILITYTIM EZONE), 10 1) + ' ' + CONVERT(V ARCHAR(5), [dbo].[uf n_Timezone Conversion ](MOVEMENT .MOVEMENT_ DATE, 'UTC ',@FACILIT YTIMEZONE) , 108), | |
| 64 | CONVERT(VA RCHAR, [db o].[ufn_Ti mezoneConv ersion](MO VEMENT.ENT ERED_DATE, 'UTC',@FA CILITYTIME ZONE), 101 ) + ' ' + CONVERT(VA RCHAR(5), [dbo].[ufn _TimezoneC onversion] (MOVEMENT. ENTERED_DA TE, 'UTC', @FACILITYT IMEZONE), 108), | |
| 65 | dbo.ufn_Ge tDateDiff( CONVERT(VA RCHAR, [db o].[ufn_Ti mezoneConv ersion](MO VEMENT.MOV EMENT_DATE , 'UTC',@F ACILITYTIM EZONE), 10 1) + ' ' + CONVERT(V ARCHAR(5), [dbo].[uf n_Timezone Conversion ](MOVEMENT .MOVEMENT_ DATE, 'UTC ',@FACILIT YTIMEZONE) , 108), | |
| 66 | CONVERT(VA RCHAR, [db o].[ufn_Ti mezoneConv ersion](MO VEMENT.ENT ERED_DATE, 'UTC',@FA CILITYTIME ZONE), 101 ) + ' ' + CONVERT(VA RCHAR(5), [dbo].[ufn _TimezoneC onversion] (MOVEMENT. ENTERED_DA TE, 'UTC', @FACILITYT IMEZONE), 108)), | |
| 67 | WARD.NAME, | |
| 68 | BED.NAME, | |
| 69 | PATIENT.LA ST_NAME + ' ' + RIGH T(PATIENT. SSN,4), | |
| 70 | 'TRANSFER' , | |
| 71 | MOVEMENT_T YPE.DISPLA Y_NAME, | |
| 72 | DATEDIFF(M INUTE, [db o].[ufn_Ti mezoneConv ersion](MO VEMENT.MOV EMENT_DATE , 'UTC',@F ACILITYTIM EZONE), [d bo].[ufn_T imezoneCon version](M OVEMENT.EN TERED_DATE , 'UTC',@F ACILITYTIM EZONE)) AS DIFF_MINU TE | |
| 73 | FROM dbo .FACT_MOVE MENT_EVN A S MOVEMENT | |
| 74 | INNER JO IN @WARD A S W ON W.I D = MOVEME NT.DIM_WAR D_ID | |
| 75 | INNER JO IN dbo.DIM _WARD AS W ARD ON WAR D.ID = W.I D | |
| 76 | LEFT JOI N dbo.DIM_ BED AS BED ON BED.ID = MOVEMEN T.DIM_BED_ ID | |
| 77 | LEFT JOI N dbo.DIM_ MOVEMENT_T YPE AS MOV EMENT_TYPE ON MOVEME NT_TYPE.ID = MOVEMEN T.DIM_MOVE MENT_TYPE_ ID | |
| 78 | LEFT JOI N dbo.DIM_ PATIENT AS PATIENT O N PATIENT. ID = MOVEM ENT.DIM_PA TIENT_ID | |
| 79 | ||
| 80 | /* | |
| 81 | WHERE (@ END_DATE I S NULL AND MOVEMENT. MOVEMENT_D ATE >= @ST ART_DATE A ND MOVEMEN T.ENTERED_ DATE >=@ST ART_DATE) OR | |
| 82 | (MOVEME NT.MOVEMEN T_DATE BET WEEN @STAR T_DATE AND @END_DAT E AND MOVE MENT.ENTER ED_DATE BE TWEEN @STA RT_DATE AN D @END_DA TE) | |
| 83 | */ | |
| 84 | WHERE (@ END_DATE I S NULL AND MOVEMENT. MOVEMENT_D ATE >= @ST ART_DATE ) OR | |
| 85 | (MOVEME NT.MOVEMEN T_DATE BET WEEN @STAR T_DATE AND @END_DAT E ) | |
| 86 | RE TURN | |
| 87 | END | |
| 88 | ||
| 89 | ||
| 90 | ||
| 91 | ||
| 92 | ||
| 93 | GO | |
| 94 | ||
| 95 |
Araxis Merge (but not the data content of this report) is Copyright © 1993-2016 Araxis Ltd (www.araxis.com). All rights reserved.