Produced by Araxis Merge on 10/26/2017 10:44:45 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\BMSv2Updates\2.2.20.2 | usp_Filter_Patient_Waiting_Standard_View.sql | Wed Oct 18 19:03:32 2017 UTC |
| 2 | OSCIF_BMS_v2_iter 2_September_2017.zip\BMS_Cand\Source\Sources\Database\BMSv2Updates\2.2.20.2 | usp_Filter_Patient_Waiting_Standard_View.sql | Thu Oct 26 19:41:50 2017 UTC |
| Description | Between Files 1 and 2 |
|
|---|---|---|
| Text Blocks | Lines | |
| Unchanged | 3 | 236 |
| Changed | 2 | 4 |
| 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] | |
| 2 | GO | |
| 3 | /****** Ob ject: Sto redProcedu re [dbo].[ usp_Filter _Patient_W aiting_Sta ndard_View ] Scrip t Date: 8/ 21/2017 3: 46:06 PM * *****/ | |
| 4 | SET ANSI_N ULLS ON | |
| 5 | GO | |
| 6 | SET QUOTED _IDENTIFIE R ON | |
| 7 | GO | |
| 8 | -- ======= ========== ========== ========== ======== | |
| 9 | -- Author: Silvic a Pletea | |
| 10 | -- Create date: 10.1 0.2011 | |
| 11 | -- Descrip tion: Filt er transfe rs by faci lity | |
| 12 | -- ======= ========== ========== ========== ======== | |
| 13 | -- ======= ========== ========== ========== ======== | |
| 14 | -- Update by: PII | |
| 15 | -- Update date: 10/2 5/2011 | |
| 16 | -- Descrip tion: Filt er transfe rs by faci lity | |
| 17 | -- ======= ========== ========== ========== ======== | |
| 18 | -- ======= ========== ========== ========== ======== | |
| 19 | -- Updated By: Silvia Pletea | |
| 20 | -- Updated date: 02. 16.2012 | |
| 21 | -- Descrip tion: Adde d new para meter: @IS _CURRENT_W AITING_LIS T. If this is true r eturn all the patien ts where t ransfer ev ent is nul l else fil ter by eve nt date. | |
| 22 | -- ======= ========== ========== ========== ======== | |
| 23 | -- ======= ========== ========== ========== ======== | |
| 24 | -- Update by: PII | |
| 25 | -- Update date: 05/1 4/2012 | |
| 26 | -- Descrip tion: Pagi ng context is ignore d when pag e size or number are negative. | |
| 27 | -- ======= ========== ========== ========== ======== | |
| 28 | ||
| 29 | ALTER PROC EDURE [dbo ].[usp_Fil ter_Patien t_Waiting_ Standard_V iew] | |
| 30 | @F ACILITY_RE GION NVARC HAR(100), | |
| 31 | @F ACILITY_VI SN NVARCHA R(100), | |
| 32 | @S PECIALTY_C ODE NVARCH AR(100), | |
| 33 | @S PECIALTY_C ODE_SYSTEM NVARCHAR( 100), | |
| 34 | @C REATION_DA TE DATETIM E = NULL, | |
| 35 | @I S_CURRENT_ WAITING_LI ST BIT, | |
| 36 | @I S_DISPLAY_ ONLY_NATIO NAL_PATIEN TS BIT | |
| 37 | AS | |
| 38 | BEGIN | |
| 39 | SET NOCOUN T ON | |
| 40 | ||
| 41 | DE CLARE @SQL NVARCHAR( MAX), @SQL _SECURITY NVARCHAR(M AX), @DOMA IN NVARCHA R(250), @S PECIALTY_I D INT, @SQ L_WHERE NV ARCHAR(MAX ) | |
| 42 | SE T @DOMAIN = dbo.F_GE T_CURRENT_ DOMAIN() | |
| 43 | ||
| 44 | IF (dbo.F_GE T_IS_SUPER USER() != 1) | |
| 45 | SET @SQL_SECUR ITY = COAL ESCE(@SQL_ SECURITY, '') + 'INN ER JOIN vP olicyConte xt V ON V. resource_r oot = ''' + @DOMAIN + ''' | |
| 46 | AND V. resource_e xtension = CAST(TR.F ACILITY_UI D AS nvarc har(36)) A ND v.actio n_name = ' 'BMS, Read ''' | |
| 47 | EL SE | |
| 48 | SET @SQL_SECUR ITY = '' | |
| 49 | ||
| 50 | SE T @SQL_WHE RE = COALE SCE(@SQL_W HERE,'') | |
| 51 | IF (@SPECIAL TY_CODE IS NOT NULL) | |
| 52 | BE GIN | |
| 53 | SELE CT TOP(1) @SPECIALTY _ID = ID F ROM CONCEP T WHERE CO DE = @SPEC IALTY_CODE AND CODE_ SYSTEM = @ SPECIALTY_ CODE_SYSTE M | |
| 54 | IF ( @SPECIALTY _ID IS NUL L) | |
| 55 | RETURN | |
| 56 | SET @SQL_WHERE = @SQL_WH ERE + ' AN D REQSP.ID = '+ CAST (@SPECIALT Y_ID AS NV ARCHAR(10) ) +' ' | |
| 57 | EN D | |
| 58 | IF (@FACILIT Y_REGION I S NOT NULL ) | |
| 59 | SET @SQL_WHERE = @SQL_WH ERE + ' AN D [TR].[FA CILITY_REG ION] = '+ @FACILITY_ REGION +' ' | |
| 60 | IF (@FACILIT Y_VISN IS NOT NULL) | |
| 61 | SET @SQL_WHERE = @SQL_WH ERE + ' AN D [TR].[FA CILITY_VIS N] = '+ @F ACILITY_VI SN +' ' | |
| 62 | ||
| 63 | IF (@IS_CURRE NT_WAITING _LIST = 1) | |
| 64 | SET @SQL_WHERE = @SQL_WH ERE + ' AN D TE.ACT_I D IS NULL' | |
| 65 | EL SE | |
| 66 | SET @SQL_WHERE = @SQL_WH ERE + ' AN D (TE.ACT_ ID IS NULL OR TE.ACT _ID IS NOT NULL AND AEVN.CREAT ION_DATE > ''' + CON VERT(VARCH AR(25), @C REATION_DA TE, 126) + ''')' | |
| 67 | ||
| 68 | IF (@IS_DISPL AY_ONLY_NA TIONAL_PAT IENTS = 1) | |
| 69 | SET @SQL_WHERE = @SQL_WH ERE + ' AN D TR.IS_NA TIONAL_WAI T_LIST = 1 ' | |
| 70 | ||
| 71 | ||
| 72 | SE T @SQL = C OALESCE(@S QL,'') + ' | |
| 73 | SELE CT DISTINC T | |
| 74 | [A].[I D] AS [ACT _ID], | |
| 75 | [A].[C REATION_DA TE] AS [CR EATION_DAT E], | |
| 76 | [A].[C ANCELED_DA TE] AS [CA NCELED_DAT E], | |
| 77 | [A].[P ARENT_ACT_ ID] AS [PA RENT_ACT_I D], | |
| 78 | [A].[F LOW_ID] AS [FLOW_ID] , | |
| 79 | [A].[D OMAIN_ID] AS [DOMAIN _ID], | |
| 80 | [A].[P ATIENT_UID ] AS [PATI ENT_UID], | |
| 81 | [TE].[ ADMISSION_ FACILITY_U ID] AS [EV N_ADMISSIO N_FACILITY _UID], | |
| 82 | [TE].[ DISPOSITIO N_DATE] AS [EVN_DISP OSITION_DA TE], | |
| 83 | [ERA]. [CODE] AS [REQ_ERA_C ODE], | |
| 84 | [ERA]. [CODE_SYST EM] AS [RE Q_ERA_CODE _SYSTEM], | |
| 85 | [ERA]. [CODE_SYST EM_NAME] A S [REQ_ERA _CODE_SYST EM_NAME], | |
| 86 | [ERA]. [DISPLAY_N AME] AS [R EQ_ERA_DIS PLAY_NAME] , | |
| 87 | [TR].[ FACILITY_U ID] AS [RE Q_FACILITY _UID], | |
| 88 | [TR].[ COMMENTS] AS [REQ_CO MMENTS], | |
| 89 | [CC].[ CODE] AS [ REQ_CONTRA CT_CODE], | |
| 90 | [CC].[ CODE_SYSTE M] AS [REQ _CONTRACT_ CODE_SYSTE M], | |
| 91 | [CC].[ CODE_SYSTE M_NAME] AS [REQ_CONT RACT_CODE_ SYSTEM_NAM E], | |
| 92 | [CC].[ DISPLAY_NA ME] AS [RE Q_CONTRACT _DISPLAY_N AME], | |
| 93 | [TR].[ DIAGNOSIS] AS [REQ_D IAGNOSIS], | |
| 94 | [TR].[ CURRENT_LO CATION] AS [REQ_CURR ENT_LOCATI ON], | |
| 95 | [REQSP ].[CODE] A S [REQ_SPE CIALITY_CO DE], | |
| 96 | [REQSP ].[CODE_SY STEM] AS [ REQ_SPECIA LITY_CODE_ SYSTEM], | |
| 97 | [REQSP ].[CODE_SY STEM_NAME] AS [REQ_S PECIALITY_ CODE_SYSTE M_NAME], | |
| 98 | [REQSP ].[DISPLAY _NAME] AS [REQ_SPECI ALITY_DISP LAY_NAME], | |
| 99 | [TR].[ FACILITY_R EGION] AS [REGION_CO DE], | |
| 100 | [TR].[ FACILITY_V ISN] AS [V ISN_CODE], | |
| 101 | [TR].[ LOCATION_A DMISSION_D ATE] AS [E VN_EVENT_D ATE], | |
| 102 | [TR].[ IS_NATIONA L_WAIT_LIS T] AS [IS_ NATIONAL_W AIT_LIST], | |
| 103 | [TR].[ TYPE_OF_BE D_WARD] AS [TYPE_OF_ BED_WARD], | |
| 104 | [TR].[ IS_FEE] AS [IS_FEE], | |
| 105 | [TR].[ TRANSFER_C OORDINATOR ] AS [TRAN SFER_COORD INATOR], | |
| 106 | [TR].[ TRANSFER_C OORDINATOR _PHONE] AS [TRANSFER _COORDINAT OR_PHONE] | |
| 107 | FROM ACT A | |
| 108 | INNER JOIN TRANS FER_REQ TR ON A.ID = TR.ACT_ID | |
| 109 | LEFT J OIN ACT AS AEVN ON A EVN.PARENT _ACT_ID = TR.ACT_ID | |
| 110 | LEFT J OIN TRANSF ER_EVN AS TE ON TE.A CT_ID = AE VN.ID | |
| 111 | LEFT J OIN CONCEP T AS CC ON TR.CONTRA CT_ID = CC .ID | |
| 112 | LEFT J OIN CONCEP T AS ERA O N TR.ERA_I D = ERA.ID | |
| 113 | LEFT J OIN CONCEP T AS REQSP ON TR.SPE CIALITY_ID = REQSP.I D | |
| 114 | ' + @S QL_SECURIT Y + ' | |
| 115 | WHERE 1 = 1 ' + @SQL_WHERE + ' | |
| 116 | ORDE R BY [A].[ ID] ' | |
| 117 | ||
| 118 | EXEC UTE sp_exe cutesql @S QL | |
| 119 | ||
| 120 | END |
Araxis Merge (but not the data content of this report) is Copyright © 1993-2016 Araxis Ltd (www.araxis.com). All rights reserved.