Produced by Araxis Merge on 3/27/2018 2:07:03 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 | BMS_v2.4_Code.zip\BMS_v2.4_Code\Database\BMSv2Updates\2.2.22.1 | usp_Rpt_VISN_EmergencyManagementEvacuationRegulate.sql | Wed Mar 21 14:50:06 2018 UTC |
| 2 | BMS_v2.4_Code.zip\BMS_v2.4_Code\Database\BMSv2Updates\2.2.22.1 | usp_Rpt_VISN_EmergencyManagementEvacuationRegulate.sql | Mon Mar 26 12:56:47 2018 UTC |
| Description | Between Files 1 and 2 |
|
|---|---|---|
| Text Blocks | Lines | |
| Unchanged | 2 | 662 |
| 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 | /****** Ob ject: Sto redProcedu re [dbo].[ usp_Rpt_VI SN_Emergen cyManageme ntEvacuati onRegulate ] Scrip t Date: 9/ 21/2017 2: 44:41 PM * *****/ | |
| 4 | SET ANSI_N ULLS ON | |
| 5 | GO | |
| 6 | SET QUOTED _IDENTIFIE R ON | |
| 7 | GO | |
| 8 | ||
| 9 | ||
| 10 | /* | |
| 11 | exec sp_ex ecutesql N 'IF @IS_RE GULATE_REP ORT = 1 | |
| 12 | BEGIN | |
| 13 | exec [usp_ Rpt_VISN_E mergencyMa nagementEv acuationRe gulate] @U SER_NAME,@ VISNID,@DI VISION_ID, @DIVISION _NAME, @Us erSalt | |
| 14 | END | |
| 15 | ELSE | |
| 16 | BEGIN | |
| 17 | SELE CT NULL A S ACT_ID, | |
| 18 | NULL AS LAST_N AME, | |
| 19 | NULL AS LAST_N AME_INITIA L_AND_LAST _FOUR, | |
| 20 | NULL AS GENDER , | |
| 21 | NULL AS WARD_S PECIALTY_N AME, | |
| 22 | NULL AS WARD_N UMA_NAME, | |
| 23 | NULL AS WARD_H AvBED_NAME , | |
| 24 | NULL CLINICAL_ EQUIP_REQU IREMENTS, | |
| 25 | NULL AS ENROUT E_MA, | |
| 26 | NULL AS ENROUT E_NMA, | |
| 27 | NULL AS DESTIN ATION_ADDR ESS, | |
| 28 | NULL AS DESTIN ATION_CITY _STATE, | |
| 29 | NULL AS DESTIN ATION_POC_ TELEPHONE, | |
| 30 | NULL AS ORIGIN ATOR_POC_T ELEPHONE, | |
| 31 | NULL AS VEHICL E_ID, | |
| 32 | NULL AS SEAT_P OSITION, | |
| 33 | NULL AS ARRIVA L_TIME, | |
| 34 | NULL AS ENROUT E_MA_TELEP HONE, | |
| 35 | NULL AS ENROUT E_NMA_TELE PHONE, | |
| 36 | NULL AS SENDIN G_FACILITY _NAME, | |
| 37 | NULL AS SENDIN G_FACILITY _ADDRESS, | |
| 38 | NULL AS SENDIN G_FACILITY _CITY_STAT E, | |
| 39 | NULL AS SENDIN G_FACILITY _POC_NAME, | |
| 40 | NULL AS SENDIN G_FACILITY _TELEPHONE , | |
| 41 | NULL AS OPERAT OR_NAME, | |
| 42 | NULL AS OPERAT OR_TELEPHO NE, | |
| 43 | NULL AS PERSON AL_ITEMS, | |
| 44 | NULL AS PATIEN T_LINK | |
| 45 | END',N'@IS _REGULATE_ REPORT bit , | |
| 46 | @USER_NAME nvarchar( 26), | |
| 47 | @VISNID nvar char(200), | |
| 48 | @DIVISION_ ID nvarcha r(2), | |
| 49 | @DIVISION_ NAME nvarc har(9), | |
| 50 | @UserSalt nvarchar(3 6)', | |
| 51 | @IS_REGULA TE_REPORT= 1, | |
| 52 | @USER_NAME = DNS.URL ', | |
| 53 | @VISNID=N' B86766B1-F 9C8-48E3-A 950-0926EF 13B542', | |
| 54 | @DIVISION_ ID=N'-1', | |
| 55 | @DIVISION_ NAME=N'All Wards', | |
| 56 | @UserSalt= N'dmhhLm1l ZC52YS5nb3 ZcdmhhaXNk aG9ybmQ=' | |
| 57 | */ | |
| 58 | ||
| 59 | CREATE PRO CEDURE [db o].[usp_Rp t_VISN_Eme rgencyMana gementEvac uationRegu late] | |
| 60 | @U SER_NAME N VARCHAR(50 0) = NULL, | |
| 61 | @V ISNID NVarch ar(250), | |
| 62 | -- @FACILITY_ EXTENSION NVARCHAR(2 50), | |
| 63 | @D IVISION_ID INT = NUL L, | |
| 64 | @D IVISION_NA ME NVARCHA R(250), | |
| 65 | @U serSalt NV ARCHAR(250 ) | |
| 66 | AS | |
| 67 | BEGIN | |
| 68 | -- CREATE FAC ILITY LIST FROM VISN CODE | |
| 69 | CREA TE TABLE # FacilityLi st ( | |
| 70 | ID Int, | |
| 71 | Name Varchar( 250), | |
| 72 | Source _ID Varchar(25 0), | |
| 73 | CODE Varchar(25 0)) | |
| 74 | ||
| 75 | INSE RT INTO #F acilityLis t | |
| 76 | Sele ct DISTINC T | |
| 77 | DO3.ID , | |
| 78 | DO3.Na me, | |
| 79 | DO3.SO URCE_ID, | |
| 80 | DO3.CO DE | |
| 81 | FROM bms_dw.db o.DIM_ORGA NIZATION D O | |
| 82 | LEFT JOIN bms_ dw.dbo.DIM _ORGANIZAT ION DO2 | |
| 83 | ON DO2 .DIM_ORGAN IZATION_ID = DO.ID | |
| 84 | LEFT JOIN bms_ dw.dbo.DIM _ORGANIZAT ION DO3 | |
| 85 | ON DO2 .ID = DO3. DIM_ORGANI ZATION_ID | |
| 86 | AND DO 3.DIM_ORGA NIZATION_T YPE_ID = 2 | |
| 87 | WHER E DO.sourc e_id = @VI SNID | |
| 88 | ||
| 89 | -- create permission table | |
| 90 | CREA TE TABLE # PERMISSION | |
| 91 | ( | |
| 92 | DIM _ORGANIZAT ION_ID INT , | |
| 93 | DIM _WARD_ID I NT | |
| 94 | ) | |
| 95 | --in sert permi ssion for the user | |
| 96 | INSE RT INTO #P ERMISSION | |
| 97 | SELECT * FROM db o.ufn_GetP ermissionB yUserName( @USER_NAME ) | |
| 98 | CREATE N ONCLUSTERE D INDEX [D IM_ORGANIZ ATION_ID] ON #PERMIS SION ([DIM _ORGANIZAT ION_ID] AS C) | |
| 99 | WITH ( | |
| 100 | P AD_INDEX = OFF, | |
| 101 | S TATISTICS_ NORECOMPUT E = OFF, | |
| 102 | S ORT_IN_TEM PDB = OFF, | |
| 103 | I GNORE_DUP_ KEY = OFF, | |
| 104 | D ROP_EXISTI NG = OFF, | |
| 105 | O NLINE = OF F, | |
| 106 | A LLOW_ROW_L OCKS = ON , | |
| 107 | A LLOW_PAGE_ LOCKS = O N) | |
| 108 | CREATE N ONCLUSTERE D INDEX DI M_WARD_ID ON #PERMIS SION (DIM_ WARD_ID AS C) | |
| 109 | WITH ( | |
| 110 | P AD_INDEX = OFF, | |
| 111 | S TATISTICS_ NORECOMPUT E = OFF, | |
| 112 | S ORT_IN_TEM PDB = OFF, | |
| 113 | I GNORE_DUP_ KEY = OFF, | |
| 114 | D ROP_EXISTI NG = OFF, | |
| 115 | O NLINE = OF F, | |
| 116 | A LLOW_ROW_L OCKS = ON , | |
| 117 | A LLOW_PAGE_ LOCKS = O N) ; | |
| 118 | ||
| 119 | -- DECLARE @F ACILITY_ID INT -- Removed | |
| 120 | -- get facili ty id | |
| 121 | -- SET @FACIL ITY_ID = d bo.ufn_Get FacilityId ByIdentifi er(@FACILI TY_EXTENSI ON); -- Removed | |
| 122 | ||
| 123 | -- check if t he user ha s permissi on for the facility | |
| 124 | IF EXISTS(SE LECT 1 | |
| 125 | FROM #PERMISSI ON P | |
| 126 | INNE R JOIN #Fa cilityList FL --Add ed | |
| 127 | ON F L.ID = P.D IM_ORGANIZ ATION_ID --Added | |
| 128 | WHER E P.DIM_OR GANIZATION _ID in (FL .ID)) --M odified | |
| 129 | BEGI N | |
| 130 | ||
| 131 | CREATE TABLE #WA RD (ID INT , NAME NVA RCHAR(250) , SPECIALT Y_NAME NVA RCHAR(250) , NUMA NVA RCHAR(250) , HAvBED N VARCHAR(50 )) | |
| 132 | --IF @ DIVISION_I D = -1 OR @DIVISION_ ID IS NULL OR @DIVIS ION_ID = 0 | |
| 133 | BEGIN | |
| 134 | INSERT INT O #WARD(ID , SPECIALT Y_NAME, NU MA, HAvBED ) | |
| 135 | SELECT WAR D.ID, SPEC IALTY.DISP LAY_NAME, NUMA.DISPL AY_NAME, H AvBED.DISP LAY_NAME | |
| 136 | FROM dbo.D IM_WARD AS WARD | |
| 137 | --INNER JO IN dbo.ufn _GetWardsB yFacilityI d(@FACILIT Y_ID) AS F AC_WARD ON FAC_WARD. ID = WARD. ID | |
| 138 | LEFT JOIN dbo.DIM_SP ECIALTY AS SPECIALTY ON SPECIA LTY.ID = W ARD.VISTA_ DIM_SPECIA LTY_ID | |
| 139 | LEFT JOIN dbo.DIM_NU MA AS NUMA ON NUMA.I D = SPECIA LTY.DIM_NU MA_ID | |
| 140 | LEFT JOIN dbo.DIM_HA vBED AS HA vBED ON HA vBED.ID = SPECIALTY. DIM_HAvBED _ID | |
| 141 | WHERE WARD .STATUS = 'active' | |
| 142 | END | |
| 143 | /*ELSE | |
| 144 | BEGIN | |
| 145 | INSERT INT O #WARD(ID , SPECIALT Y_NAME, NU MA, HAvBED ) | |
| 146 | SELECT ACT IVE_WARD.I D, SPECIAL TY.DISPLAY _NAME, NUM A.DISPLAY_ NAME, HAvB ED.DISPLAY _NAME | |
| 147 | FROM GROUP _WARD_ORGA NIZATION a s WARD | |
| 148 | INNER JOIN dbo.DIM_W ARD AS ACT IVE_WARD O N ACTIVE_W ARD.ID = W ARD.DIM_WA RD_ID | |
| 149 | LEFT JOIN dbo.DIM_SP ECIALTY AS SPECIALTY ON SPECIA LTY.ID = A CTIVE_WARD .VISTA_DIM _SPECIALTY _ID | |
| 150 | LEFT JOIN dbo.DIM_NU MA AS NUMA ON NUMA.I D = SPECIA LTY.DIM_NU MA_ID | |
| 151 | LEFT JOIN dbo.DIM_HA vBED AS HA vBED ON HA vBED.ID = SPECIALTY. DIM_HAvBED _ID | |
| 152 | WHERE ACTI VE_WARD.ST ATUS = 'ac tive' AND WARD.DIM_O RGANIZATIO N_ID = @DI VISION_ID | |
| 153 | END*/ | |
| 154 | ||
| 155 | CREATE TABLE #AC TIVE_ADMIS SION( | |
| 156 | PATIEN T_ID INT, | |
| 157 | BED_ID INT, | |
| 158 | WARD_I D INT | |
| 159 | ) | |
| 160 | ||
| 161 | CREATE TABLE #AD MISSION_AN D_TRANSFER ( | |
| 162 | FACT_I D INT NOT NULL , | |
| 163 | BED_ID INT, | |
| 164 | WARD_I D INT, | |
| 165 | PATIEN T_ID INT, | |
| 166 | CREATE D_DATE DAT ETIME NULL , | |
| 167 | IS_ADM ISSION_EVN BIT) | |
| 168 | ||
| 169 | INSERT INTO #ADM ISSION_AND _TRANSFER( FACT_ID, B ED_ID, WAR D_ID, PATI ENT_ID, CR EATED_DATE , IS_ADMIS SION_EVN) | |
| 170 | SELECT ADM_EVN.I D, ADM_EVN .DIM_BED_I D, ADM_EVN .DIM_WARD_ ID, ADM_EV N.DIM_PATI ENT_ID, AD M_EVN.ADMI SSION_DATE , 1 | |
| 171 | FROM F ACT_ADMISS ION_EVN AS ADM_EVN | |
| 172 | INNER JOIN #WARD AS WARD O N WARD.ID = ADM_EVN. DIM_WARD_I D | |
| 173 | WHERE ADM_EVN.HA S_DISCHARG E = 0 | |
| 174 | ||
| 175 | INSERT INTO #ADM ISSION_AND _TRANSFER( FACT_ID, B ED_ID, WAR D_ID, PATI ENT_ID, CR EATED_DATE , IS_ADMIS SION_EVN) | |
| 176 | SELECT MOV_EVN.F ACT_ADMISS ION_EVN_ID , MOV_EVN. DIM_BED_ID , MOV_EVN. DIM_WARD_I D, MOV_EVN .DIM_PATIE NT_ID, MOV _EVN.MOVEM ENT_DATE, 0 | |
| 177 | FROM F ACT_MOVEME NT_EVN AS MOV_EVN | |
| 178 | INNER JOIN (SELE CT MAX(LAS T_MOV_EVN. MOVEMENT_D ATE) AS MO VEMENT_DAT E, LAST_MO V_EVN.FACT _ADMISSION _EVN_ID | |
| 179 | FR OM FACT_MO VEMENT_EVN LAST_MOV_ EVN | |
| 180 | IN NER JOIN # ADMISSION_ AND_TRANSF ER AS ADM_ EVN ON ADM _EVN.FACT_ ID = LAST_ MOV_EVN.FA CT_ADMISSI ON_EVN_ID | |
| 181 | GR OUP BY LAS T_MOV_EVN. FACT_ADMIS SION_EVN_I D) MAX_ME_ EVENT | |
| 182 | ON MAX_ME_EV ENT.MOVEME NT_DATE = MOV_EVN.MO VEMENT_DAT E AND MAX_ ME_EVENT.F ACT_ADMISS ION_EVN_ID = MOV_EVN .FACT_ADMI SSION_EVN_ ID | |
| 183 | ||
| 184 | DELETE DEL FROM #ADMISSION _AND_TRANS FER AS DEL | |
| 185 | INNER JOIN #ADMI SSION_AND_ TRANSFER A S ADM ON A DM.FACT_ID = DEL.FAC T_ID AND A DM.BED_ID <> DEL.BED _ID AND AD M.IS_ADMIS SION_EVN = 1 | |
| 186 | WHERE DEL.IS_ADM ISSION_EVN = 0 | |
| 187 | ||
| 188 | INSERT INTO #ACT IVE_ADMISS ION(WARD_I D, BED_ID, PATIENT_I D) | |
| 189 | SELECT ADMISSION _INFO.WARD _ID, ADMIS SION_INFO. BED_ID, AD MISSION_IN FO.PATIENT _ID | |
| 190 | FROM # ADMISSION_ AND_TRANSF ER AS ADMI SSION_INFO | |
| 191 | INNER JOIN | |
| 192 | ( SE LECT MAX(C REATED_DAT E) AS CREA TED_DATE, BED_ID | |
| 193 | FROM #AD MISSION_AN D_TRANSFER | |
| 194 | GROUP BY BED_ID | |
| 195 | ) LAST _ADMISISON _INFO ON L AST_ADMISI SON_INFO.C REATED_DAT E = ADMISS ION_INFO.C REATED_DAT E AND LAST _ADMISISON _INFO.BED_ ID = ADMIS SION_INFO. BED_ID | |
| 196 | ||
| 197 | DROP T ABLE #ADMI SSION_AND_ TRANSFER | |
| 198 | ||
| 199 | IF @DI VISION_ID = -1 OR @D IVISION_ID IS NULL | |
| 200 | BEGIN | |
| 201 | SELECT E VACUATION_ PATIENT.SO URCE_ID AS ACT_ID, | |
| 202 | PATIENT. LAST_NAME AS LAST_NA ME, | |
| 203 | SUBSTRIN G(PATIENT. LAST_NAME, 1, 1) + S UBSTRING(P ATIENT.SSN , 7, 5) AS LAST_NAME _INITIAL_A ND_LAST_FO UR, | |
| 204 | PATIENT. GENDER AS GENDER, | |
| 205 | 'VS: ' + ISNULL(WA RD.SPECIAL TY_NAME, ' ') AS WARD _SPECIALTY _NAME, | |
| 206 | 'NU: ' + ISNULL(WA RD.NUMA, ' ') AS WARD _NUMA_NAME , | |
| 207 | 'HV: ' + ISNULL(WA RD.HAvBED, '') AS WAR D_HAvBED_N AME, | |
| 208 | PATIENT. ADMITTING_ DIAGNOSIS AS PRESENT ING_PROBLE M, | |
| 209 | ISNULL(W ARD.NAME, '') + ' - ' + ISNULL (BED.NAME, '') AS C URRENT_LOC ATION, | |
| 210 | --dbo.uf n_GetEmerg encyImages ByEvacuati on(@FACILI TY_ID, ADM ISSION.BED _ID, PATIE NT.ID) AS CLINICAL_E QUIP_REQUI REMENTS, - -Removed | |
| 211 | dbo.ufn_ GetEmergen cyImagesBy Evacuation (FL.ID, AD MISSION.BE D_ID, PATI ENT.ID) AS CLINICAL_ EQUIP_REQU IREMENTS, --Added | |
| 212 | EVACUATI ON_PATIENT .EVACUATIO N_TRANSPOR TATION_CAR E_LEVEL AS TRANSPOR T_CARE_LEV EL, | |
| 213 | EVACUATI ON_PATIENT .EVACUATIO N_ENROUTE_ MEDICAL_AT TENDANT AS ENROUTE_M A, | |
| 214 | EVACUATI ON_PATIENT .EVACUATIO N_ENROUTE_ NON_MEDICA L_ATTENDAN T AS ENROU TE_NMA, | |
| 215 | TRANSPOR TATION_TYP E.DISPLAY_ NAME AS TR ANSPORTATI ON_TYPE, | |
| 216 | TRANSPOR TATION_PRO VIDER.DISP LAY_NAME A S TRANSPOR TATION_PRO VIDER, | |
| 217 | EVACUATI ON_PATIENT .EVACUATIO N_TRANSPOR TATION_COM MENTS AS T RANSPORTAT ION_COMMEN TS, | |
| 218 | NULL AS TRANSPORT_ ID, | |
| 219 | EVACUATI ON_PATIENT .EVACUATIO N_VEHICLE_ ID as VEHI CLE_ID, | |
| 220 | EVACUATI ON_PATIENT .EVACUATIO N_VEHICLE_ SEAT_POSIT ION as SEA T_POSITION , | |
| 221 | [dbo].[u fn_Encrypt ] ('idAdmi ssion=' + cast(EVACU ATION_PATI ENT.SOURCE _ID as nva rchar(100) ) | |
| 222 | + '&isFrom Evacuation Report=tru e&selected DivisionNa me=' + @DI VISION_NAM E + '&sele ctedDivisi onId=' | |
| 223 | + cast(@DI VISION_ID as nvarcha r(100)) | |
| 224 | + '&isRost erReport=f alse&isReg ulateRepor t=true&isM anifestRep ort=false& isTransfer Report=fal se', @User Salt) AS P ATIENT_LIN K | |
| 225 | FROM dbo .FACT_WAIT ING_LIST A S EVACUATI ON_PATIENT | |
| 226 | INNER JO IN #Facili tyList FL on FL.ID = EVACUATIO N_PATIENT. FACILITY_D IM_ORGANIZ ATION_ID | |
| 227 | INNER JO IN DIM_PAT IENT AS PA TIENT ON P ATIENT.ID = EVACUATI ON_PATIENT .DIM_PATIE NT_ID | |
| 228 | LEFT JOI N DIM_EVAC _DISPOSITI ON_STATUS AS CONCEPT _EVAC_DISP OSITION_ST ATUS ON CO NCEPT_EVAC _DISPOSITI ON_STATUS. ID = EVACU ATION_PATI ENT.DIM_EV ACUATION_D ISPOSITION _STATUS_ID | |
| 229 | LEFT JOI N dbo.DIM_ EVAC_TRANS PORTATION_ TYPE AS TR ANSPORTATI ON_TYPE ON TRANSPORT ATION_TYPE .ID = EVAC UATION_PAT IENT.DIM_E VACUATION_ TRANSPORTA TION_TYPE_ ID | |
| 230 | LEFT JOI N dbo.DIM_ EVAC_TRANS PORTATION_ PROVIDER A S TRANSPOR TATION_PRO VIDER ON T RANSPORTAT ION_PROVID ER.ID = EV ACUATION_P ATIENT.DIM _EVACUATIO N_TRANSPOR TATION_PRO VIDER_ID | |
| 231 | LEFT JOI N #ACTIVE_ ADMISSION AS ADMISSI ON ON ADMI SSION.PATI ENT_ID = E VACUATION_ PATIENT.DI M_PATIENT_ ID | |
| 232 | LEFT JOI N #WARD AS WARD ON W ARD.ID = A DMISSION.W ARD_ID | |
| 233 | LEFT JOI N dbo.DIM_ BED AS BED ON BED.ID = ADMISSI ON.BED_ID | |
| 234 | WHERE EV ACUATION_P ATIENT.REM OVED_DATE IS NULL | |
| 235 | --AND EV ACUATION_P ATIENT.FAC ILITY_DIM_ ORGANIZATI ON_ID = @F ACILITY_ID --Remove d | |
| 236 | AND EVAC UATION_PAT IENT.FACIL ITY_DIM_OR GANIZATION _ID in (FL .ID) --Adde d | |
| 237 | AND EVAC UATION_PAT IENT.IS_EV ACUATION_P ATIENT = 1 | |
| 238 | END | |
| 239 | ELSE | |
| 240 | IF @DI VISION_ID = 0 | |
| 241 | BEGIN | |
| 242 | SELECT E VACUATION_ PATIENT.SO URCE_ID AS ACT_ID, | |
| 243 | PATIENT. LAST_NAME AS LAST_NA ME, | |
| 244 | SUBSTRIN G(PATIENT. LAST_NAME, 1, 1) + S UBSTRING(P ATIENT.SSN , 7, 5) AS LAST_NAME _INITIAL_A ND_LAST_FO UR, | |
| 245 | PATIENT. GENDER AS GENDER, | |
| 246 | 'VS: ' AS WARD_SP ECIALTY_NA ME, | |
| 247 | 'NU: ' AS WARD_NU MA_NAME, | |
| 248 | 'HV: ' AS WARD_HA vBED_NAME, | |
| 249 | PATIENT. ADMITTING_ DIAGNOSIS AS PRESENT ING_PROBLE M, | |
| 250 | ISNULL(W ARD.NAME, '') + ' - ' + ISNULL (BED.NAME, '') AS C URRENT_LOC ATION, | |
| 251 | --dbo.uf n_GetEmerg encyImages ByEvacuati on(@FACILI TY_ID, ADM ISSION.BED _ID, PATIE NT.ID) AS CLINICAL_E QUIP_REQUI REMENTS, - -Removed | |
| 252 | dbo.ufn_ GetEmergen cyImagesBy Evacuation (FL.ID, AD MISSION.BE D_ID, PATI ENT.ID) AS CLINICAL_ EQUIP_REQU IREMENTS, --Added | |
| 253 | EVACUATI ON_PATIENT .EVACUATIO N_TRANSPOR TATION_CAR E_LEVEL AS TRANSPOR T_CARE_LEV EL, | |
| 254 | EVACUATI ON_PATIENT .EVACUATIO N_ENROUTE_ MEDICAL_AT TENDANT AS ENROUTE_M A, | |
| 255 | EVACUATI ON_PATIENT .EVACUATIO N_ENROUTE_ NON_MEDICA L_ATTENDAN T AS ENROU TE_NMA, | |
| 256 | TRANSPOR TATION_TYP E.DISPLAY_ NAME AS TR ANSPORTATI ON_TYPE, | |
| 257 | TRANSPOR TATION_PRO VIDER.DISP LAY_NAME A S TRANSPOR TATION_PRO VIDER, | |
| 258 | EVACUATI ON_PATIENT .EVACUATIO N_TRANSPOR TATION_COM MENTS AS T RANSPORTAT ION_COMMEN TS, | |
| 259 | NULL AS TRANSPORT_ ID, | |
| 260 | EVACUATI ON_PATIENT .EVACUATIO N_VEHICLE_ ID as VEHI CLE_ID, | |
| 261 | EVACUATI ON_PATIENT .EVACUATIO N_VEHICLE_ SEAT_POSIT ION as SEA T_POSITION , | |
| 262 | [dbo].[u fn_Encrypt ] ('idAdmi ssion=' + cast(EVACU ATION_PATI ENT.SOURCE _ID as nva rchar(100) ) | |
| 263 | + '&isFrom Evacuation Report=tru e&selected DivisionNa me=' + @DI VISION_NAM E + '&sele ctedDivisi onId=' | |
| 264 | + cast(@DI VISION_ID as nvarcha r(100)) | |
| 265 | + '&isRost erReport=f alse&isReg ulateRepor t=true&isM anifestRep ort=false& isTransfer Report=fal se', @User Salt) AS P ATIENT_LIN K | |
| 266 | FROM dbo .FACT_WAIT ING_LIST A S EVACUATI ON_PATIENT | |
| 267 | INNER JO IN #Facili tyList FL on FL.ID = EVACUATIO N_PATIENT. FACILITY_D IM_ORGANIZ ATION_ID | |
| 268 | INNER JO IN DIM_PAT IENT AS PA TIENT ON P ATIENT.ID = EVACUATI ON_PATIENT .DIM_PATIE NT_ID | |
| 269 | LEFT JOI N DIM_EVAC _DISPOSITI ON_STATUS AS CONCEPT _EVAC_DISP OSITION_ST ATUS ON CO NCEPT_EVAC _DISPOSITI ON_STATUS. ID = EVACU ATION_PATI ENT.DIM_EV ACUATION_D ISPOSITION _STATUS_ID | |
| 270 | LEFT JOI N dbo.DIM_ EVAC_TRANS PORTATION_ TYPE AS TR ANSPORTATI ON_TYPE ON TRANSPORT ATION_TYPE .ID = EVAC UATION_PAT IENT.DIM_E VACUATION_ TRANSPORTA TION_TYPE_ ID | |
| 271 | LEFT JOI N dbo.DIM_ EVAC_TRANS PORTATION_ PROVIDER A S TRANSPOR TATION_PRO VIDER ON T RANSPORTAT ION_PROVID ER.ID = EV ACUATION_P ATIENT.DIM _EVACUATIO N_TRANSPOR TATION_PRO VIDER_ID | |
| 272 | LEFT JOI N #ACTIVE_ ADMISSION AS ADMISSI ON ON ADMI SSION.PATI ENT_ID = E VACUATION_ PATIENT.DI M_PATIENT_ ID | |
| 273 | LEFT JOI N #WARD AS WARD ON W ARD.ID = A DMISSION.W ARD_ID | |
| 274 | LEFT JOI N dbo.DIM_ BED AS BED ON BED.ID = ADMISSI ON.BED_ID | |
| 275 | WHERE EV ACUATION_P ATIENT.REM OVED_DATE IS NULL | |
| 276 | --AND EV ACUATION_P ATIENT.FAC ILITY_DIM_ ORGANIZATI ON_ID = @F ACILITY_ID --Remove d | |
| 277 | AND EVACUA TION_PATIE NT.FACILIT Y_DIM_ORGA NIZATION_I D in (FL.I D) --Added | |
| 278 | AND EVACUA TION_PATIE NT.IS_EVAC UATION_PAT IENT = 1 | |
| 279 | AND NOT EX ISTS (Sele ct 1 FROM #ACTIVE_AD MISSION WH ERE #ACTIV E_ADMISSIO N.PATIENT_ ID = EVAC UATION_PAT IENT.DIM_P ATIENT_ID) | |
| 280 | END | |
| 281 | ELSE | |
| 282 | BEGIN | |
| 283 | SELECT E VACUATION_ PATIENT.SO URCE_ID AS ACT_ID, | |
| 284 | PATIENT. LAST_NAME AS LAST_NA ME, | |
| 285 | SUBSTRIN G(PATIENT. LAST_NAME, 1, 1) + S UBSTRING(P ATIENT.SSN , 7, 5) AS LAST_NAME _INITIAL_A ND_LAST_FO UR, | |
| 286 | PATIENT. GENDER AS GENDER, | |
| 287 | 'VS: ' + ISNULL(WA RD.SPECIAL TY_NAME, ' ') AS WARD _SPECIALTY _NAME, | |
| 288 | 'NU: ' + ISNULL(WA RD.NUMA, ' ') AS WARD _NUMA_NAME , | |
| 289 | 'HV: ' + ISNULL(WA RD.HAvBED, '') AS WAR D_HAvBED_N AME, | |
| 290 | PATIENT. ADMITTING_ DIAGNOSIS AS PRESENT ING_PROBLE M, | |
| 291 | ISNULL(W ARD.NAME, '') + ' - ' + ISNULL (BED.NAME, '') AS C URRENT_LOC ATION, | |
| 292 | --dbo.uf n_GetEmerg encyImages ByEvacuati on(@FACILI TY_ID, ADM ISSION.BED _ID, PATIE NT.ID) AS CLINICAL_E QUIP_REQUI REMENTS, - -Removed | |
| 293 | dbo.ufn_ GetEmergen cyImagesBy Evacuation (FL.ID, AD MISSION.BE D_ID, PATI ENT.ID) AS CLINICAL_ EQUIP_REQU IREMENTS, --Added | |
| 294 | EVACUATI ON_PATIENT .EVACUATIO N_TRANSPOR TATION_CAR E_LEVEL AS TRANSPOR T_CARE_LEV EL, | |
| 295 | EVACUATI ON_PATIENT .EVACUATIO N_ENROUTE_ MEDICAL_AT TENDANT AS ENROUTE_M A, | |
| 296 | EVACUATI ON_PATIENT .EVACUATIO N_ENROUTE_ NON_MEDICA L_ATTENDAN T AS ENROU TE_NMA, | |
| 297 | TRANSPOR TATION_TYP E.DISPLAY_ NAME AS TR ANSPORTATI ON_TYPE, | |
| 298 | TRANSPOR TATION_PRO VIDER.DISP LAY_NAME A S TRANSPOR TATION_PRO VIDER, | |
| 299 | EVACUATI ON_PATIENT .EVACUATIO N_TRANSPOR TATION_COM MENTS AS T RANSPORTAT ION_COMMEN TS, | |
| 300 | NULL AS TRANSPORT_ ID, | |
| 301 | EVACUATI ON_PATIENT .EVACUATIO N_VEHICLE_ ID as VEHI CLE_ID, | |
| 302 | EVACUATI ON_PATIENT .EVACUATIO N_VEHICLE_ SEAT_POSIT ION as SEA T_POSITION , | |
| 303 | [dbo].[u fn_Encrypt ] ('idAdmi ssion=' + cast(EVACU ATION_PATI ENT.SOURCE _ID as nva rchar(100) ) | |
| 304 | + '&isFrom Evacuation Report=tru e&selected DivisionNa me=' + @DI VISION_NAM E + '&sele ctedDivisi onId=' | |
| 305 | + cast(@DI VISION_ID as nvarcha r(100)) | |
| 306 | + '&isRost erReport=f alse&isReg ulateRepor t=true&isM anifestRep ort=false& isTransfer Report=fal se', @User Salt) AS P ATIENT_LIN K | |
| 307 | FROM dbo .FACT_WAIT ING_LIST A S EVACUATI ON_PATIENT | |
| 308 | INNER JO IN #Facili tyList FL on FL.ID = EVACUATIO N_PATIENT. FACILITY_D IM_ORGANIZ ATION_ID | |
| 309 | INNER JO IN DIM_PAT IENT AS PA TIENT ON P ATIENT.ID = EVACUATI ON_PATIENT .DIM_PATIE NT_ID | |
| 310 | LEFT JOI N DIM_EVAC _DISPOSITI ON_STATUS AS CONCEPT _EVAC_DISP OSITION_ST ATUS ON CO NCEPT_EVAC _DISPOSITI ON_STATUS. ID = EVACU ATION_PATI ENT.DIM_EV ACUATION_D ISPOSITION _STATUS_ID | |
| 311 | LEFT JOI N dbo.DIM_ EVAC_TRANS PORTATION_ TYPE AS TR ANSPORTATI ON_TYPE ON TRANSPORT ATION_TYPE .ID = EVAC UATION_PAT IENT.DIM_E VACUATION_ TRANSPORTA TION_TYPE_ ID | |
| 312 | LEFT JOI N dbo.DIM_ EVAC_TRANS PORTATION_ PROVIDER A S TRANSPOR TATION_PRO VIDER ON T RANSPORTAT ION_PROVID ER.ID = EV ACUATION_P ATIENT.DIM _EVACUATIO N_TRANSPOR TATION_PRO VIDER_ID | |
| 313 | INNER JO IN #ACTIVE _ADMISSION AS ADMISS ION ON ADM ISSION.PAT IENT_ID = EVACUATION _PATIENT.D IM_PATIENT _ID | |
| 314 | INNER JO IN #WARD A S WARD ON WARD.ID = ADMISSION. WARD_ID | |
| 315 | LEFT JOI N dbo.DIM_ BED AS BED ON BED.ID = ADMISSI ON.BED_ID | |
| 316 | WHERE EV ACUATION_P ATIENT.REM OVED_DATE IS NULL | |
| 317 | --AND EVAC UATION_PAT IENT.FACIL ITY_DIM_OR GANIZATION _ID = @FAC ILITY_ID --Removed | |
| 318 | AND EVACUA TION_PATIE NT.FACILIT Y_DIM_ORGA NIZATION_I D in (FL.I D) --Added | |
| 319 | AND EVACUA TION_PATIE NT.IS_EVAC UATION_PAT IENT = 1 | |
| 320 | END | |
| 321 | DROP T ABLE #WARD | |
| 322 | DROP T ABLE #ACTI VE_ADMISSI ON | |
| 323 | END | |
| 324 | ||
| 325 | IF OBJECT_ID ('tempdb.. #PERMISSIO N') IS NOT NULL | |
| 326 | BEGI N | |
| 327 | DROP T ABLE #PERM ISSION | |
| 328 | END | |
| 329 | END | |
| 330 | ||
| 331 | ||
| 332 |
Araxis Merge (but not the data content of this report) is Copyright © 1993-2016 Araxis Ltd (www.araxis.com). All rights reserved.