663. EPMO Open Source Coordination Office Redaction File Detail Report

Produced by Araxis Merge on 10/26/2017 10:44:44 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.

663.1 Files compared

# Location File Last Modified
1 OSCIF_BMS_v2_iter 2_September_2017.zip\BMS_Cand\Source\Sources\Database\BMSv2Updates\2.1.6.3\Reports DROP_CREATE_BMS_HISTORY_usp_Rpt_IconUsageHistory.sql Wed Oct 18 19:06:46 2017 UTC
2 OSCIF_BMS_v2_iter 2_September_2017.zip\BMS_Cand\Source\Sources\Database\BMSv2Updates\2.1.6.3\Reports DROP_CREATE_BMS_HISTORY_usp_Rpt_IconUsageHistory.sql Thu Oct 26 19:34:32 2017 UTC

663.2 Comparison summary

Description Between
Files 1 and 2
Text Blocks Lines
Unchanged 2 346
Changed 1 10
Inserted 0 0
Removed 0 0

663.3 Comparison options

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

663.4 Active regular expressions

No regular expressions were active.

663.5 Comparison detail

  1   USE [BMS_H ISTORY]
  2   GO
  3  
  4   /****** Ob ject:  Sto redProcedu re [dbo].[ usp_Rpt_Ic onUsageHis tory]    S cript Date : 6/14/201 6 9:13:58  AM ******/
  5   DROP PROCE DURE [dbo] .[usp_Rpt_ IconUsageH istory]
  6   GO
  7  
  8   /****** Ob ject:  Sto redProcedu re [dbo].[ usp_Rpt_Ic onUsageHis tory]    S cript Date : 6/14/201 6 9:13:58  AM ******/
  9   SET ANSI_N ULLS ON
  10   GO
  11  
  12   SET QUOTED _IDENTIFIE R ON
  13   GO
  14  
  15  
  16   --exec usp _Rpt_IconU sageHistor y @UserID= N' DNS ',@FACILIT IES_IDS=N' 144;143_1, 145;142_2, 146;141_3, 147;140_4, 148;139_5, 149;138_6, 150;137_7, 151;136_8, 161;135_9, 162;134_10 ,163;133_1 1,164;132_ 12,165;131 _13,166;13 0_14,167;1 29_15,168; 128_16,169 ;127_17,17 0;126_18,1 71;125_19, 172;124_20 ,173;123_2 1,174;122_ 22,175;121 _23,176;12 0_24,177;1 19_25,178; 118_26,179 ;117_27,18 0;116_28,1 81;115_29, 182;114_30 ,183;113_3 1,184;112_ 32,185;111 _33,186;11 0_34,187;1 09_35,188; 108_36,189 ;107_37,19 0;106_38,1 91;105_39, 192;104_40 ,193;103_4 1,194;102_ 42,195;101 _43,196;10 0_44,197;9 9_45,198;9 8_46,199;9 7_47,200;9 6_48,201;9 5_49,202;9 4_50,203;9 3_51,204;9 2_52,205;9 1_53,206;9 0_54,207;8 9_55,208;8 8_56,209;8 7_57,210;8 6_58,211;8 5_59,212;8 4_60,213;8 3_61,214;8 2_62,215;8 1_63,216;8 0_64,217;7 9_65,218;7 8_66,219;7 7_67,220;7 6_68,221;7 5_69,222;7 4_70,223;7 3_71,224;7 2_72,225;7 1_73,226;7 0_74,227;6 9_75,228;6 8_76,229;6 7_77,230;6 6_78,231;6 5_79,232;6 4_80,233;6 3_81,234;6 2_82,235;6 1_83,236;6 0_84,237;5 9_85,238;5 8_86,239;5 7_87,240;5 6_88,241;5 5_89,242;5 4_90,243;5 3_91,244;5 2_92,245;5 1_93,246;5 0_94,247;4 9_95,248;4 8_96,249;4 7_97,250;4 6_98,251;4 5_99,252;4 4_100,253; 43_101,254 ;42_102,25 5;41_103,2 56;40_104, 257;39_105 ,258;38_10 6,259;37_1 07,260;36_ 108,261;35 _109,262;3 4_110,263; 33_111,264 ;32_112,26 5;31_113,2 66;30_114, 267;29_115 ,268;28_11 6,269;27_1 17,270;26_ 118,271;25 _119,272;2 4_120,273; 23_121,274 ;22_122,27 5;21_123,2 76;20_124, 277;19_125 ,278;18_12 6,279;17_1 27,280;16_ 128,281;15 _129,282;1 4_130,283; 13_131,284 ;12_132,28 5;11_133,2 86;10_134, 287;9_135, 295;8_136, 296;7_137, 297;6_138, 298;5_139, 299;4_140, 300;3_141, 301;2_142, 302;1_143' ,@ICON_TYP ES=N'18;-2 _27_1,19;- 3_26_2,20; -1_25_3,21 ;-2_24_4,2 3;-2_23_5, 24;-1_22_6 ,26;-2_21_ 7,27;-1_20 _8,29;-2_1 9_9,30;-1_ 18_10,32;- 2_17_11,33 ;-1_16_12, 35;-2_15_1 3,37;-2_14 _14,39;-2_ 13_15,42;- 2_12_16,44 ;-2_11_17, 45;-2_10_1 8,46;-2_9_ 19,47;-2_8 _20,48;-2_ 7_21,49;-2 _6_22,50;- 2_5_23,51; -1_4_24,52 ;-2_3_25,5 3;-1_2_26, 54;-1_1_27 ',@DATE_FR OM = '1/1/ 2008', @DA TE_TO='12/ 29/2016',  @ICON_GROU P=N'-3'
  17   --exec usp _Rpt_IconU sageHistor y @UserID= N' DNS ',@FACILIT IES_IDS=N' 144;143_1, 146;141_3, 162;134_10 ,147;140_4 ,163;133_1 1,164;132_ 12,165;131 _13,166;13 0_14,148;1 39_5,145;1 42_2,149;1 38_6,150;1 37_7,151;1 36_8,168;1 28_16,167; 129_15,197 ;99_45,198 ;98_46,199 ;97_47,169 ;127_17,17 0;126_18,1 71;125_19, 172;124_20 ,200;96_48 ,201;95_49 ,202;94_50 ,203;93_51 ,173;123_2 1,174;122_ 22,175;121 _23,176;12 0_24,204;9 2_52,205;9 1_53,206;9 0_54,207;8 9_55,208;8 8_56,177;1 19_25,178; 118_26,179 ;117_27,18 0;116_28,2 09;87_57,2 10;86_58,2 24;72_72,2 25;71_73,1 81;115_29, 182;114_30 ,183;113_3 1,184;112_ 32,226;70_ 74,227;69_ 75,228;68_ 76,229;67_ 77,185;111 _33,186;11 0_34,187;1 09_35,188; 108_36,230 ;66_78,231 ;65_79,232 ;64_80,233 ;63_81,234 ;62_82,189 ;107_37,19 0;106_38,1 91;105_39, 192;104_40 ,235;61_83 ,236;60_84 ,237;59_85 ,238;58_86 ,193;103_4 1,194;102_ 42,195;101 _43,196;10 0_44,253;4 3_101,254; 42_102,255 ;41_103,25 6;40_104,2 11;85_59,2 12;84_60,2 13;83_61,2 14;82_62,2 57;39_105, 258;38_106 ,259;37_10 7,260;36_1 08,261;35_ 109,215;81 _63,216;80 _64,217;79 _65,218;78 _66,262;34 _110,263;3 3_111,264; 32_112,265 ;31_113,21 9;77_67,22 0;76_68,22 1;75_69,22 2;74_70,26 6;30_114,2 67;29_115, 268;28_116 ,269;27_11 7,223;73_7 1,239;57_8 7,240;56_8 8,241;55_8 9,242;54_9 0,270;26_1 18,271;25_ 119,272;24 _120,273;2 3_121,243; 53_91,244; 52_92,245; 51_93,246; 50_94,302; 1_143,274; 22_122,275 ;21_123,27 6;20_124,2 77;19_125, 247;49_95, 248;48_96, 249;47_97, 161;135_9, 250;46_98, 278;18_126 ,279;17_12 7,280;16_1 28,295;8_1 36,251;45_ 99,252;44_ 100,281;15 _129,282;1 4_130,283; 13_131,296 ;7_137,297 ;6_138,298 ;5_139,299 ;4_140,284 ;12_132,28 5;11_133,2 86;10_134, 287;9_135, 300;3_141, 301;2_142' ,@ICON_TYP ES=N'27;-1 _6_3',@DAT E_FROM='20 16-05-27 0 0:00:01',@ DATE_TO='2 016-05-27  23:59:59', @ICON_GROU P=N'-1'
  18   --exec usp _Rpt_IconU sageHistor y @UserID= N' DNS ',@FACILIT IES_IDS=N' 144;143_1, 146;141_3, 162;134_10 ,147;140_4 ,163;133_1 1,164;132_ 12,165;131 _13,166;13 0_14,148;1 39_5,145;1 42_2,149;1 38_6,150;1 37_7,151;1 36_8,168;1 28_16,167; 129_15,197 ;99_45,198 ;98_46,199 ;97_47,169 ;127_17,17 0;126_18,1 71;125_19, 172;124_20 ,200;96_48 ,201;95_49 ,202;94_50 ,203;93_51 ,173;123_2 1,174;122_ 22,175;121 _23,176;12 0_24,204;9 2_52,205;9 1_53,206;9 0_54,207;8 9_55,208;8 8_56,177;1 19_25,178; 118_26,179 ;117_27,18 0;116_28,2 09;87_57,2 10;86_58,2 24;72_72,2 25;71_73,1 81;115_29, 182;114_30 ,183;113_3 1,184;112_ 32,226;70_ 74,227;69_ 75,228;68_ 76,229;67_ 77,185;111 _33,186;11 0_34,187;1 09_35,188; 108_36,230 ;66_78,231 ;65_79,232 ;64_80,233 ;63_81,234 ;62_82,189 ;107_37,19 0;106_38,1 91;105_39, 192;104_40 ,235;61_83 ,236;60_84 ,237;59_85 ,238;58_86 ,193;103_4 1,194;102_ 42,195;101 _43,196;10 0_44,253;4 3_101,254; 42_102,255 ;41_103,25 6;40_104,2 11;85_59,2 12;84_60,2 13;83_61,2 14;82_62,2 57;39_105, 258;38_106 ,259;37_10 7,260;36_1 08,261;35_ 109,215;81 _63,216;80 _64,217;79 _65,218;78 _66,262;34 _110,263;3 3_111,264; 32_112,265 ;31_113,21 9;77_67,22 0;76_68,22 1;75_69,22 2;74_70,26 6;30_114,2 67;29_115, 268;28_116 ,269;27_11 7,223;73_7 1,239;57_8 7,240;56_8 8,241;55_8 9,242;54_9 0,270;26_1 18,271;25_ 119,272;24 _120,273;2 3_121,243; 53_91,244; 52_92,245; 51_93,246; 50_94,302; 1_143,274; 22_122,275 ;21_123,27 6;20_124,2 77;19_125, 247;49_95, 248;48_96, 249;47_97, 161;135_9, 250;46_98, 278;18_126 ,279;17_12 7,280;16_1 28,295;8_1 36,251;45_ 99,252;44_ 100,281;15 _129,282;1 4_130,283; 13_131,296 ;7_137,297 ;6_138,298 ;5_139,299 ;4_140,284 ;12_132,28 5;11_133,2 86;10_134, 287;9_135, 300;3_141, 301;2_142' ,@ICON_TYP ES=N'32;-2 _13_6',@DA TE_FROM='2 016-05-27  00:00:01', @DATE_TO=' 2016-05-27  23:59:59' ,@ICON_GRO UP=N'-2'
  19   --exec usp _Rpt_IconU sageHistor y @UserID= N' DNS ',@FACILIT IES_IDS=N' 144;143_1, 146;141_3, 162;134_10 ,147;140_4 ,163;133_1 1,164;132_ 12,165;131 _13,166;13 0_14,148;1 39_5,145;1 42_2,149;1 38_6,150;1 37_7,151;1 36_8,168;1 28_16,167; 129_15,197 ;99_45,198 ;98_46,199 ;97_47,169 ;127_17,17 0;126_18,1 71;125_19, 172;124_20 ,200;96_48 ,201;95_49 ,202;94_50 ,203;93_51 ,173;123_2 1,174;122_ 22,175;121 _23,176;12 0_24,204;9 2_52,205;9 1_53,206;9 0_54,207;8 9_55,208;8 8_56,177;1 19_25,178; 118_26,179 ;117_27,18 0;116_28,2 09;87_57,2 10;86_58,2 24;72_72,2 25;71_73,1 81;115_29, 182;114_30 ,183;113_3 1,184;112_ 32,226;70_ 74,227;69_ 75,228;68_ 76,229;67_ 77,185;111 _33,186;11 0_34,187;1 09_35,188; 108_36,230 ;66_78,231 ;65_79,232 ;64_80,233 ;63_81,234 ;62_82,189 ;107_37,19 0;106_38,1 91;105_39, 192;104_40 ,235;61_83 ,236;60_84 ,237;59_85 ,238;58_86 ,193;103_4 1,194;102_ 42,195;101 _43,196;10 0_44,253;4 3_101,254; 42_102,255 ;41_103,25 6;40_104,2 11;85_59,2 12;84_60,2 13;83_61,2 14;82_62,2 57;39_105, 258;38_106 ,259;37_10 7,260;36_1 08,261;35_ 109,215;81 _63,216;80 _64,217;79 _65,218;78 _66,262;34 _110,263;3 3_111,264; 32_112,265 ;31_113,21 9;77_67,22 0;76_68,22 1;75_69,22 2;74_70,26 6;30_114,2 67;29_115, 268;28_116 ,269;27_11 7,223;73_7 1,239;57_8 7,240;56_8 8,241;55_8 9,242;54_9 0,270;26_1 18,271;25_ 119,272;24 _120,273;2 3_121,243; 53_91,244; 52_92,245; 51_93,246; 50_94,302; 1_143,274; 22_122,275 ;21_123,27 6;20_124,2 77;19_125, 247;49_95, 248;48_96, 249;47_97, 161;135_9, 250;46_98, 278;18_126 ,279;17_12 7,280;16_1 28,295;8_1 36,251;45_ 99,252;44_ 100,281;15 _129,282;1 4_130,283; 13_131,296 ;7_137,297 ;6_138,298 ;5_139,299 ;4_140,284 ;12_132,28 5;11_133,2 86;10_134, 287;9_135, 300;3_141, 301;2_142' ,@ICON_TYP ES=N'51;-1 _3_6,30;-1 _5_4,53;-1 _2_7,54;-1 _1_8,33;-1 _4_5,20;-1 _8_1,27;-1 _6_3,24;-1 _7_2',@DAT E_FROM='20 16-05-27 0 0:00:01',@ DATE_TO='2 016-05-27  23:59:59', @ICON_GROU P=N'-2'
  20   --exec usp _Rpt_IconU sageHistor y @UserID= N'
