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_GetPatientMovementAdmissionTransaction_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_GetPatientMovementAdmissionTransaction_TIME_ZONE.sql | Thu Oct 26 19:53:10 2017 UTC |
| Description | Between Files 1 and 2 |
|
|---|---|---|
| Text Blocks | Lines | |
| Unchanged | 2 | 192 |
| 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 vementAdmi ssionTrans action_TIM E_ZONE_DT] Script Date: 07/ 28/2015 14 :53:07 *** ***/ | |
| 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 (admis sion trans action) | |
| 19 | -- | |
| 20 | -- Change History | |
| 21 | -- Date Auth or Descri ption | |
| 22 | -- 6/23/15 AKR Modified to use Ad mission Da te instead of entere d date for range com parison | |
| 23 | -- ======= ========== ========== ========== ======== | |
| 24 | ALTER FUNC TION [dbo] .[ufn_GetP atientMove mentAdmiss ionTransac tion_TIME_ ZONE] | |
| 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 ADMISSIO N.IEN, | |
| 63 | CONVERT(VA RCHAR, [db o].[ufn_Ti mezoneConv ersion](AD MISSION.AD MISSION_DA TE, 'UTC', @FACILITYT IMEZONE), 101) + ' ' + CONVERT (VARCHAR(5 ), [dbo].[ ufn_Timezo neConversi on] (ADMIS SION.ADMIS SION_DATE, 'UTC',@FA CILITYTIME ZONE), 108 ), | |
| 64 | CONVERT(VA RCHAR, [db o].[ufn_Ti mezoneConv ersion] (A DMISSION.E NTERED_DAT E, 'UTC',@ FACILITYTI MEZONE), 1 01) + ' ' + CONVERT( VARCHAR(5) , [dbo].[u fn_Timezon eConversio n] (ADMISS ION.ENTERE D_DATE, 'U TC',@FACIL ITYTIMEZON E), 108), | |
| 65 | dbo.ufn_Ge tDateDiff( CONVERT(VA RCHAR, [db o].[ufn_Ti mezoneConv ersion] (A DMISSION.A DMISSION_D ATE, 'UTC' ,@FACILITY TIMEZONE), 101) + ' ' + CONVER T(VARCHAR( 5), [dbo]. [ufn_Timez oneConvers ion] (ADMI SSION.ADMI SSION_DATE , 'UTC',@F ACILITYTIM EZONE), 10 8), | |
| 66 | CONVERT(VA RCHAR, [db o].[ufn_Ti mezoneConv ersion] (A DMISSION.E NTERED_DAT E, 'UTC',@ FACILITYTI MEZONE), 1 01) + ' ' + CONVERT( VARCHAR(5) , [dbo].[u fn_Timezon eConversio n] (ADMISS ION.ENTERE D_DATE, 'U TC',@FACIL ITYTIMEZON E), 108)), | |
| 67 | WARD.NAME, | |
| 68 | BED.NAME, | |
| 69 | PATIENT.LA ST_NAME + ' ' + RIGH T(PATIENT. SSN,4), | |
| 70 | 'ADMISSION ', | |
| 71 | MOVEMENT_T YPE.DISPLA Y_NAME, | |
| 72 | DATEDIFF(M INUTE, [db o].[ufn_Ti mezoneConv ersion] (A DMISSION.A DMISSION_D ATE, 'UTC' ,@FACILITY TIMEZONE), [dbo].[uf n_Timezone Conversion ] (ADMISSI ON.ENTERED _DATE, 'UT C',@FACILI TYTIMEZONE )) AS DIFF _MINUTE | |
| 73 | FROM d bo.FACT_AD MISSION_EV N AS ADMIS SION | |
| 74 | INNER JO IN dbo.DIM _WARD AS W ARD ON WAR D.ID = ADM ISSION.INI TIAL_DIM_W ARD_ID | |
| 75 | INNER JO IN dbo.DIM _PATIENT A S PATIENT ON PATIENT .ID = ADMI SSION.DIM_ PATIENT_ID | |
| 76 | LEFT JOI N dbo.DIM_ BED AS BED ON BED.ID = ADMISSI ON.INITIAL _DIM_BED_I D | |
| 77 | LEFT JOI N dbo.DIM_ MOVEMENT_T YPE AS MOV EMENT_TYPE ON MOVEME NT_TYPE.ID = ADMISSI ON.DIM_MOV EMENT_TYPE _ID | |
| 78 | /* | |
| 79 | WHER E ((@END_D ATE IS NUL L AND ADMI SSION.ENTE RED_DATE > = @START_D ATE AND AD MISSION.AD MISSION_DA TE >=@STAR T_DATE) | |
| 80 | OR (A DMISSION.E NTERED_DAT E BETWEEN @START_DAT E AND @END _DATE AND ADMISSION. ADMISSION_ DATE BETWE EN @START_ DATE AND @END_DATE) ) | |
| 81 | AND A DMISSION.I NITIAL_DIM _WARD_ID I N (SELECT ID FROM @W ARD) | |
| 82 | */ | |
| 83 | WHER E ((@END_D ATE IS NUL L AND ADMI SSION.ADMI SSION_DATE >=@START_ DATE) | |
| 84 | OR (A DMISSION.A DMISSION_D ATE BETWEE N @START_D ATE AND @ END_DATE)) | |
| 85 | AND A DMISSION.I NITIAL_DIM _WARD_ID I N (SELECT ID FROM @W ARD) | |
| 86 | ||
| 87 | RE TURN | |
| 88 | END | |
| 89 | ||
| 90 | ||
| 91 | ||
| 92 | ||
| 93 | ||
| 94 | ||
| 95 | GO | |
| 96 | ||
| 97 |
Araxis Merge (but not the data content of this report) is Copyright © 1993-2016 Araxis Ltd (www.araxis.com). All rights reserved.