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_EmergencyManagementEvacuationManifest.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_EmergencyManagementEvacuationManifest.sql | Mon Mar 26 13:48:40 2018 UTC |
| Description | Between Files 1 and 2 |
|
|---|---|---|
| Text Blocks | Lines | |
| Unchanged | 2 | 714 |
| 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 onManifest ] Scrip t Date: 9/ 14/2017 2: 38:11 PM * *****/ | |
| 4 | SET ANSI_N ULLS ON | |
| 5 | GO | |
| 6 | SET QUOTED _IDENTIFIE R ON | |
| 7 | GO | |
| 8 | ||
| 9 | ||
| 10 | /* | |
| 11 | ||
| 12 | ||
| 13 | use BMS_DW | |
| 14 | exec sp_ex ecutesql N 'IF @IS_MA NIFEST_REP ORT = 1 | |
| 15 | BEGIN | |
| 16 | exec [usp_ Rpt_VISN_E mergencyMa nagementEv acuationMa nifest] @U SER_NAME,@ VISNID,@DI VISION_ID, @DIVISION _NAME, @Us erSalt | |
| 17 | END | |
| 18 | ELSE | |
| 19 | BEGIN | |
| 20 | SELE CT NULL A S ACT_ID, | |
| 21 | NULL AS LAST_N AME, | |
| 22 | NULL AS LAST_N AME_INITIA L_AND_LAST _FOUR, | |
| 23 | NULL AS GENDER , | |
| 24 | NULL AS WARD_S PECIALTY_N AME, | |
| 25 | NULL AS WARD_N UMA_NAME, | |
| 26 | NULL AS WARD_H AvBED_NAME , | |
| 27 | NULL CLINICAL_ EQUIP_REQU IREMENTS, | |
| 28 | NULL AS ENROUT E_MA, | |
| 29 | NULL AS ENROUT E_NMA, | |
| 30 | NULL AS DESTIN ATION_ADDR ESS, | |
| 31 | NULL AS DESTIN ATION_CITY _STATE, | |
| 32 | NULL AS DESTIN ATION_POC_ TELEPHONE, | |
| 33 | NULL AS ORIGIN ATOR_POC_T ELEPHONE, | |
| 34 | NULL AS VEHICL E_ID, | |
| 35 | NULL AS SEAT_P OSITION, | |
| 36 | NULL AS ARRIVA L_TIME, | |
| 37 | NULL AS ENROUT E_MA_TELEP HONE, | |
| 38 | NULL AS ENROUT E_NMA_TELE PHONE, | |
| 39 | NULL AS SENDIN G_FACILITY _NAME, | |
| 40 | NULL AS SENDIN G_FACILITY _ADDRESS, | |
| 41 | NULL AS SENDIN G_FACILITY _CITY_STAT E, | |
| 42 | NULL AS SENDIN G_FACILITY _POC_NAME, | |
| 43 | NULL AS SENDIN G_FACILITY _TELEPHONE , | |
| 44 | NULL AS OPERAT OR_NAME, | |
| 45 | NULL AS OPERAT OR_TELEPHO NE, | |
| 46 | NULL AS PERSON AL_ITEMS, | |
| 47 | NULL AS PATIEN T_LINK | |
| 48 | END',N'@IS _MANIFEST_ REPORT bit , | |
| 49 | @USER_NAME nvarchar( 26), | |
| 50 | @VISNID nvar char(200), | |
| 51 | @DIVISION_ ID nvarcha r(2), | |
| 52 | @DIVISION_ NAME nvarc har(9), | |
| 53 | @UserSalt nvarchar(3 6)', | |
| 54 | @IS_MANIFE ST_REPORT= 1, | |
| 55 | @USER_NAME = DNS.URL ', | |
| 56 | @VISNID=N' B86766B1-F 9C8-48E3-A 950-0926EF 13B542', | |
| 57 | @DIVISION_ ID=N'-1', | |
| 58 | @DIVISION_ NAME=N'All Wards', | |
| 59 | @UserSalt= N'dmhhLm1l ZC52YS5nb3 ZcdmhhaXNk aG9ybmQ=' | |
| 60 | ||
| 61 | ||
| 62 | CURRENT ST ATUS = 56. 01, 56.04, 56.05 add ed. | |
| 63 | Need Info on 56.02, 56.03 | |
| 64 | Can't test Locally. | |
| 65 | */ | |
| 66 | ||
| 67 | Create PRO CEDURE [db o].[usp_Rp t_VISN_Eme rgencyMana gementEvac uationMani fest] | |
| 68 | @U SER_NAME N VARCHAR(50 0) = NULL, | |
| 69 | @V ISNID NVarch ar(250), | |
| 70 | -- @FACILITY_ EXTENSION NVARCHAR(2 50), | |
| 71 | @D IVISION_ID INT = NUL L, | |
| 72 | @D IVISION_NA ME NVARCHA R(250), | |
| 73 | @U serSalt NV ARCHAR(250 ) | |
| 74 | AS | |
| 75 | BEGIN | |
| 76 | -- CREATE FAC ILITY LIST FROM VISN CODE | |
| 77 | CREA TE TABLE # FacilityLi st ( | |
| 78 | ID Int, | |
| 79 | Name Varchar( 250), | |
| 80 | Source _ID Varchar(25 0), | |
| 81 | CODE Varchar(25 0)) | |
| 82 | ||
| 83 | INSE RT INTO #F acilityLis t | |
| 84 | Sele ct DISTINC T | |
| 85 | DO3.ID , | |
| 86 | DO3.Na me, | |
| 87 | DO3.SO URCE_ID, | |
| 88 | DO3.CO DE | |
| 89 | FROM bms_dw.db o.DIM_ORGA NIZATION D O | |
| 90 | LEFT JOIN bms_ dw.dbo.DIM _ORGANIZAT ION DO2 | |
| 91 | ON DO2 .DIM_ORGAN IZATION_ID = DO.ID | |
| 92 | LEFT JOIN bms_ dw.dbo.DIM _ORGANIZAT ION DO3 | |
| 93 | ON DO2 .ID = DO3. DIM_ORGANI ZATION_ID | |
| 94 | AND DO 3.DIM_ORGA NIZATION_T YPE_ID = 2 | |
| 95 | WHER E DO.sourc e_id = @VI SNID | |
| 96 | ||
| 97 | -- create permissio n table | |
| 98 | CREA TE TABLE # PERMISSION | |
| 99 | ( | |
| 100 | DIM _ORGANIZAT ION_ID INT , | |
| 101 | DIM _WARD_ID I NT | |
| 102 | ) | |
| 103 | --in sert permi ssion for the user | |
| 104 | INSE RT INTO #P ERMISSION | |
| 105 | SELECT * FROM db o.ufn_GetP ermissionB yUserName( @USER_NAME ) | |
| 106 | CREATE N ONCLUSTERE D INDEX [D IM_ORGANIZ ATION_ID] ON #PERMIS SION ([DIM _ORGANIZAT ION_ID] AS C) | |
| 107 | WITH ( | |
| 108 | P AD_INDEX = OFF, | |
| 109 | S TATISTICS_ NORECOMPUT E = OFF, | |
| 110 | S ORT_IN_TEM PDB = OFF, | |
| 111 | I GNORE_DUP_ KEY = OFF, | |
| 112 | D ROP_EXISTI NG = OFF, | |
| 113 | O NLINE = OF F, | |
| 114 | A LLOW_ROW_L OCKS = ON , | |
| 115 | A LLOW_PAGE_ LOCKS = O N) | |
| 116 | CREATE N ONCLUSTERE D INDEX DI M_WARD_ID ON #PERMIS SION (DIM_ WARD_ID AS C) | |
| 117 | WITH ( | |
| 118 | P AD_INDEX = OFF, | |
| 119 | S TATISTICS_ NORECOMPUT E = OFF, | |
| 120 | S ORT_IN_TEM PDB = OFF, | |
| 121 | I GNORE_DUP_ KEY = OFF, | |
| 122 | D ROP_EXISTI NG = OFF, | |
| 123 | O NLINE = OF F, | |
| 124 | A LLOW_ROW_L OCKS = ON , | |
| 125 | A LLOW_PAGE_ LOCKS = O N) ; | |
| 126 | ||
| 127 | -- DECLARE @F ACILITY_ID INT -- Removed | |
| 128 | -- get facili ty id | |
| 129 | -- SET @FACIL ITY_ID = d bo.ufn_Get FacilityId ByIdentifi er(@FACILI TY_EXTENSI ON); -- Removed | |
| 130 | ||
| 131 | ||
| 132 | -- check if t he user ha s permissi on for the facility | |
| 133 | IF EXISTS(SE LECT 1 | |
| 134 | FROM #PERMISSI ON P | |
| 135 | INNE R JOIN #Fa cilityList FL --Add ed | |
| 136 | ON F L.ID = P.D IM_ORGANIZ ATION_ID --Added | |
| 137 | WHER E P.DIM_OR GANIZATION _ID in (FL .ID)) --M odified | |
| 138 | BEGI N | |
| 139 | ||
| 140 | CREATE TABLE #WA RD (ID INT , SPECIALT Y_NAME NVA RCHAR(250) , NUMA NVA RCHAR(250) , HAvBED N VARCHAR(50 )) | |
| 141 | --IF @ DIVISION_I D = -1 OR @DIVISION_ ID IS NULL OR @DIVIS ION_ID = 0 | |
| 142 | BEGIN | |
| 143 | INSERT INT O #WARD(ID , SPECIALT Y_NAME, NU MA, HAvBED ) | |
| 144 | SELECT WAR D.ID, SPEC IALTY.DISP LAY_NAME, NUMA.DISPL AY_NAME, H AvBED.DISP LAY_NAME | |
| 145 | FROM dbo.D IM_WARD AS WARD | |
| 146 | --INNER JO IN dbo.ufn _GetWardsB yFacilityI d(@FACILIT Y_ID) AS F AC_WARD ON FAC_WARD. ID = WARD. ID --Re moved | |
| 147 | LEFT JOIN dbo.DIM_SP ECIALTY AS SPECIALTY ON SPECIA LTY.ID = W ARD.VISTA_ DIM_SPECIA LTY_ID | |
| 148 | LEFT JOIN dbo.DIM_NU MA AS NUMA ON NUMA.I D = SPECIA LTY.DIM_NU MA_ID | |
| 149 | LEFT JOIN dbo.DIM_HA vBED AS HA vBED ON HA vBED.ID = SPECIALTY. DIM_HAvBED _ID | |
| 150 | WHERE WARD .STATUS = 'active' | |
| 151 | END | |
| 152 | /*ELSE | |
| 153 | BEGIN | |
| 154 | INSERT INT O #WARD(ID , SPECIALT Y_NAME, NU MA, HAvBED ) | |
| 155 | SELECT ACT IVE_WARD.I D, SPECIAL TY.DISPLAY _NAME, NUM A.DISPLAY_ NAME, HAvB ED.DISPLAY _NAME | |
| 156 | FROM GROUP _WARD_ORGA NIZATION a s WARD | |
| 157 | INNER JOIN dbo.DIM_W ARD AS ACT IVE_WARD O N ACTIVE_W ARD.ID = W ARD.DIM_WA RD_ID | |
| 158 | LEFT JOIN dbo.DIM_SP ECIALTY AS SPECIALTY ON SPECIA LTY.ID = A CTIVE_WARD .VISTA_DIM _SPECIALTY _ID | |
| 159 | LEFT JOIN dbo.DIM_NU MA AS NUMA ON NUMA.I D = SPECIA LTY.DIM_NU MA_ID | |
| 160 | LEFT JOIN dbo.DIM_HA vBED AS HA vBED ON HA vBED.ID = SPECIALTY. DIM_HAvBED _ID | |
| 161 | WHERE ACTI VE_WARD.ST ATUS = 'ac tive' --AN D WARD.DIM _ORGANIZAT ION_ID = @ DIVISION_I D --Re moved | |
| 162 | END*/ | |
| 163 | ||
| 164 | CREATE TABLE #AC TIVE_ADMIS SION( | |
| 165 | PATIEN T_ID INT, | |
| 166 | BED_ID INT, | |
| 167 | WARD_I D INT | |
| 168 | ) | |
| 169 | ||
| 170 | CREATE TABLE #AD MISSION_AN D_TRANSFER ( | |
| 171 | FACT_I D INT NOT NULL , | |
| 172 | BED_ID INT, | |
| 173 | WARD_I D INT, | |
| 174 | PATIEN T_ID INT, | |
| 175 | CREATE D_DATE DAT ETIME NULL , | |
| 176 | IS_ADM ISSION_EVN BIT) | |
| 177 | ||
| 178 | INSERT INTO #ADM ISSION_AND _TRANSFER( FACT_ID, B ED_ID, WAR D_ID, PATI ENT_ID, CR EATED_DATE , IS_ADMIS SION_EVN) | |
| 179 | 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 | |
| 180 | FROM F ACT_ADMISS ION_EVN AS ADM_EVN | |
| 181 | INNER JOIN #WARD AS WARD O N WARD.ID = ADM_EVN. DIM_WARD_I D | |
| 182 | WHERE ADM_EVN.HA S_DISCHARG E = 0 | |
| 183 | ||
| 184 | INSERT INTO #ADM ISSION_AND _TRANSFER( FACT_ID, B ED_ID, WAR D_ID, PATI ENT_ID, CR EATED_DATE , IS_ADMIS SION_EVN) | |
| 185 | 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 | |
| 186 | FROM F ACT_MOVEME NT_EVN AS MOV_EVN | |
| 187 | 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 | |
| 188 | FR OM FACT_MO VEMENT_EVN LAST_MOV_ EVN | |
| 189 | IN NER JOIN # ADMISSION_ AND_TRANSF ER AS ADM_ EVN ON ADM _EVN.FACT_ ID = LAST_ MOV_EVN.FA CT_ADMISSI ON_EVN_ID | |
| 190 | GR OUP BY LAS T_MOV_EVN. FACT_ADMIS SION_EVN_I D) MAX_ME_ EVENT | |
| 191 | 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 | |
| 192 | ||
| 193 | DELETE DEL FROM #ADMISSION _AND_TRANS FER AS DEL | |
| 194 | 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 | |
| 195 | WHERE DEL.IS_ADM ISSION_EVN = 0 | |
| 196 | ||
| 197 | INSERT INTO #ACT IVE_ADMISS ION(WARD_I D, BED_ID, PATIENT_I D) | |
| 198 | SELECT ADMISSION _INFO.WARD _ID, ADMIS SION_INFO. BED_ID, AD MISSION_IN FO.PATIENT _ID | |
| 199 | FROM # ADMISSION_ AND_TRANSF ER AS ADMI SSION_INFO | |
| 200 | INNER JOIN | |
| 201 | ( SE LECT MAX(C REATED_DAT E) AS CREA TED_DATE, BED_ID | |
| 202 | FROM #AD MISSION_AN D_TRANSFER | |
| 203 | GROUP BY BED_ID | |
| 204 | ) 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 | |
| 205 | ||
| 206 | DROP T ABLE #ADMI SSION_AND_ TRANSFER | |
| 207 | ||
| 208 | IF @DI VISION_ID = -1 OR @D IVISION_ID IS NULL | |
| 209 | BEGIN | |
| 210 | SELECT E VACUATION_ PATIENT.SO URCE_ID AS ACT_ID, | |
| 211 | PATIENT. LAST_NAME AS LAST_NA ME, | |
| 212 | SUBSTRIN G(PATIENT. LAST_NAME, 1, 1) + S UBSTRING(P ATIENT.SSN , 7, 5) AS LAST_NAME _INITIAL_A ND_LAST_FO UR, | |
| 213 | PATIENT. GENDER AS GENDER, | |
| 214 | 'VS: ' + ISNULL(WA RD.SPECIAL TY_NAME, ' ') AS WARD _SPECIALTY _NAME, | |
| 215 | 'NU: ' + ISNULL(WA RD.NUMA, ' ') AS WARD _NUMA_NAME , | |
| 216 | 'HV: ' + ISNULL(WA RD.HAvBED, '') AS WAR D_HAvBED_N AME, | |
| 217 | --dbo.uf n_GetEmerg encyImages ByEvacuati on(@FACILI TY_ID, ADM ISSION.BED _ID, PATIE NT.ID) AS CLINICAL_E QUIP_REQUI REMENTS, - -Removed | |
| 218 | dbo.ufn_ GetEmergen cyImagesBy Evacuation (FL.ID, AD MISSION.BE D_ID, PATI ENT.ID) AS CLINICAL_ EQUIP_REQU IREMENTS, --Added | |
| 219 | EVACUATI ON_PATIENT .EVACUATIO N_ENROUTE_ MEDICAL_AT TENDANT AS ENROUTE_M A, | |
| 220 | EVACUATI ON_PATIENT .EVACUATIO N_ENROUTE_ NON_MEDICA L_ATTENDAN T AS ENROU TE_NMA, | |
| 221 | EVACUATI ON_PATIENT .EVACUATIO N_DESTINAT ION_ADDRES S AS DESTI NATION_ADD RESS, | |
| 222 | EVACUATI ON_PATIENT .EVACUATIO N_DESTINAT ION_CITY_S TATE AS DE STINATION_ CITY_STATE , | |
| 223 | EVACUATI ON_PATIENT .EVACUATIO N_DESTINAT ION_POC_TE LEPHONE AS DESTINATI ON_POC_TEL EPHONE, | |
| 224 | EVACUATI ON_PATIENT .EVACUATIO N_ORIGINAT OR_POC_TEL EPHONE AS ORIGINATOR _POC_TELEP HONE, | |
| 225 | EVACUATI ON_PATIENT .EVACUATIO N_VEHICLE_ ID as VEHI CLE_ID, | |
| 226 | EVACUATI ON_PATIENT .EVACUATIO N_VEHICLE_ SEAT_POSIT ION as SEA T_POSITION , | |
| 227 | EVACUATI ON_PATIENT .EVACUATIO N_ARRIVAL_ TIME as AR RIVAL_TIME , | |
| 228 | EVACUATI ON_PATIENT .EVACUATIO N_MA_TELEP HONE AS EN ROUTE_MA_T ELEPHONE, | |
| 229 | EVACUATI ON_PATIENT .EVACUATIO N_NMA_TELE PHONE AS E NROUTE_NMA _TELEPHONE , | |
| 230 | EVACUATI ON_PATIENT .EVACUATIO N_ORIGINAT ING_FACILI TY_NAME AS SENDING_F ACILITY_NA ME, | |
| 231 | EVACUATI ON_PATIENT .EVACUATIO N_ORIGINAT ING_ADDRES S AS SENDI NG_FACILIT Y_ADDRESS, | |
| 232 | EVACUATI ON_PATIENT .EVACUATIO N_ORIGINAT ING_CITY_S TATE AS SE NDING_FACI LITY_CITY_ STATE, | |
| 233 | 'Waiting for BMS A ddition' A S SENDING_ FACILITY_P OC_NAME, | |
| 234 | EVACUATI ON_PATIENT .EVACUATIO N_ORIGINAT OR_POC_TEL EPHONE AS SENDING_FA CILITY_TEL EPHONE, | |
| 235 | EVACUATI ON_PATIENT .EVACUATIO N_VEHICLE_ OPERATOR_N AME AS OPE RATOR_NAME , | |
| 236 | EVACUATI ON_PATIENT .EVACUATIO N_VEHICLE_ OPERATOR_T ELEPHONE A S OPERATOR _TELEPHONE , | |
| 237 | NULL AS PERSONAL_I TEMS, | |
| 238 | [dbo].[u fn_Encrypt ] ('idAdmi ssion=' + cast(EVACU ATION_PATI ENT.SOURCE _ID as nva rchar(100) ) | |
| 239 | + '&isFrom Evacuation Report=tru e&selected DivisionNa me=' + @DI VISION_NAM E + '&sele ctedDivisi onId=' | |
| 240 | + cast(@DI VISION_ID as nvarcha r(100)) | |
| 241 | + '&isRost erReport=f alse&isReg ulateRepor t=false&is ManifestRe port=true& isTransfer Report=fal se', @User Salt) AS P ATIENT_LIN K | |
| 242 | FROM dbo .FACT_WAIT ING_LIST A S EVACUATI ON_PATIENT | |
| 243 | INNER JO IN #Facili tyList FL on FL.ID = EVACUATIO N_PATIENT. FACILITY_D IM_ORGANIZ ATION_ID | |
| 244 | INNER JO IN DIM_PAT IENT AS PA TIENT ON P ATIENT.ID = EVACUATI ON_PATIENT .DIM_PATIE NT_ID | |
| 245 | 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 | |
| 246 | LEFT JOI N #ACTIVE_ ADMISSION ADMISSION ON ADMISSI ON.PATIENT _ID = EVAC UATION_PAT IENT.DIM_P ATIENT_ID | |
| 247 | LEFT JOI N #WARD AS WARD ON W ARD.ID = A DMISSION.W ARD_ID | |
| 248 | WHERE EV ACUATION_P ATIENT.REM OVED_DATE IS NULL | |
| 249 | --AND EV ACUATION_P ATIENT.FAC ILITY_DIM_ ORGANIZATI ON_ID = @F ACILITY_ID --Remove d | |
| 250 | AND EVAC UATION_PAT IENT.FACIL ITY_DIM_OR GANIZATION _ID in (FL .ID) --Adde d | |
| 251 | AND EVAC UATION_PAT IENT.IS_EV ACUATION_P ATIENT = 1 | |
| 252 | END | |
| 253 | ELSE | |
| 254 | IF @DI VISION_ID = 0 | |
| 255 | BEGIN | |
| 256 | SELECT E VACUATION_ PATIENT.SO URCE_ID AS ACT_ID, | |
| 257 | PATIENT. LAST_NAME AS LAST_NA ME, | |
| 258 | SUBSTRIN G(PATIENT. LAST_NAME, 1, 1) + S UBSTRING(P ATIENT.SSN , 7, 5) AS LAST_NAME _INITIAL_A ND_LAST_FO UR, | |
| 259 | PATIENT. GENDER AS GENDER, | |
| 260 | 'VS: ' A S WARD_SPE CIALTY_NAM E, | |
| 261 | 'NU: ' A S WARD_NUM A_NAME, | |
| 262 | 'HV: ' A S WARD_HAv BED_NAME, | |
| 263 | --dbo.uf n_GetEmerg encyImages ByEvacuati on(@FACILI TY_ID, ADM ISSION.BED _ID, PATIE NT.ID) AS CLINICAL_E QUIP_REQUI REMENTS, - -Removed | |
| 264 | dbo.ufn_ GetEmergen cyImagesBy Evacuation (FL.ID, AD MISSION.BE D_ID, PATI ENT.ID) AS CLINICAL_ EQUIP_REQU IREMENTS, --Added | |
| 265 | EVACUATI ON_PATIENT .EVACUATIO N_ENROUTE_ MEDICAL_AT TENDANT AS ENROUTE_M A, | |
| 266 | EVACUATI ON_PATIENT .EVACUATIO N_ENROUTE_ NON_MEDICA L_ATTENDAN T AS ENROU TE_NMA, | |
| 267 | EVACUATI ON_PATIENT .EVACUATIO N_DESTINAT ION_ADDRES S AS DESTI NATION_ADD RESS, | |
| 268 | EVACUATI ON_PATIENT .EVACUATIO N_DESTINAT ION_CITY_S TATE AS DE STINATION_ CITY_STATE , | |
| 269 | EVACUATI ON_PATIENT .EVACUATIO N_DESTINAT ION_POC_TE LEPHONE AS DESTINATI ON_POC_TEL EPHONE, | |
| 270 | EVACUATI ON_PATIENT .EVACUATIO N_ORIGINAT OR_POC_TEL EPHONE AS ORIGINATOR _POC_TELEP HONE, | |
| 271 | EVACUATI ON_PATIENT .EVACUATIO N_VEHICLE_ ID as VEHI CLE_ID, | |
| 272 | EVACUATI ON_PATIENT .EVACUATIO N_VEHICLE_ SEAT_POSIT ION as SEA T_POSITION , | |
| 273 | EVACUATI ON_PATIENT .EVACUATIO N_ARRIVAL_ TIME as AR RIVAL_TIME , | |
| 274 | EVACUATI ON_PATIENT .EVACUATIO N_MA_TELEP HONE AS EN ROUTE_MA_T ELEPHONE, | |
| 275 | EVACUATI ON_PATIENT .EVACUATIO N_NMA_TELE PHONE AS E NROUTE_NMA _TELEPHONE , | |
| 276 | EVACUATI ON_PATIENT .EVACUATIO N_ORIGINAT ING_FACILI TY_NAME AS SENDING_F ACILITY_NA ME, | |
| 277 | EVACUATI ON_PATIENT .EVACUATIO N_ORIGINAT ING_ADDRES S AS SENDI NG_FACILIT Y_ADDRESS, | |
| 278 | EVACUATI ON_PATIENT .EVACUATIO N_ORIGINAT ING_CITY_S TATE AS SE NDING_FACI LITY_CITY_ STATE, | |
| 279 | 'Waiting for BMS A ddition' A S SENDING_ FACILITY_P OC_NAME, | |
| 280 | EVACUATI ON_PATIENT .EVACUATIO N_ORIGINAT OR_POC_TEL EPHONE AS SENDING_FA CILITY_TEL EPHONE, | |
| 281 | EVACUATI ON_PATIENT .EVACUATIO N_VEHICLE_ OPERATOR_N AME AS OPE RATOR_NAME , | |
| 282 | EVACUATI ON_PATIENT .EVACUATIO N_VEHICLE_ OPERATOR_T ELEPHONE A S OPERATOR _TELEPHONE , | |
| 283 | NULL AS PERSONAL_I TEMS, | |
| 284 | [dbo].[u fn_Encrypt ] ('idAdmi ssion=' + cast(EVACU ATION_PATI ENT.SOURCE _ID as nva rchar(100) ) | |
| 285 | + '&isFrom Evacuation Report=tru e&selected DivisionNa me=' + @DI VISION_NAM E + '&sele ctedDivisi onId=' | |
| 286 | + cast(@DI VISION_ID as nvarcha r(100)) | |
| 287 | + '&isRost erReport=f alse&isReg ulateRepor t=false&is ManifestRe port=true& isTransfer Report=fal se', @User Salt) AS P ATIENT_LIN K | |
| 288 | FROM dbo .FACT_WAIT ING_LIST A S EVACUATI ON_PATIENT | |
| 289 | INNER JO IN #Facili tyList FL on FL.ID = EVACUATIO N_PATIENT. FACILITY_D IM_ORGANIZ ATION_ID | |
| 290 | INNER JO IN DIM_PAT IENT AS PA TIENT ON P ATIENT.ID = EVACUATI ON_PATIENT .DIM_PATIE NT_ID | |
| 291 | 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 | |
| 292 | LEFT JOI N #ACTIVE_ ADMISSION ADMISSION ON ADMISSI ON.PATIENT _ID = EVAC UATION_PAT IENT.DIM_P ATIENT_ID | |
| 293 | LEFT JOI N #WARD AS WARD ON W ARD.ID = A DMISSION.W ARD_ID | |
| 294 | WHERE EV ACUATION_P ATIENT.REM OVED_DATE IS NULL | |
| 295 | --AND EVAC UATION_PAT IENT.FACIL ITY_DIM_OR GANIZATION _ID = @FAC ILITY_ID --Removed | |
| 296 | AND EVACUA TION_PATIE NT.FACILIT Y_DIM_ORGA NIZATION_I D in (FL.I D) --Added | |
| 297 | AND EVACUA TION_PATIE NT.IS_EVAC UATION_PAT IENT = 1 | |
| 298 | 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) | |
| 299 | END | |
| 300 | ELSE | |
| 301 | BEGIN | |
| 302 | SELECT E VACUATION_ PATIENT.SO URCE_ID AS ACT_ID, | |
| 303 | PATIENT. LAST_NAME AS LAST_NA ME, | |
| 304 | SUBSTRIN G(PATIENT. LAST_NAME, 1, 1) + S UBSTRING(P ATIENT.SSN , 7, 5) AS LAST_NAME _INITIAL_A ND_LAST_FO UR, | |
| 305 | PATIENT. GENDER AS GENDER, | |
| 306 | 'VS: ' + ISNULL(WA RD.SPECIAL TY_NAME, ' ') AS WARD _SPECIALTY _NAME, | |
| 307 | 'NU: ' + ISNULL(WA RD.NUMA, ' ') AS WARD _NUMA_NAME , | |
| 308 | 'HV: ' + ISNULL(WA RD.HAvBED, '') AS WAR D_HAvBED_N AME, | |
| 309 | --dbo.uf n_GetEmerg encyImages ByEvacuati on(@FACILI TY_ID, ADM ISSION.BED _ID, PATIE NT.ID) AS CLINICAL_E QUIP_REQUI REMENTS, - -Removed | |
| 310 | dbo.ufn_ GetEmergen cyImagesBy Evacuation (FL.ID, AD MISSION.BE D_ID, PATI ENT.ID) AS CLINICAL_ EQUIP_REQU IREMENTS, --Added | |
| 311 | EVACUATI ON_PATIENT .EVACUATIO N_ENROUTE_ MEDICAL_AT TENDANT AS ENROUTE_M A, | |
| 312 | EVACUATI ON_PATIENT .EVACUATIO N_ENROUTE_ NON_MEDICA L_ATTENDAN T AS ENROU TE_NMA, | |
| 313 | EVACUATI ON_PATIENT .EVACUATIO N_DESTINAT ION_ADDRES S AS DESTI NATION_ADD RESS, | |
| 314 | EVACUATI ON_PATIENT .EVACUATIO N_DESTINAT ION_CITY_S TATE AS DE STINATION_ CITY_STATE , | |
| 315 | EVACUATI ON_PATIENT .EVACUATIO N_DESTINAT ION_POC_TE LEPHONE AS DESTINATI ON_POC_TEL EPHONE, | |
| 316 | EVACUATI ON_PATIENT .EVACUATIO N_ORIGINAT OR_POC_TEL EPHONE AS ORIGINATOR _POC_TELEP HONE, | |
| 317 | EVACUATI ON_PATIENT .EVACUATIO N_VEHICLE_ ID as VEHI CLE_ID, | |
| 318 | EVACUATI ON_PATIENT .EVACUATIO N_VEHICLE_ SEAT_POSIT ION as SEA T_POSITION , | |
| 319 | EVACUATI ON_PATIENT .EVACUATIO N_ARRIVAL_ TIME as AR RIVAL_TIME , | |
| 320 | EVACUATI ON_PATIENT .EVACUATIO N_MA_TELEP HONE AS EN ROUTE_MA_T ELEPHONE, | |
| 321 | EVACUATI ON_PATIENT .EVACUATIO N_NMA_TELE PHONE AS E NROUTE_NMA _TELEPHONE , | |
| 322 | EVACUATI ON_PATIENT .EVACUATIO N_ORIGINAT ING_FACILI TY_NAME AS SENDING_F ACILITY_NA ME, | |
| 323 | EVACUATI ON_PATIENT .EVACUATIO N_ORIGINAT ING_ADDRES S AS SENDI NG_FACILIT Y_ADDRESS, | |
| 324 | EVACUATI ON_PATIENT .EVACUATIO N_ORIGINAT ING_CITY_S TATE AS SE NDING_FACI LITY_CITY_ STATE, | |
| 325 | 'Waiting for BMS A ddition' A S SENDING_ FACILITY_P OC_NAME, | |
| 326 | EVACUATI ON_PATIENT .EVACUATIO N_ORIGINAT OR_POC_TEL EPHONE AS SENDING_FA CILITY_TEL EPHONE, | |
| 327 | EVACUATI ON_PATIENT .EVACUATIO N_VEHICLE_ OPERATOR_N AME AS OPE RATOR_NAME , | |
| 328 | EVACUATI ON_PATIENT .EVACUATIO N_VEHICLE_ OPERATOR_T ELEPHONE A S OPERATOR _TELEPHONE , | |
| 329 | NULL AS PERSONAL_I TEMS, | |
| 330 | [dbo].[u fn_Encrypt ] ('idAdmi ssion=' + cast(EVACU ATION_PATI ENT.SOURCE _ID as nva rchar(100) ) | |
| 331 | + '&isFrom Evacuation Report=tru e&selected DivisionNa me=' + @DI VISION_NAM E + '&sele ctedDivisi onId=' | |
| 332 | + cast(@DI VISION_ID as nvarcha r(100)) | |
| 333 | + '&isRost erReport=f alse&isReg ulateRepor t=false&is ManifestRe port=true& isTransfer Report=fal se', @User Salt) AS P ATIENT_LIN K | |
| 334 | FROM dbo .FACT_WAIT ING_LIST A S EVACUATI ON_PATIENT | |
| 335 | INNER JO IN #Facili tyList FL on FL.ID = EVACUATIO N_PATIENT. FACILITY_D IM_ORGANIZ ATION_ID | |
| 336 | INNER JO IN DIM_PAT IENT AS PA TIENT ON P ATIENT.ID = EVACUATI ON_PATIENT .DIM_PATIE NT_ID | |
| 337 | 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 | |
| 338 | INNER JO IN #ACTIVE _ADMISSION ADMISSION ON ADMISS ION.PATIEN T_ID = EVA CUATION_PA TIENT.DIM_ PATIENT_ID | |
| 339 | INNER JO IN #WARD A S WARD ON WARD.ID = ADMISSION. WARD_ID | |
| 340 | WHERE EV ACUATION_P ATIENT.REM OVED_DATE IS NULL | |
| 341 | --AND EVAC UATION_PAT IENT.FACIL ITY_DIM_OR GANIZATION _ID = @FAC ILITY_ID --Removed | |
| 342 | AND EVACUA TION_PATIE NT.FACILIT Y_DIM_ORGA NIZATION_I D in (FL.I D) --Added | |
| 343 | AND EVACUA TION_PATIE NT.IS_EVAC UATION_PAT IENT = 1 | |
| 344 | END | |
| 345 | ||
| 346 | ||
| 347 | DROP T ABLE #WARD | |
| 348 | DROP T ABLE #ACTI VE_ADMISSI ON | |
| 349 | END | |
| 350 | ||
| 351 | ||
| 352 | ||
| 353 | IF OBJECT_ID ('tempdb.. #PERMISSIO N') IS NOT NULL | |
| 354 | BEGI N | |
| 355 | DROP T ABLE #PERM ISSION | |
| 356 | END | |
| 357 | END | |
| 358 |
Araxis Merge (but not the data content of this report) is Copyright © 1993-2016 Araxis Ltd (www.araxis.com). All rights reserved.