D NS     HORND@ DNS             ',@FACILIT IES_IDS=N' 153;141_2, 155;139_4, 152;142_1, 156;138_5, 157;137_6, 158;136_7, 159;135_8, 160;134_9, 161;133_10 ,154;140_3 ,162;132_1 1,163;131_ 12,164;130 _13,165;12 9_14,166;1 28_15,167; 127_16,168 ;126_17,16 9;125_18,1 70;124_19, 171;123_20 ,172;122_2 1,173;121_ 22,174;120 _23,175;11 9_24,176;1 18_25,177; 117_26,178 ;116_27,17 9;115_28,1 80;114_29, 181;113_30 ,182;112_3 1,183;111_ 32,184;110 _33,185;10 9_34,186;1 08_35,187; 107_36,188 ;106_37,18 9;105_38,1 90;104_39, 191;103_40 ,192;102_4 1,193;101_ 42,194;100 _43,195;99 _44,196;98 _45,197;97 _46,198;96 _47,199;95 _48,200;94 _49,201;93 _50,202;92 _51,203;91 _52,204;90 _53,205;89 _54,206;88 _55,207;87 _56,208;86 _57,209;85 _58,210;84 _59,211;83 _60,212;82 _61,213;81 _62,214;80 _63,215;79 _64,216;78 _65,217;77 _66,218;76 _67,219;75 _68,220;74 _69,221;73 _70,222;72 _71,223;71 _72,224;70 _73,225;69 _74,226;68 _75,227;67 _76,228;66 _77,229;65 _78,230;64 _79,231;63 _80,232;62 _81,233;61 _82,234;60 _83,235;59 _84,236;58 _85,237;57 _86,238;56 _87,239;55 _88,240;54 _89,241;53 _90,242;52 _91,243;51 _92,244;50 _93,245;49 _94,246;48 _95,247;47 _96,248;46 _97,249;45 _98,250;44 _99,251;43 _100,252;4 2_101,253; 41_102,254 ;40_103,25 5;39_104,2 56;38_105, 257;37_106 ,258;36_10 7,259;35_1 08,260;34_ 109,261;33 _110,262;3 2_111,263; 31_112,264 ;30_113,26 5;29_114,2 93;1_142,2 66;28_115, 267;27_116 ,268;26_11 7,269;25_1 18,270;24_ 119,271;23 _120,272;2 2_121,273; 21_122,274 ;20_123,27 5;19_124,2 76;18_125, 277;17_126 ,278;16_12 7,279;15_1 28,280;14_ 129,281;13 _130,282;1 2_131,283; 11_132,284 ;10_133,28 5;9_134,28 6;8_135,28 7;7_136,28 8;6_137,28 9;5_138,29 0;4_139,29 1;3_140,29 2;2_141',@ ICON_TYPES =N'59;-1_1 _41,51;-1_ 9_33,57;-1 _3_39,30;- 1_29_13,53 ;-1_7_35,5 4;-1_6_36, 33;-1_26_1 6,20;-1_39 _3,27;-1_3 2_10,24;-1 _35_7,56;- 2_4_38,35; -2_24_18,3 2;-2_27_15 ,48;-2_12_ 30,26;-2_3 3_9,21;-2_ 38_4,47;-2 _13_29,42; -2_17_25,1 8;-2_41_1, 37;-2_22_2 0,50;-2_10 _32,29;-2_ 30_12,52;- 2_8_34,44; -2_16_26,2 3;-2_36_6, 39;-2_20_2 2,45;-2_15 _27,46;-2_ 14_28,55;- 2_5_37,58; -2_2_40,49 ;-2_11_31, 22;-3_37_5 ,25;-3_34_ 8,28;-3_31 _11,34;-3_ 25_17,36;- 3_23_19,31 ;-3_28_14, 38;-3_21_2 1,19;-3_40 _2,41;-3_1 8_24,40;-3 _19_23',@D ATE_FROM=' 2016-06-01  00:00:01' ,@DATE_TO= '2016-06-1 2 23:59:59 ',@ICON_GR OUP=N'-1,- 2,-3'
  21   CREATE PRO CEDURE [db o].[usp_Rp t_IconUsag eHistory] 
  22           @U serID NVAR CHAR(500),
  23           @F ACILITIES_ IDS NVARCH AR(MAX) =  '',
  24           @I CON_TYPES  NVARCHAR(M AX),
  25           @D ATE_FROM D ATETIME,
  26           @D ATE_TO DAT ETIME,
  27           @I CON_GROUP  nvarchar(2 0)
  28  
  29   AS
  30   BEGIN
  31  
  32           /* SELECT NUL L as CODE,  NULL as [ DESCRIPTIO N], NULL a s FLAG_ID,  NULL as I CON_NAME,  NULL as AC TIVE, NULL  as PT_REC , 
  33                       N ULL as BED _REC, NULL  as IMAGE_ BYTES, NUL L as SHORT _DESCRIPTI ON, NULL a s IMAGE_NA ME, NULL a s SUBGROUP ,
  34                       N ULL as WAR D, NULL as  BED, NULL  as PATIEN T */
  35  
  36           DE CLARE @TBL _FACILITY  TABLE (ID  INT PRIMAR Y KEY)
  37           DE CLARE @TBL _ICON_TYPE  TABLE (CO DE VARCHAR (250) PRIM ARY KEY)
  38           DE CLARE @TBL _ICON_GROU P TABLE (C ODE VARCHA R(20) PRIM ARY KEY)
  39           DE CLARE @TBL _ICON_SUBG ROUP TABLE  (NAME VAR CHAR(30) P RIMARY KEY )                  
  40           DE CLARE @TBL _ENTITY TA BLE (PK_EN TITY INT P RIMARY KEY , IDENTIFI ER NVARCHA R(250))           
  41  
  42   --LEFT JOI N BMS_EIS. dbo.ENTITY  AS E1 ON  E1.IDENTIF IER = ICON _ASSOCIATI ON.PATIENT _UID
  43   --LEFT JOI N BMS_EIS. dbo.EHL7_P ERSON AS P ERSON_P ON  PERSON_P. PFK_PERSON  = E1.PK_E NTITY
  44  
  45           IN SERT INTO  @TBL_ENTIT Y 
  46                    SELE CT PK_ENTI TY, IDENTI FIER FROM  BMS_EIS.db o.ENTITY
  47  
  48           IN SERT INTO  @TBL_FACIL ITY(ID) 
  49           SE LECT CASE  WHEN CHARI NDEX(';',F .ID) > 0 T HEN CAST(S UBSTRING(F .ID,1, CHA RINDEX(';' ,F.ID) -1)  AS INT) 
  50                                 EL SE CAST(F. ID AS INT)  
  51                       E ND
  52           FR OM (SELECT   VALUE AS  ID FROM d bo.ufn_Spl it(@FACILI TIES_IDS,  ','))F
  53  
  54           IN SERT INTO  @TBL_ICON_ TYPE(CODE)  
  55           SE LECT CONVE RT(VARCHAR (20), VALU E) FROM db o.ufn_Spli t(@ICON_TY PES, ',')
  56           
  57           IN SERT INTO  @TBL_ICON_ GROUP(CODE )
  58           SE LECT CONVE RT(VARCHAR (50), VALU E) FROM db o.ufn_Spli t(@ICON_GR OUP, ',')
  59  
  60           IN SERT INTO  @TBL_ICON_ SUBGROUP ( NAME)
  61           SE LECT 
  62                    CASE  WHEN IG.C ODE = '-1'  THEN 'EME RGENCY_ICO N' 
  63                              WHEN  IG.CODE =  '-2' THEN  'STANDARD_ ICON'
  64                              WHEN  IG.CODE =  '-3' THEN  'SITE_CONF IGURABLE_I CON'
  65                    END
  66           FR OM @TBL_IC ON_GROUP I G
  67  
  68           DE CLARE @TBL _ICONS tab le (id int  PRIMARY K EY)
  69           
  70           IN SERT INTO  @TBL_ICONS (id)
  71           SE LECT CASE  WHEN CHARI NDEX(';',c ode) > 0 t hen 
  72                             substr ing(code,1 ,charindex (';',code)  -1) 
  73                             else c ode end
  74           fr om @TBL_IC ON_TYPE
  75                             
  76           IF  EXISTS(SE LECT 1  FR OM @TBL_FA CILITY)
  77                    BEGI N
  78                    
  79                    CREA TE TABLE # TBL_TEMP 
  80                    (
  81                             ID INT  IDENTITY( 1,1) PRIMA RY KEY,
  82                             CODE_B  NVARCHAR( 250),
  83                             CODE_P  NVARCHAR( 250),
  84                             FLAG_I D INT,
  85                             [DESCR IPTION] NV ARCHAR(250 ), 
  86                             ICON_N AME NVARCH AR(250), 
  87                             ACTIVE  CHAR(1), 
  88                             PT_REC  NVARCHAR( 10), 
  89                             BED_RE C NVARCHAR (10),
  90                             IMAGE_ BYTES nvar char(max),
  91                             SHORT_ DESCRIPTIO N NVARCHAR (250),
  92                             IMAGE_ NAME nvarc har(250),
  93                             SUBGRO UP nvarcha r(250),
  94                             PATIEN T_P nvarch ar(250),
  95                             PATIEN T_B nvarch ar(250),
  96                             BED_B  nvarchar(2 0),
  97                             WARD_B  nvarchar( 100),
  98                             BED_P  nvarchar(2 0),
  99                             WARD_P  nvarchar( 100)
  100                    )
  101  
  102                    INSE RT INTO #T BL_TEMP(CO DE_B, CODE _P, FLAG_I D, ICON_NA ME, [DESCR IPTION],   ACTIVE, PT _REC, BED_ REC, IMAGE _BYTES, 
  103                                                                  SH ORT_DESCRI PTION, IMA GE_NAME, S UBGROUP, P ATIENT_P,  PATIENT_B,  BED_B, WA RD_B, BED_ P, WARD_P)           
  104                             SELECT   SUBSTRIN G(ORG_B.NA ME, 4,3) a s CODE_B,
  105                                      SUBSTRIN G(ORG_P.NA ME, 4,3) A S CODE_P, 
  106                                      ISNULL(I CON_FLAG.I D, IFF.ICO N_FLAG_ID)  as FLAG_I D, 
  107                                      ISNULL(I CON_FLAG.[ SHORT_DESC RIPTION],  IFF.DESCRI PTION) as  [DESCRIPTI ON],
  108                                      ISNULL(I CON_FLAG.I CON_NAME,  IFF.ICON_N AME) as IC ON_NAME,
  109                                      'Y' AS A CTIVE, 
  110                                      CASE WHE N ICON_ASS OCIATION.P ATIENT_UID  IS NOT NU LL THEN 'Y ' ELSE 'N'  END AS PT _REC,
  111                                      CASE WHE N ICON_ASS OCIATION.B ED_UID IS  NOT NULL T HEN 'Y' EL SE 'N' END  AS BED_RE C,
  112                                      ISNULL(I CON_FLAG.I MAGE_BYTES , ICON_FLA G2.IMAGE_B YTES) as I MAGE_BYTES ,
  113                                      ISNULL(I CON_FLAG.S HORT_DESCR IPTION, IF F.DESCRIPT ION) AS SH ORT_DESCRI PTION,
  114                                      ISNULL(I CON_FLAG.I MAGE_NAME,  IFF.ICON_ NAME) as I MAGE_NAME,
  115                                      ISNULL(I CON_FLAG.S UBGROUP, I CON_FLAG2. SUBGROUP)  as SUBGROU P,
  116                                      PERSON_P .[NAME_FAM ILY] + SUB STRING(S1. [IDENTIFIE R_EXTENSIO N], 7, 5)  AS PATIENT _P,
  117                                      PERSON_B .[NAME_FAM ILY] + SUB STRING(S2. [IDENTIFIE R_EXTENSIO N], 7, 5)  AS PATIENT _B,
  118                                      BED_PLAC EB.NAME AS  BED_B,
  119                                      WARD_PLA CEB.NAME A S WARD_B,
  120                                      BED_PLAC EP.NAME AS  BED_P,
  121                                      WARD_PLA CEP.NAME a s WARD_P
  122                             FROM I CON_ASSOCI ATION_H AS  ICON_ASSO CIATION
  123                             LEFT J OIN ICON_F LAG_H ICON _FLAG ON I CON_ASSOCI ATION.ICON _FLAG_ID =  ICON_FLAG .ID
  124                             INNER  JOIN @TBL_ ICONS ICON S ON ICON_ ASSOCIATIO N.ICON_FLA G_ID = ICO NS.ID
  125                             LEFT J OIN ICON_F LAG_FACILI TY_H IFF O N ICON_ASS OCIATION.I CON_FLAG_F ACILITY_ID  = IFF.ID
  126                             LEFT J OIN ICON_F LAG_H ICON _FLAG2 ON  IFF.ICON_F LAG_ID = I CON_FLAG2. ID
  127                             LEFT J OIN ADMISS ION_EVN_H  ADM_B ON I CON_ASSOCI ATION.BED_ UID = ADM_ B.BED_UID
  128                             LEFT J OIN @TBL_E NTITY AS E 1 ON E1.ID ENTIFIER =  ICON_ASSO CIATION.PA TIENT_UID
  129                             LEFT J OIN BMS_EI S.dbo.EHL7 _PERSON AS  PERSON_P  ON PERSON_ P.PFK_PERS ON = E1.PK _ENTITY
  130                             LEFT J OIN BMS_EI S.dbo.EHL7 _UID AS S1  ON S1.FK_ ENTITY = P ERSON_P.PF K_PERSON A ND S1.IDEN TIFIER_ROO T = 'SSN'
  131                             LEFT J OIN @TBL_E NTITY AS E 2 ON E2.ID ENTIFIER =  ICON_ASSO CIATION.BE D_UID
  132                             LEFT J OIN BMS_EI S.dbo.EHL7 _PLACE AS  BED_PLACEB  ON BED_PL ACEB.PFK_P LACE = E2. PK_ENTITY
  133                             LEFT J OIN @TBL_E NTITY AS E 3 ON E3.ID ENTIFIER =  ADM_B.WAR D_UID
  134                             LEFT J OIN BMS_EI S.dbo.EHL7 _PLACE AS  WARD_PLACE B ON WARD_ PLACEB.PFK _PLACE =E3 .PK_ENTITY
  135                             LEFT J OIN ADMISS ION_EVN_H  ADM_P ON I CON_ASSOCI ATION.PATI ENT_UID =  ADM_P.PATI ENT_UID
  136                             LEFT J OIN @TBL_E NTITY AS E 4 ON E4.ID ENTIFIER =  ADM_P.BED _UID 
  137                             LEFT J OIN BMS_EI S.dbo.EHL7 _PLACE AS  BED_PLACEP  ON BED_PL ACEP.PFK_P LACE = E4. PK_ENTITY
  138                             LEFT J OIN @TBL_E NTITY AS E 5 ON E5.ID ENTIFIER =  ADM_P.WAR D_UID 
  139                             LEFT J OIN BMS_EI S.dbo.EHL7 _PLACE AS  WARD_PLACE P ON WARD_ PLACEP.PFK _PLACE = E 5.PK_ENTIT Y
  140                             LEFT J OIN @TBL_E NTITY AS E 6 ON E6.ID ENTIFIER =  ADM_B.VIS TA_SITE_UI D
  141                             LEFT J OIN BMS_EI S.dbo.EHL7 _ORGANIZAT ION ORG_B  ON ORG_B.P FK_ORGANIZ ATION = E6 .PK_ENTITY
  142                             LEFT J OIN @TBL_E NTITY AS E 7 ON E7.ID ENTIFIER =  ADM_P.VIS TA_SITE_UI D
  143                             LEFT J OIN BMS_EI S.dbo.EHL7 _ORGANIZAT ION ORG_P  ON ORG_P.P FK_ORGANIZ ATION = E7 .PK_ENTITY
  144                             LEFT J OIN @TBL_E NTITY AS E 8 ON E8.ID ENTIFIER =  ADM_B.PAT IENT_UID
  145                             LEFT J OIN BMS_EI S.dbo.EHL7 _PERSON AS  PERSON_B  ON PERSON_ B.PFK_PERS ON = E8.PK _ENTITY
  146                             LEFT J OIN BMS_EI S.dbo.EHL7 _UID AS S2  ON S2.FK_ ENTITY = P ERSON_B.PF K_PERSON A ND S2.IDEN TIFIER_ROO T = 'SSN'
  147                    WHER E ICON_ASS OCIATION.D ATE BETWEE N @DATE_FR OM AND @DA TE_TO 
  148                    OPTI ON (MAXDOP  1)                         
  149                    -- c ount how m any patien ts or beds  have the  icon assoc iated
  150                    
  151                    sele ct DISTINC T ISNULL(I SNULL(CODE _B, CODE_P ), 'N/A')  AS CODE, 
  152                                [DE SCRIPTION] , 
  153                                FLA G_ID, ICON _NAME, ACT IVE,
  154                                PT_ REC,
  155                                BED _REC,
  156                                IMA GE_BYTES,
  157                                SHO RT_DESCRIP TION,
  158                                IMA GE_NAME,
  159                                SUB GROUP,
  160                                ISN ULL(WARD_B , WARD_P)  as WARD,
  161                                ISN ULL(BED_B,  BED_P) as  BED,
  162                                ISN ULL(PATIEN T_B, PATIE NT_P) as P ATIENT
  163                    from  #TBL_TEMP  T
  164                    INNE R JOIN @TB L_ICON_SUB GROUP ISG  ON T.SUBGR OUP = ISG. NAME
  165                    
  166                    grou p by ISNUL L(CODE_B,  CODE_P), [ DESCRIPTIO N], FLAG_I D, ICON_NA ME, ACTIVE , BED_REC,  PT_REC, I MAGE_BYTES , SHORT_DE SCRIPTION,  IMAGE_NAM E, SUBGROU P, ISNULL( WARD_B, WA RD_P),ISNU LL(PATIENT _B, PATIEN T_P),
  167                                ISN ULL(BED_B,  BED_P)
  168                    orde r by CODE,  [DESCRIPT ION]
  169           
  170   --               sele ct * from  @TBL_ICONS
  171                    DROP  TABLE #TB L_TEMP
  172                    
  173           EN D
  174   END
  175  
  176   GO
  177  
  178  

Araxis Merge (but not the data content of this report) is Copyright © 1993-2016 Araxis Ltd (www.araxis.com). All rights reserved.