671. 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.

671.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 usp_Rpt_PPBPUsageAuditLog_Facility.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 usp_Rpt_PPBPUsageAuditLog_Facility.sql Thu Oct 26 19:36:29 2017 UTC

671.2 Comparison summary

Description Between
Files 1 and 2
Text Blocks Lines
Unchanged 9 898
Changed 8 24
Inserted 0 0
Removed 0 0

671.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

671.4 Active regular expressions

No regular expressions were active.

671.5 Comparison detail

  1   USE [BMS_H ISTORY]
  2   GO
  3   /****** Ob ject:  Sto redProcedu re [dbo].[ usp_Rpt_PP BPUsageAud itLog_Faci lity]    S cript Date : 7/28/201 6 11:43:12  AM ****** /
  4   SET ANSI_N ULLS ON
  5   GO
  6   SET QUOTED _IDENTIFIE R ON
  7   GO
  8  
  9   ALTER PROC EDURE [dbo ].[usp_Rpt _PPBPUsage AuditLog_F acility]
  10           @D ATE_FROM D ATETIME,
  11           @D ATE_TO DAT ETIME,
  12           @T IME_ZONE_M INUTES_OFF SET INT,
  13           @U serID NVAR CHAR(500),
  14           @F ACILITIES_ IDS NVARCH AR(MAX) =  '',
  15           @R EPORT_TYPE  NVARCHAR( 50)
  16   AS
  17   /********* ********** ********** ********** ********** ********** ********** ********** ********** *****
  18   Object:    [usp_Rpt_P PBPUsageAu ditLog_Fac ility]
  19  
  20   Purpose:    PPBP Usag e Audit Lo g Report
  21  
  22   History: 
  23        6/15/2016  6:35 PM -  PII : v.201606 15_1831 Ch anged      INSERT #TR ANHISTORY  to use SEL ECT DISTIN CT 
  24        6/14/2016  PII : Changed  2 columns  in #TRANHI STORY to m atch type  in [BMS_EI S].[dbo].[ ENTITY].[I DENTIFIER]
  25        Added  2 indexes  to #TRANH ISTORY
  26        5/2/2016 1 130PM -  PII : Added th is header.  Added --  OPTION (MA XDOP 1) on  the big q ueries to 
  27        reduc e parallel ism. 
  28        4/??/2016  - created:   PII
  29  
  30   Note: 
  31       Need E ntered D/T , Requeste d D/T, Rem oved D/T,  Edit Event  D/t, User , Transact ion ("Pati ent" + rec ord histor y)
  32  
  33   EXAMPLE US AGE: 
  34  
  35   --  DN S
 example
  36       EXEC u sp_Rpt_PPB PUsageAudi tLog_Facil ity 
  37           @D ATE_FROM =  '4/24/201 1', 
  38           @D ATE_TO = ' 4/29/2016'
  39           @T IME_ZONE_M INUTES_OFF SET = 0, 
  40             @UserID =  ' DNS             \
', 
  41           @F ACILITIES_ IDS = '693 78E0F-B210 -493B-B2A1 -2130C9F7F 394', 
  42           @R EPORT_TYPE  = 'PPBPUs ageAuditLo g_Facility '
  43  
  44   --  DN S     BMSSQL60 e xample
  45   exec usp_R pt_PPBPUsa geAuditLog _Facility  @DATE_FROM ='2016-06- 04 00:00:0 1',@DATE_T O='2016-06 -14 23:59: 59',@TIME_ ZONE_MINUT ES_OFFSET= -300,@User ID=N'
D
N    @ DNS             ',@FACILIT IES_IDS=N' DE5F7D7A-2 B23-4238-A 62C-95F98C 799FBF,B9B D1F1E-F01D -4436-A119 -C3F3411F1 768,AD3296 DE-4489-4C 86-9073-11 6BCBFC5807 ,BF033FD3- C3FF-4597- 9309-8506A F025CCF,03 45964C-1C4 0-4C67-992 6-0FF3646F 76E3,38424 6E5-2383-4 164-A5F8-B BC4DB65268 C,074A4A23 -BD1C-4645 -BA17-FD42 85CB8DD1,8 2664146-A4 32-4D5D-AC E9-3473A94 A4843,199D 6E6C-B791- 4570-BD0C- A4F21C11B1 C9,B76FD5C C-45A6-439 6-BAE5-390 BBFD9608A, E890E0DD-2 A5B-4DF2-9 BD3-A80FF7 880D68,6B2 EEF5C-B569 -429B-817D -11D67F4FB 7A4,37BB9F 69-E6A0-46 86-96CF-E0 D6A65A4229 ,123F5F3D- 0220-448B- A3EA-30CC2 7440D3E,D7 D99DDA-639 5-4230-976 9-7D342812 18BD,BD0BE 09A-DA6B-4 BC9-8512-5 5DB164A393 6,83993150 -11EB-46B6 -A140-6624 9407EA99,4 228A303-D8 3B-4D29-9C 63-9CF3872 3A609,B8E1 9493-FF5D- 4D0F-9475- 531AB2876D 55,A4D69C8 5-2EFE-4E5 8-8F51-87A 3367D5360, 603990B0-6 C86-4DCC-A 0A2-EDB7ED CF86EE,C91 20516-1CA1 -488D-A9B7 -9F7E8C5CB 163,451FDA 5B-BF99-43 56-A6AD-BD 5D1619CD8D ,3DC03304- 2593-4CE7- BB7C-DAD50 36CC466,14 2B212F-FBB B-4E03-ADB 3-6BFDE81E AF3C,5D59E 39A-D5DF-4 FDB-AD16-D FBF49A2333 F,2CF9A166 -C3D4-49EC -8C62-F0E3 69186F37,2 908DE1A-AE 4A-469C-9C 9F-F10857B 23639,8683 1D20-AEBE- 4280-B67D- BE0B653280 D5,69378E0 F-B210-493 B-B2A1-213 0C9F7F394, 85A09908-5 BFA-47F1-B EB5-FEBB2E 7BE543,AB1 9779C-94E5 -4A50-9139 -581A21A84 109,158D29 E4-76F3-43 46-B0E0-D9 763CE19C83 ,AB3A91F8- 7180-49B5- B67D-EE7EE BDAEC84,11 2392FE-716 8-4997-A04 5-246A3622 F254,66591 DB9-16B7-4 36A-8BA3-C 58D167A588 D,059BE374 -E52D-4959 -AAB4-4BA0 98FF61E8,3 CE8A5F0-82 BF-41A2-B1 59-200B906 41A43,160C A25C-AF38- 45A6-8F97- B6680627F9 71,8BF6E45 5-0BAA-4C6 2-B649-D5F C37AA88FB, 50FF2AC9-0 BDC-4C47-8 605-68A055 8E2B6E,898 80507-FF65 -4570-A1C4 -A6825A342 9B5,93AFBD DE-9B8A-46 25-932B-2F 8FA88646E4 ,804892C0- C264-46E7- BD1C-9609B 4CA4F1C,51 51717F-991 1-46CE-936 D-EAEB881E D4B0,E4EF5 C91-C8C7-4 979-A652-9 B74F43A3C2 9,ACA61E46 -009A-4878 -B5E6-70CD EAB1E040,4 5475D91-28 BF-4018-99 49-C418A06 71DDD,BEAE 8ECD-F483- 4538-BE2D- 673CAB60DF E5,CC26249 7-9ED7-4A6 1-AFFA-9F2 6197603AB, 888EEAE2-2 369-49DE-9 8CF-A9A8E9 EE17F5,286 566E2-E679 -4FB5-88A9 -BA37B3561 B3D,E95499 CA-500C-48 2D-9ECB-BA 4B7599EB82 ,A84FE131- C31C-4044- AFDB-3B61A 531919A,DD 64B757-F06 6-4F2D-AF8 9-EC50A8AF 1CD7,44330 A17-1C70-4 63F-A099-5 6668281B80 A,33617A96 -3E0F-487C -8A4C-3E14 1AA6B5F1,4 F62B779-57 D7-4ECC-91 C5-24A1F40 B089A,CE0B E571-1C7A- 4B54-8013- 10544D9777 E1,324DB4D F-8BA2-46B 7-9C6D-480 04D412BCE, 2F4332A8-9 489-4AC6-B BB9-771950 8A30E1,FCE D40B3-BF53 -4FB0-A7CB -F43BD99E2 D30,FBB304 08-0C7B-4B 6E-AAC5-67 F98970DF6F ,4F0216B5- 1AD6-42DD- AEE0-C76DA 395B8E3,58 73DC3C-772 7-4B33-A2D B-BAE85FFB B93B,719FF 4AF-FC82-4 031-9386-C A8FBCB291A F,3A31E917 -6985-4C49 -BB3A-7F1E ACC32431,C 4721CB8-12 6C-474D-A7 5D-E1ECA55 A9E26,82F2 2B45-1DC4- 44A1-B574- 76AED9EE08 ED,FC6080D 7-C9CA-455 F-8A9A-0CD EF9084821, 5055F460-A 241-494D-9 7B7-AAF1CE 94C088,F29 D2134-C562 -4527-9539 -8D3A6D646 0CB,5A2AB5 98-B1E8-49 0E-9FDD-8E A4E2A51BAB ,924662F7- 9425-48B0- A1D1-84FD8 3805B2B,4E A4AC4F-D51 2-4ADF-801 4-4D21FE1A 8289,A9855 8D4-505C-4 046-A24D-B CC24A46D5B 0,69450451 -12E8-4084 -B6FA-0133 09A5F814,1 5E538E4-EF CB-474A-95 F2-599E6CF E1AF8,0A8A D105-4069- 4EEB-815B- C13C8DFB2E 09,DF945CD 2-25F7-48E 5-BE40-C7A B0823D0ED, D51D0E56-2 883-4F66-B E47-4D99ED 6DE082,3F2 46B9F-E91F -4BC7-8131 -56F6174C7 76A,C2785D 26-C5A0-41 C0-9906-3C 0DAA86D07A ,280DFF7D- D689-43FA- AD25-0BCFB 9802954,87 D643D5-A08 6-4E03-892 C-173C76C0 CF58,8EAFB 939-1824-4 A75-B808-A 9B54C39339 9,F21774A4 -A832-4AB9 -B5AB-AA38 615F1730,7 982F659-53 4B-4DC9-AE E9-36AA7E0 BF035,17F6 135E-2ECA- 416C-B066- F236EDD752 AF,8F30BED F-C177-4EC B-9328-4F1 294327A6B, 8FE3BD98-0 79F-4B27-8 129-CDFAA2 7A5992,E89 34FDE-8AC4 -436E-B9FD -D74075C2C BFC,726332 B6-3EEB-46 9D-BEBF-68 A375685473 ,7F661DD6- 8801-4FA8- 92F0-B5148 18AEEB8,00 23CC35-177 F-4052-8B0 B-8ECA9467 0B3B,FA854 ED7-7249-4 398-BD29-6 2A26483D53 B,BC9DF7D5 -3929-4AC0 -BD5F-CD09 1FF337F4,6 B160084-A6 E6-4F2B-90 16-168B5BC D780C,304D B2BE-36AC- 4CB8-8B61- 3A6DBDD0E6 75,5E4D685 F-33E8-4FF E-A46E-C42 0EE4DC889, D498F5AC-7 88A-4CFD-8 7CB-F6832A D5C085,0E9 9FA6A-FA78 -4F88-B88C -242939948 76F,6ED340 B4-DE87-4D C3-B888-31 12486D6348 ,682D2688- 4175-4140- BDBB-55188 C4B49D2,07 F2F24E-E08 F-495C-8DE 4-EF75EA32 EF25,09B3B EEA-D078-4 1E5-ACBA-6 61838CD0E2 5,1924A041 -4769-4219 -AE42-11C7 B8FAB6FE,A 09C8658-C4 0F-4825-BA 67-375F11B 50BD9,2A82 DF79-0691- 4811-9B9C- 03231DDF4E 6A,487D5CD 0-808A-4FF 0-A353-B56 6F15CB107, EEE2965C-5 849-4B9E-9 12A-1D6046 A48C61,2C6 DA1BE-D0A1 -42BD-AAAA -8794CAC69 E00,FCD16E FC-D965-48 53-9B13-C3 3042268561 ,C33E6708- FBB1-47DE- 8394-505A8 FE1688C,72 244CFC-352 0-4547-8F6 9-C496AECC 3784,6BB1F 574-1082-4 3C3-9A5B-4 75B83334F3 B,0E3BF04C -9A89-4F47 -AFC7-5A62 F8845F47,2 20977D6-F5 9B-447F-95 E4-B4AE1E3 06702,145C 69BD-B35C- 481A-8F30- 7C64FD089F CE,188D228 5-3956-409 D-9E32-27F 9C20184EE, 806203F9-B 7D0-4247-A 046-079A00 A73F07,B64 FD9FB-E6AF -4105-8007 -67918B163 230,E67EA8 82-EA3E-4B 84-94A2-8B E35EE8869C ,0E13380A- F2F1-4612- A29F-78EF3 6F511AB,4A D9DFDC-3BC E-4C6E-A84 F-46905DC0 009A,8D849 89D-68C0-4 8DA-8E02-5 CF2EE48B57 F,A3B79F41 -493E-43B4 -8A3D-3A72 54CE2017,C CA247D3-98 BA-49BB-BA 3B-43AAF4A 3EC56,E2DC B406-9E91- 4AF3-891E- F4A6427F3D 62,3E1925A C-97DC-475 5-B733-601 70BFD8A1F, 913090D9-C E98-4D34-9 351-7D7E0E 7F6B37,535 4BB42-B12F -4AC6-8FEC -C6071B0DB 9DE,5F1AB3 DC-E4C6-4E AF-ACD3-47 5DCBC1CD6D ,F2E591EB- 019E-4676- ACE0-F29AB 5608E37,71 399753-46C 7-4B53-90D F-AEFC3BBF 3E72,CED3D 7F7-0C1E-4 29A-AC1B-8 53025B2EE5 1,980EE0B5 -AF61-4FE1 -9320-8C74 5D655569,D 94F05E0-02 43-42D2-A4 3C-83E3C81 FB856,BD20 2829-2A88- 4DC2-A207- CBBAB892C3 C2,5DB1017 1-F7A4-4D3 E-A1C2-B73 A3E93783C, 77E6C1A6-3 194-4F2A-B 847-01B1C5 7DA8BD,84B 14793-D236 -4E26-8D62 -ECEF51A8B 914',@REPO RT_TYPE=N' PPBPUsageA uditLog_Fa cility'
  46   exec usp_R pt_PPBPUsa geAuditLog _Facility  @DATE_FROM ='2016-07- 28 00:00:0 1',@DATE_T O='2016-07 -28 23:59: 59',@TIME_ ZONE_MINUT ES_OFFSET= -300,@User ID=N'
D NS     HORND@ DNS             ',@FACILIT IES_IDS=N' 2F4332A8-9 489-4AC6-B BB9-771950 8A30E1',@R EPORT_TYPE =N'PPBPUsa geAuditLog _Facility'
  47  
  48   Issues:
  49   IS IN HOUS E FROM NO  TO NO
  50   IS BED IN  ISOLATION  FROM NO TO  NO
  51   IS COMMUNI TY LIVING  CENTER FRO M NO TO NO
  52  
  53   ********** ********** ********** ********** ********** ********** ********** ********** ********** ****/
  54   BEGIN
  55   SET NOCOUN T ON;
  56  
  57   IF (@REPOR T_TYPE = ' PPBPUsageA uditLog_Fa cility')
  58   BEGIN
  59  
  60           CR EATE TABLE  #TBL_FACI LITY (
  61                    SOUR CE_ID NVAR CHAR(250)  PRIMARY KE Y, 
  62                    FACI LITY_NAME  NVARCHAR(2 50), 
  63                    TIME ZONE_OFFSE T INT)
  64           
  65           IN SERT INTO  #TBL_FACIL ITY(SOURCE _ID, FACIL ITY_NAME,  TIMEZONE_O FFSET) 
  66       SELECT  DISTINCT  CONVERT(NV ARCHAR(250 ), FACILIT Y.VALUE), 
  67                         ORG.NAME, 
  68                         [dbo].[Ufn _getoffset byfacility uid](VALUE
  69       FROM    dbo.Ufn_s plit(@FACI LITIES_IDS , ',') AS  FACILITY 
  70               INNER JOI N bms_eis. dbo.ENTITY  AS ENTITY  
  71                       O N ENTITY.I DENTIFIER  = FACILITY .VALUE 
  72               INNER JOI N bms_eis. dbo.EHL7_O RGANIZATIO N AS ORG 
  73                       O N ORG.PFK_ ORGANIZATI ON = ENTIT Y.PK_ENTIT Y  
  74  
  75           CR EATE TABLE  #TRANHIST ORY (
  76                             PK int ,
  77                             ACT_ID  int,
  78                             FACILI TY_UID NVA RCHAR(250) ,   /* cha nged from  uniqueiden tifier */
  79                             VISTA_ SITE_UID N VARCHAR(25 0),   /* c hanged fro m uniqueid entifier * /
  80                             WAITIN G_AREA_ID  int,
  81                             PROBLE M nvarchar (max),
  82                             FEE_DI SPOSITION_ ID int,
  83                             CONTRA CT_FEE_ID  int,
  84                             AUTHOR IZED_FEE_I D int,
  85                             SERVIC E_RECEIVIN G_FEE_ID i nt,
  86                             REASON _USING_FEE _ID int,
  87                             FEE_CO MMENTS nva rchar(150) ,
  88                             REMOVE D_DATE dat etime,
  89                             TYPE_O F_BED_WARD  nvarchar( 250),
  90                             EDIT_E VENT datet ime,
  91                             REQUES TED_BED_UI D uniqueid entifier,
  92                             REQUES TED_BED_DA TE datetim e,
  93                             REQUES TED_DATE d atetime,
  94                             IS_IN_ HOUSE bit,
  95                             IS_BED _IN_ISOLAT ION bit,
  96                             LAST_E DIT_BY nva rchar(100) ,
  97                             TRANSA CTION_TYPE _CODE varc har(50), 
  98                             COMMEN TS nvarcha r(250),
  99                             WAIT_T IME_ALERT_ DATE datet ime,
  100                             IS_COM MUNITY_LIV ING_CENTER  bit,
  101                             IS_EVA CUATION_PA TIENT bit,
  102                             EVACUA TION_DISPO SITION_STA TUS_ID int ,
  103                             EVACUA TION_EXPEC TED_DATE d atetime,
  104                             EVACUA TION_ACTUA L_DATE dat etime,
  105                             EVACUA TION_REASO N_FOR_DELA Y nvarchar (250),
  106                             EVACUA TION_TRANS FER_EVACUA TE_TO nvar char(250),
  107                             EVACUA TION_EQUIP _SUPPLY_RE QUIREMENTS  nvarchar( 250),
  108                             EVACUA TION_TRANS PORTATION_ CARE_LEVEL  nvarchar( 250),
  109                             EVACUA TION_ENROU TE_MEDICAL _ATTENDANT  nvarchar( 250),
  110                             EVACUA TION_ENROU TE_NON_MED ICAL_ATTEN DANT nvarc har(250),
  111                             EVACUA TION_TRANS PORTATION_ TYPE_ID in t,
  112                             EVACUA TION_TRANS PORTATION_ PROVIDER_I D int,
  113                             EVACUA TION_TRANS PORTATION_ COMMENTS n varchar(25 0),
  114                             EVACUA TION_DESTI NATION_ADD RESS nvarc har(250),
  115                             EVACUA TION_DESTI NATION_CIT Y_STATE nv archar(250 ),
  116                             EVACUA TION_DESTI NATION_POC _TELEPHONE  nvarchar( 100),
  117                              E DNS    TION_ORIGI NATOR_POC_ TELEPHONE  nvarchar(1 00),
  118                             EVACUA TION_COMME NTS nvarch ar(500),
  119                             EVACUA TION_ENROU TE_MEDICAL _ATTENDANT _NUMBER in t,
  120                             EVACUA TION_ENROU TE_NON_MED ICAL_ATTEN DANT_NUMBE R int,
  121                             EVACUA TION_VEHIC LE_ID nvar char(250),
  122                             EVACUA TION_VEHIC LE_SEAT_PO SITION nva rchar(250) ,
  123                             EVACUA TION_MA_TE LEPHONE nv archar(100 ),
  124                             EVACUA TION_NMA_T ELEPHONE n varchar(10 0),
  125                             EVACUA TION_ORIGI NATING_FAC ILITY_NAME  nvarchar( 250),
  126                             EVACUA TION_ORIGI NATING_ADD RESS nvarc har(250),
  127                             EVACUA TION_ORIGI NATING_CIT Y_STATE nv archar(250 ),
  128                             EVACUA TION_VEHIC LE_OPERATO R_NAME nva rchar(250) ,
  129                             EVACUA TION_VEHIC LE_OPERATO R_TELEPHON E nvarchar (100),
  130                             ENTERE D_DATE dat etime,
  131                             PATIEN T_NAME nva rchar(50),
  132                             ACTION _HISTORY v archar(max )
  133           )
  134           IN SERT #TRAN HISTORY
  135           SE LECT  DIST INCT 
  136                TRANHIST ORY.PK,
  137                             TRANHI STORY.ACT_ ID,
  138                             TRANHI STORY.FACI LITY_UID,
  139                             TRANHI STORY.VIST A_SITE_UID ,
  140                             TRANHI STORY.WAIT ING_AREA_I D,
  141                             TRANHI STORY.PROB LEM,  
  142                             TRANHI STORY.FEE_ DISPOSITIO N_ID,                
  143                             TRANHI STORY.CONT RACT_FEE_I D,
  144                             TRANHI STORY.AUTH ORIZED_FEE _ID,
  145                             TRANHI STORY.SERV ICE_RECEIV ING_FEE_ID ,
  146                             TRANHI STORY.REAS ON_USING_F EE_ID,
  147                             TRANHI STORY.FEE_ COMMENTS,
  148                             TRANHI STORY.REMO VED_DATE,
  149                             TRANHI STORY.TYPE _OF_BED_WA RD,
  150                             TRANHI STORY.DATE  as EDIT_E VENT,
  151                             TRANHI STORY.REQU ESTED_BED_ UID,
  152                             TRANHI STORY.REQU ESTED_BED_ DATE,
  153                             TRANHI STORY.REQU ESTED_DATE
  154                             TRANHI STORY.IS_I N_HOUSE,
  155                             TRANHI STORY.IS_B ED_IN_ISOL ATION,
  156                             TRANHI STORY.LAST _EDIT_BY,
  157                             TRANHI STORY.TRAN SACTION_TY PE_CODE,
  158                             TRANHI STORY.COMM ENTS,
  159                             TRANHI STORY.WAIT _TIME_ALER T_DATE,
  160                             TRANHI STORY.IS_C OMMUNITY_L IVING_CENT ER,
  161                             TRANHI STORY.IS_E VACUATION_ PATIENT,
  162                             TRANHI STORY.EVAC UATION_DIS POSITION_S TATUS_ID,
  163                             TRANHI STORY.EVAC UATION_EXP ECTED_DATE ,
  164                             TRANHI STORY.EVAC UATION_ACT UAL_DATE,
  165                             TRANHI STORY.EVAC UATION_REA SON_FOR_DE LAY,
  166                             TRANHI STORY.EVAC UATION_TRA NSFER_EVAC UATE_TO,
  167                             TRANHI STORY.EVAC UATION_EQU IP_SUPPLY_ REQUIREMEN TS,
  168                             TRANHI STORY.EVAC UATION_TRA NSPORTATIO N_CARE_LEV EL,
  169                             TRANHI STORY.EVAC UATION_ENR OUTE_MEDIC AL_ATTENDA NT,
  170                             TRANHI STORY.EVAC UATION_ENR OUTE_NON_M EDICAL_ATT ENDANT,
  171                             TRANHI STORY.EVAC UATION_TRA NSPORTATIO N_TYPE_ID,
  172                             TRANHI STORY.EVAC UATION_TRA NSPORTATIO N_PROVIDER _ID,
  173                             TRANHI STORY.EVAC UATION_TRA NSPORTATIO N_COMMENTS ,
  174                             TRANHI STORY.EVAC UATION_DES TINATION_A DDRESS,
  175                             TRANHI STORY.EVAC UATION_DES TINATION_C ITY_STATE,
  176                             TRANHI STORY.EVAC UATION_DES TINATION_P OC_TELEPHO NE,
  177                             TRANHI STORY.EVAC UATION_ORI GINATOR_PO C_TELEPHON E,
  178                             TRANHI STORY.EVAC UATION_COM MENTS,
  179                             TRANHI STORY.EVAC UATION_ENR OUTE_MEDIC AL_ATTENDA NT_NUMBER,
  180                             TRANHI STORY.EVAC UATION_ENR OUTE_NON_M EDICAL_ATT ENDANT_NUM BER,
  181                             TRANHI STORY.EVAC UATION_VEH ICLE_ID,
  182                             TRANHI STORY.EVAC UATION_VEH ICLE_SEAT_ POSITION,
  183                             TRANHI STORY.EVAC UATION_MA_ TELEPHONE,
  184                             TRANHI STORY.EVAC UATION_NMA _TELEPHONE ,
  185                             TRANHI STORY.EVAC UATION_ORI GINATING_F ACILITY_NA ME,
  186                             TRANHI STORY.EVAC UATION_ORI GINATING_A DDRESS,
  187                             TRANHI STORY.EVAC UATION_ORI GINATING_C ITY_STATE,
  188                             TRANHI STORY.EVAC UATION_VEH ICLE_OPERA TOR_NAME,
  189                             TRANHI STORY.EVAC UATION_VEH ICLE_OPERA TOR_TELEPH ONE,
  190                             ACTHIS TORY.CREAT ION_DATE a s ENTERED_ DATE, 
  191                             
  192                             SUBSTR ING(PERSON .[NAME_FIR ST_GIVEN],  1, 1) + P ERSON.[NAM E_FAMILY]  + ' ' + SU BSTRING(s. [IDENTIFIE R_EXTENSIO N], 8, 4)  AS PATIENT NAME,
  193                             CASE W HEN TRANHI STORY.TRAN SACTION_TY PE_CODE =  'I' THEN ' NEW RECORD
  194                                       WHEN TR ANHISTORY. TRANSACTIO N_TYPE_COD E = 'U' TH EN 'UPDATE D'
  195                                       WHEN TR ANHISTORY. TRANSACTIO N_TYPE_COD E = 'D' TH EN 'DELETE D'
  196                             END as  ACTIONTYP
  197           FR OM WAITING _LIST_H TR ANHISTORY
  198           IN NER JOIN # TBL_FACILI TY FAC
  199                    ON T RANHISTORY .FACILITY_ UID = FAC. SOURCE_ID
  200           IN NER JOIN A CT_H ACTHI STORY
  201                    ON T RANHISTORY .ACT_ID =  ACTHISTORY .ID
  202           IN NER JOIN B MS_EIS.dbo .ENTITY AS  ENTITY 
  203                    ON E NTITY.IDEN TIFIER = A CTHISTORY. PATIENT_UI D
  204           IN NER JOIN B MS_EIS.dbo .EHL7_PERS ON AS PERS ON 
  205                    ON P ERSON.PFK_ PERSON = E NTITY.PK_E NTITY
  206           IN NER JOIN B MS_EIS.dbo .EHL7_UID  AS S 
  207                    ON S .FK_ENTITY  = PERSON. PFK_PERSON  AND S.IDE NTIFIER_RO OT = 'SSN'
  208           LE FT JOIN AC T_H ACTLAS T
  209                    ON T RANHISTORY .ACT_ID =  ACTLAST.PA RENT_ACT_I D
  210           LE FT JOIN TR ANSFER_EVN _H TRANEVN H
  211                    ON A CTLAST.ID  = TRANEVNH .ACT_ID
  212           WH ERE TRANHI STORY.DATE  BETWEEN @ DATE_FROM  AND @DATE_ TO
  213           OR DER BY TRA NHISTORY.D ATE ASC
  214           --  OPTION (M AXDOP 1) 
  215           -- SELECT * F ROM #TRANH ISTORY
  216  
  217   --- create  indexes t hat will b e used in  JOINs in l ast query.  
  218   CREATE NON CLUSTERED  INDEX IX_T empTranHis t_FACILITY _UID ON #T RANHISTORY
  219    (FACILITY _UID);
  220  
  221   CREATE NON CLUSTERED  INDEX IX_T empTranHis t_VISTA_SI TE_UID ON  #TRANHISTO RY
  222    (VISTA_SI TE_UID) 
  223  
  224           -- LEFT JOIN  #TRANHISTO RY AS PREV IOUS_H_WAI TING_LIST 
  225    --        ON PREVIOU S_H_WAITIN G_LIST.ACT _ID = H_WA ITING_LIST .ACT_ID 
  226    --            AND PR EVIOUS_H_W AITING_LIS T.PK < H_W AITING_LIS T.PK
  227  
  228    CREATE NO NCLUSTERED  INDEX IX_ TempTranHi st_ACT_ID_ and_PK ON  #TRANHISTO RY
  229    (ACT_ID,  PK) 
  230  
  231           CR EATE TABLE  #MY_CONCE PT_H(
  232                    PK i nt,
  233                    ID i nt,
  234                    CODE  varchar(1 00),
  235                    CODE _SYSTEM va rchar(100) ,
  236                    CODE _SYSTEM_NA ME varchar (250),
  237                    DISP LAY_NAME n varchar(25 0),
  238                    TRAN SACTION_TY PE_CODE va rchar(50),
  239                    DATE  datetime,
  240                    CREA TED_BY nva rchar(50)
  241           )
  242  
  243           cr eate index  mcth__COD E_SYSTEM_N AME on #MY _CONCEPT_H
  244       ( CODE _SYSTEM_NA ME ) 
  245  
  246       create  index mct h__DISPLAY _NAME on   #MY_CONCEP T_H
  247       ( DISP LAY_NAME )  
  248           
  249           IN SERT #MY_C ONCEPT_H
  250           SE LECT PK, I D, CODE, C ODE_SYSTEM , CODE_SYS TEM_NAME,  DISPLAY_NA ME, TRANSA CTION_TYPE _CODE, DAT E, CREATED _BY 
  251           FR OM CONCEPT _H
  252  
  253           CR EATE TABLE  #Results(
  254                    ENTE RED_DATE d atetime,
  255                    REQU ESTED_DATE  datetime,
  256                    PREV _REQUESTED _DATE date time,
  257                    REMO VED_DATE d atetime,
  258                    EDIT ED datetim e,
  259                    LAST _EDIT_BY n varchar(10 0),
  260                    PATI ENT_NAME v archar(100 ),
  261                    ACT_ ID integer ,
  262                    ACTI ON_HISTORY  nvarchar( 20),
  263                    TRAN _UPDS varc har(max),
  264                    TRAN _COMMENTS  varchar(ma x))
  265  
  266           IN SERT INTO  #Results
  267           SE LECT DISTI NCT 
  268                       C ONVERT(VAR CHAR, DATE ADD (minut e, @TIME_Z ONE_MINUTE S_OFFSET,  H_WAITING_ LIST.ENTER ED_DATE),  101) + ' '  
  269                              + CON VERT(VARCH AR(5), DAT EADD (minu te, @TIME_ ZONE_MINUT ES_OFFSET,  H_WAITING _LIST.ENTE RED_DATE),  108) as E NTERED_DAT E, 
  270                       C ONVERT(VAR CHAR, DATE ADD (minut e, @TIME_Z ONE_MINUTE S_OFFSET,  H_WAITING_ LIST.REQUE STED_DATE) , 101) + '  ' 
  271                              + CON VERT(VARCH AR(5), DAT EADD (minu te, @TIME_ ZONE_MINUT ES_OFFSET,  H_WAITING _LIST.REQU ESTED_DATE ), 108) as  REQUESTED _DATE,
  272                       C ONVERT(VAR CHAR, DATE ADD (minut e, @TIME_Z ONE_MINUTE S_OFFSET,  H_WAITING_ LIST.REQUE STED_DATE) , 101) + '  ' 
  273                              + CON VERT(VARCH AR(5), DAT EADD (minu te, @TIME_ ZONE_MINUT ES_OFFSET,  PREVIOUS_ H_WAITING_ LIST.REQUE STED_DATE) , 108) as  PREV_REQUE STED_DATE,
  274                       C ONVERT(VAR CHAR, DATE ADD (minut e, @TIME_Z ONE_MINUTE S_OFFSET,  H_WAITING_ LIST.REMOV ED_DATE),  101) + ' '  
  275                              + CON VERT(VARCH AR(5), DAT EADD (minu te, @TIME_ ZONE_MINUT ES_OFFSET,  H_WAITING _LIST.REMO VED_DATE),  108) as R EMOVED_DAT E,
  276                       C ONVERT(VAR CHAR, DATE ADD (minut e, @TIME_Z ONE_MINUTE S_OFFSET,  H_WAITING_ LIST.EDIT_ EVENT), 10 1) + ' ' 
  277                              + CON VERT(VARCH AR(5), DAT EADD (minu te, @TIME_ ZONE_MINUT ES_OFFSET,  H_WAITING _LIST.EDIT _EVENT), 1 08) as EDI TED,
  278                       H _WAITING_L IST.LAST_E DIT_BY,
  279                       H _WAITING_L IST.PATIEN T_NAME,
  280                       H _WAITING_L IST.ACT_ID ,
  281                       H _WAITING_L IST.ACTION _HISTORY,
  282                       - -H_WAITING _LIST.ACTI ON_HISTORY ,
  283           CA SE WHEN H_ WAITING_LI ST.TRANSAC TION_TYPE_ CODE = 'U'  THEN 
  284                    CASE  
  285                WHEN ORG 1.NAME <>  ORG2.NAME 
  286                    OR ( ORG1.NAME  IS NULL AN D ORG2.NAM E IS NOT N ULL) 
  287                    OR ( ORG1.NAME  IS NOT NUL L AND ORG2 .NAME IS N ULL) 
  288                             THEN ' FACILITY F ROM ' + IS NULL(ORG1. NAME,'<Emp ty>') + '  TO ' + ISN ULL(ORG2.N AME,'<Empt y>') + cha r(13)+char (10) + '' 
  289                ELSE '' 
  290           EN D +
  291   --               CASE  WHEN H_WA ITING_LIST .FACILITY_ UID <> PRE VIOUS_H_WA ITING_LIST .FACILITY_ UID THEN ' VA ADMISSI ON FACILIT Y FROM ' +  ORG1.NAME  + ' TO '  + ORG2.NAM E + ' ' EN D +
  292                    CASE  
  293                WHEN VIS TANAME1.NA ME <> VIST ANAME2.NAM
  294                THEN 'VI STA SITE N AME ' + IS NULL(VISTA NAME1.NAME ,'<Empty>' ) + ' TO '  + ISNULL( VISTANAME2 .NAME, '<E mpty>') +  char(13)+c har(10) 
  295                ELSE '' 
  296           EN D +
  297  
  298           --  Example o f a better  way will  be done he re
  299                    CASE  
  300                WHEN H_W AITING_LIS T.PROBLEM  <> PREVIOU S_H_WAITIN G_LIST.PRO BLEM 
  301                      OR  (H_WAITIN G_LIST.PRO BLEM IS NU LL  AND PR EVIOUS_H_W AITING_LIS T.PROBLEM  IS NOT NUL L) 
  302                      OR  (H_WAITIN G_LIST.PRO BLEM IS NO T NULL  AN D PREVIOUS _H_WAITING _LIST.PROB LEM IS NUL L)
  303                             THEN ' PROBLEM FR OM ' + ISN ULL(PREVIO US_H_WAITI NG_LIST.PR OBLEM,'<Em pty>') + '  TO ' + IS NULL(H_WAI TING_LIST. PROBLEM,'< Empty>') +  char(13)+ char(10) 
  304                ELSE '' 
  305           EN D +
  306                    CASE  
  307                WHEN FD1 .DISPLAY_N AME <> FD2 .DISPLAY_N AME 
  308                    OR ( FD1.DISPLA Y_NAME IS  NULL AND F d2.DISPLAY _NAME IS N OT NULL) 
  309                    OR ( FD1.DISPLA Y_NAME IS  NOT NULL A ND FD2.DIS PLAY_NAME  IS NULL)
  310                             THEN ' FEE DISPOS ITION FROM  ' + ISNUL L(FD1.DISP LAY_NAME,' <Empty>')  + ' TO ' +  ISNULL(FD 2.DISPLAY_ NAME,'<Emp ty>') + ch ar(13)+cha r(10) 
  311                ELSE '' 
  312           EN D +
  313                              /* Sk ipping SER VICE_RECEI VING_FEE_I D*/ 
  314                    CASE  WHEN CF1. DISPLAY_NA ME <> CF2. DISPLAY_NA ME OR (CF1 .DISPLAY_N AME IS NUL L AND CF2. DISPLAY_NA ME IS NOT  NULL) OR ( CF1.DISPLA Y_NAME IS  NOT NULL A ND CF2.DIS PLAY_NAME  IS NULL)
  315                             THEN ' CONTRACT F EE FROM '  + ISNULL(C F1.DISPLAY _NAME,'<Em pty>') + '  TO ' + IS NULL(CF2.D ISPLAY_NAM E,'<Empty> ') + +char (13)+char( 10) ELSE ' ' END +
  316                    CASE  WHEN AF1. DISPLAY_NA ME <> AF2. DISPLAY_NA ME OR (AF1 .DISPLAY_N AME IS NUL L AND AF2. DISPLAY_NA ME IS NOT  NULL) OR ( AF1.DISPLA Y_NAME IS  NOT NULL A ND AF2.DIS PLAY_NAME  IS NULL)
  317                             THEN ' AUTHORIZED  FEE FROM  ' + ISNULL (AF1.DISPL AY_NAME,'< Empty>') +  ' TO ' +  ISNULL(AF2 .DISPLAY_N AME,'<Empt y>') + +ch ar(13)+cha r(10) ELSE  '' END +
  318                    CASE  WHEN FR1. DISPLAY_NA ME <> FR2. DISPLAY_NA ME OR (FR1 .DISPLAY_N AME IS NUL L AND FR2. DISPLAY_NA ME IS NOT  NULL) OR ( FR1.DISPLA Y_NAME IS  NOT NULL A ND FR2.DIS PLAY_NAME  IS NULL)
  319                             THEN ' REASON USI NG FEE FRO M ' + ISNU LL(FR1.DIS PLAY_NAME, '<Empty>')  + ' TO '  + ISNULL(F R2.DISPLAY _NAME,'<Em pty>') + + char(13)+c har(10) EL SE '' END  +
  320                    CASE  WHEN H_WA ITING_LIST .FEE_COMME NTS <> PRE VIOUS_H_WA ITING_LIST .FEE_COMME NTS OR (H_ WAITING_LI ST.FEE_COM MENTS IS N ULL AND PR EVIOUS_H_W AITING_LIS T.FEE_COMM ENTS IS NO T NULL) OR  (H_WAITIN G_LIST.FEE _COMMENTS  IS NOT NUL L AND PREV IOUS_H_WAI TING_LIST. FEE_COMMEN TS IS NULL )
  321                             THEN ' FEE COMMEN TS FROM '  + ISNULL(P REVIOUS_H_ WAITING_LI ST.FEE_COM MENTS,'<Em pty>') + '  TO ' + IS NULL(H_WAI TING_LIST. FEE_COMMEN TS,'<Empty >') + char (13)+char( 10) ELSE ' ' END +
  322                    CASE  WHEN H_WA ITING_LIST .REMOVED_D ATE <> PRE VIOUS_H_WA ITING_LIST .REMOVED_D ATE OR (H_ WAITING_LI ST.REMOVED _DATE IS N ULL AND PR EVIOUS_H_W AITING_LIS T.REMOVED_ DATE IS NO T NULL) OR  (H_WAITIN G_LIST.REM OVED_DATE  IS NOT NUL L AND PREV IOUS_H_WAI TING_LIST. REMOVED_DA TE IS NULL
  323                             THEN ' REMOVED DA TE FROM '  + CASE WHE N PREVIOUS _H_WAITING _LIST.REMO VED_DATE I S NULL THE N '<Empty> ' ELSE ISN ULL(CONVER T(VARCHAR,  DATEADD ( minute, @T IME_ZONE_M INUTES_OFF SET, PREVI OUS_H_WAIT ING_LIST.R EMOVED_DAT E), 101),  '') + ' '  + ISNULL(C ONVERT(VAR CHAR(5), D ATEADD (mi nute, @TIM E_ZONE_MIN UTES_OFFSE T, PREVIOU S_H_WAITIN G_LIST.REM OVED_DATE) , 108), '' ) END + 
  324                                      ' TO ' +  CASE WHEN  H_WAITING _LIST.REMO VED_DATE I S NULL THE N '<Empty> ' ELSE CON VERT(VARCH AR, DATEAD D (minute,  @TIME_ZON E_MINUTES_ OFFSET, H_ WAITING_LI ST.REMOVED _DATE), 10 1) + ' ' +  ISNULL(CO NVERT(VARC HAR(5), DA TEADD (min ute, @TIME _ZONE_MINU TES_OFFSET , H_WAITIN G_LIST.REM OVED_DATE) , 108),'')  END + ' '  ELSE '' E ND +
  325                    CASE  WHEN H_WA ITING_LIST .TYPE_OF_B ED_WARD <>  PREVIOUS_ H_WAITING_ LIST.TYPE_ OF_BED_WAR D OR (H_WA ITING_LIST .TYPE_OF_B ED_WARD IS  NULL AND  PREVIOUS_H _WAITING_L IST.TYPE_O F_BED_WARD  IS NOT NU LL) OR (H_ WAITING_LI ST.TYPE_OF _BED_WARD  IS NOT NUL L AND PREV IOUS_H_WAI TING_LIST. TYPE_OF_BE D_WARD IS  NULL) 
  326                             THEN ' TYPE OF BE D WARD FRO M ' + ISNU LL(PREVIOU S_H_WAITIN G_LIST.TYP E_OF_BED_W ARD,'<Empt y>') + ' T O ' + ISNU LL(H_WAITI NG_LIST.TY PE_OF_BED_ WARD,'<Emp ty>') +cha r(13)+char (10) ELSE  '' END +
  327                              --ski pped REQUE STED_BED_U ID
  328                    CASE  WHEN H_WA ITING_LIST .REQUESTED _BED_DATE  <> PREVIOU S_H_WAITIN G_LIST.REQ UESTED_BED _DATE OR ( H_WAITING_ LIST.REQUE STED_BED_D ATE IS NUL L AND PREV IOUS_H_WAI TING_LIST. REQUESTED_ BED_DATE I S NOT NULL ) OR (H_WA ITING_LIST .REQUESTED _BED_DATE  IS NOT NUL L AND PREV IOUS_H_WAI TING_LIST. REQUESTED_ BED_DATE I S NULL)
  329                             THEN ' REQUESTED  BED DATE F ROM ' + CA SE WHEN PR EVIOUS_H_W AITING_LIS T.REQUESTE D_BED_DATE  IS NULL T HEN '<Empt y>' ELSE I SNULL(CONV ERT(VARCHA R, DATEADD  (minute,  @TIME_ZONE _MINUTES_O FFSET, PRE VIOUS_H_WA ITING_LIST .REQUESTED _BED_DATE) , 101),'')  + ' ' + I SNULL(CONV ERT(VARCHA R(5), DATE ADD (minut e, @TIME_Z ONE_MINUTE S_OFFSET,  PREVIOUS_H _WAITING_L IST.REQUES TED_BED_DA TE), 108), '') END + 
  330                                      ' TO ' +  CASE WHEN  H_WAITING _LIST.REQU ESTED_BED_ DATE IS NU LL THEN '< Empty>' EL SE ISNULL( CONVERT(VA RCHAR, DAT EADD (minu te, @TIME_ ZONE_MINUT ES_OFFSET,  H_WAITING _LIST.REQU ESTED_BED_ DATE), 101 ),'') + '  ' + ISNULL (CONVERT(V ARCHAR(5),  DATEADD ( minute, @T IME_ZONE_M INUTES_OFF SET, H_WAI TING_LIST. REQUESTED_ BED_DATE),  108),'')  END +char( 13)+char(1 0) ELSE ''  END +
  331                    CASE  WHEN H_WA ITING_LIST .REQUESTED _DATE <> P REVIOUS_H_ WAITING_LI ST.REQUEST ED_DATE OR  (H_WAITIN G_LIST.REQ UESTED_DAT E IS NULL  AND PREVIO US_H_WAITI NG_LIST.RE QUESTED_DA TE IS NOT  NULL) OR ( H_WAITING_ LIST.REQUE STED_DATE  IS NOT NUL L AND PREV IOUS_H_WAI TING_LIST. REQUESTED_ DATE IS NU LL)
  332                             THEN ' REQUESTED  ADMISSION  DATE FROM  ' + CASE W HEN PREVIO US_H_WAITI NG_LIST.RE QUESTED_DA TE IS NULL  THEN '<Em pty>' ELSE  CONVERT(V ARCHAR, DA TEADD (min ute, @TIME _ZONE_MINU TES_OFFSET , PREVIOUS _H_WAITING _LIST.REQU ESTED_DATE ), 101) +  ' ' + CONV ERT(VARCHA R(5), DATE ADD (minut e, @TIME_Z ONE_MINUTE S_OFFSET,  PREVIOUS_H _WAITING_L IST.REQUES TED_DATE),  108) END 
  333                                      ' TO ' +  CASE WHEN  H_WAITING _LIST.REQU ESTED_DATE  IS NULL T HEN '<Empt y>' ELSE C ONVERT(VAR CHAR, DATE ADD (minut e, @TIME_Z ONE_MINUTE S_OFFSET,  H_WAITING_ LIST.REQUE STED_DATE) , 101) + '  ' + CONVE RT(VARCHAR (5), DATEA DD (minute , @TIME_ZO NE_MINUTES _OFFSET, H _WAITING_L IST.REQUES TED_DATE),  108) END  + char(13) +char(10)  ELSE '' EN D +
  334                                      --issue  above: REQ UESTED ADM ISSION DAT E DIDN'T A CTUALLY CH ANGE?!?                 
  335                    CASE  WHEN H_WA ITING_LIST .IS_IN_HOU SE <> PREV IOUS_H_WAI TING_LIST. IS_IN_HOUS E --OR (H_ WAITING_LI ST.IS_IN_H OUSE IS NU LL AND PRE VIOUS_H_WA ITING_LIST .IS_IN_HOU SE IS NOT  NULL) OR ( H_WAITING_ LIST.IS_IN _HOUSE IS  NOT NULL A ND PREVIOU S_H_WAITIN G_LIST.IS_ IN_HOUSE I S NULL)
  336                             THEN ' IS IN HOUS E FROM ' +  CASE WHEN  PREVIOUS_ H_WAITING_ LIST.IS_IN _HOUSE = 1  THEN 'YES ' ELSE 'NO ' END + '  TO ' + CAS E WHEN H_W AITING_LIS T.IS_IN_HO USE = 1 TH EN 'YES' E LSE 'NO' E ND + char( 13)+char(1 0) ELSE ''  END +
  337                    CASE  WHEN H_WA ITING_LIST .IS_BED_IN _ISOLATION  <> PREVIO US_H_WAITI NG_LIST.IS _BED_IN_IS OLATION -- OR (H_WAIT ING_LIST.I S_BED_IN_I SOLATION I S NULL AND  PREVIOUS_ H_WAITING_ LIST.IS_BE D_IN_ISOLA TION IS NO T NULL) OR  (H_WAITIN G_LIST.IS_ BED_IN_ISO LATION IS  NOT NULL A ND PREVIOU S_H_WAITIN G_LIST.IS_ BED_IN_ISO LATION IS  NULL)
  338                             THEN ' IS BED IN  ISOLATION  FROM ' + C ASE WHEN P REVIOUS_H_ WAITING_LI ST.IS_BED_ IN_ISOLATI ON = 1 THE N 'YES' EL SE 'NO' EN D + ' TO '  + CASE WH EN H_WAITI NG_LIST.IS _BED_IN_IS OLATION =  1 THEN 'YE S' ELSE 'N O' END + c har(13)+ch ar(10) ELS E '' END +
  339                    CASE  WHEN H_WA ITING_LIST .WAIT_TIME _ALERT_DAT E <> PREVI OUS_H_WAIT ING_LIST.W AIT_TIME_A LERT_DATE  OR (H_WAIT ING_LIST.W AIT_TIME_A LERT_DATE  IS NULL AN D PREVIOUS _H_WAITING _LIST.WAIT _TIME_ALER T_DATE IS  NOT NULL)  OR (H_WAIT ING_LIST.W AIT_TIME_A LERT_DATE  IS NOT NUL L AND PREV IOUS_H_WAI TING_LIST. WAIT_TIME_ ALERT_DATE  IS NULL) 
  340                             THEN ' WAIT TIME  ALERT DATE  FROM ' +  CASE WHEN  PREVIOUS_H _WAITING_L IST.WAIT_T IME_ALERT_ DATE IS NU LL THEN '< Empty>' EL SE CONVERT (VARCHAR,  DATEADD (m inute, @TI ME_ZONE_MI NUTES_OFFS ET, PREVIO US_H_WAITI NG_LIST.WA IT_TIME_AL ERT_DATE),  101) + '  ' + CONVER T(VARCHAR( 5), DATEAD D (minute,  @TIME_ZON E_MINUTES_ OFFSET, PR EVIOUS_H_W AITING_LIS T.WAIT_TIM E_ALERT_DA TE), 108)  END + 
  341                                      ' TO ' +  CASE WHEN  H_WAITING _LIST.WAIT _TIME_ALER T_DATE IS  NULL THEN  '<Empty>'  ELSE CONVE RT(VARCHAR , DATEADD  (minute, @ TIME_ZONE_ MINUTES_OF FSET, H_WA ITING_LIST .WAIT_TIME _ALERT_DAT E), 101) +  ' ' + CON VERT(VARCH AR(5), DAT EADD (minu te, @TIME_ ZONE_MINUT ES_OFFSET,  H_WAITING _LIST.WAIT _TIME_ALER T_DATE), 1 08) END +  char(13)+c har(10) EL SE '' END  +
  342                    CASE  WHEN H_WA ITING_LIST .IS_COMMUN ITY_LIVING _CENTER <>  PREVIOUS_ H_WAITING_ LIST.IS_CO MMUNITY_LI VING_CENTE R --OR (H_ WAITING_LI ST.IS_COMM UNITY_LIVI NG_CENTER  IS NULL AN D PREVIOUS _H_WAITING _LIST.IS_C OMMUNITY_L IVING_CENT ER IS NOT  NULL) OR ( H_WAITING_ LIST.IS_CO MMUNITY_LI VING_CENTE R IS NOT N ULL AND PR EVIOUS_H_W AITING_LIS T.IS_COMMU NITY_LIVIN G_CENTER I S NULL)
  343                             THEN ' IS COMMUNI TY LIVING  CENTER FRO M ' + CASE  WHEN PREV IOUS_H_WAI TING_LIST. IS_COMMUNI TY_LIVING_ CENTER = 1  THEN 'YES ' ELSE 'NO ' END + '  TO ' + CAS E WHEN H_W AITING_LIS T.IS_COMMU NITY_LIVIN G_CENTER =  1 THEN 'Y ES' ELSE ' NO' END +  char(13)+c har(10) EL SE '' END  +
  344                    CASE  WHEN H_WA ITING_LIST .IS_EVACUA TION_PATIE NT <> PREV IOUS_H_WAI TING_LIST. IS_EVACUAT ION_PATIEN T THEN 'IS  EVACUATIO N PATIENT  FROM ' + C ASE WHEN P REVIOUS_H_ WAITING_LI ST.IS_EVAC UATION_PAT IENT = 1 T HEN 'YES'  ELSE 'NO'  END + ' TO  ' + CASE  WHEN H_WAI TING_LIST. IS_EVACUAT ION_PATIEN T = 1 THEN  'YES' ELS E 'NO' END  + char(13 )+char(10)  ELSE '' E ND +
  345                    CASE  WHEN ED1. ID <> ED2. ID OR (ED1 .DISPLAY_N AME IS NUL L AND ED2. DISPLAY_NA ME IS NOT  NULL) OR ( ED1.DISPLA Y_NAME IS  NOT NULL A ND ED2.DIS PLAY_NAME  IS NULL)
  346                             THEN ' EVACUATION  DISPOSITI ON STATUS  FROM ' + I SNULL(ED1. DISPLAY_NA ME, '<Empt y>') + ' T O ' + ISNU LL(ED2.DIS PLAY_NAME,  '<Empty>' ) + char(1 3)+char(10 ) ELSE ''  END +
  347                    CASE  WHEN H_WA ITING_LIST .EVACUATIO N_EXPECTED _DATE <> P REVIOUS_H_ WAITING_LI ST.EVACUAT ION_EXPECT ED_DATE OR  (H_WAITIN G_LIST.EVA CUATION_EX PECTED_DAT E IS NULL  AND PREVIO US_H_WAITI NG_LIST.EV ACUATION_E XPECTED_DA TE IS NOT  NULL) OR ( H_WAITING_ LIST.EVACU ATION_EXPE CTED_DATE  IS NOT NUL L AND PREV IOUS_H_WAI TING_LIST. EVACUATION _EXPECTED_ DATE IS NU LL)
  348                             THEN ' EVACUATION  EXPECTED  DATE FROM  ' + CASE W HEN PREVIO US_H_WAITI NG_LIST.EV ACUATION_E XPECTED_DA TE IS NULL  THEN '<Em pty>' ELSE  CONVERT(V ARCHAR, DA TEADD (min ute, @TIME _ZONE_MINU TES_OFFSET , PREVIOUS _H_WAITING _LIST.EVAC UATION_EXP ECTED_DATE ), 101) +  ' ' + CONV ERT(VARCHA R(5), DATE ADD (minut e, @TIME_Z ONE_MINUTE S_OFFSET,  PREVIOUS_H _WAITING_L IST.EVACUA TION_EXPEC TED_DATE),  108) END 
  349                                      ' TO ' +  CASE WHEN  PREVIOUS_ H_WAITING_ LIST.EVACU ATION_EXPE CTED_DATE  IS NULL TH EN '<Empty >' ELSE CO NVERT(VARC HAR, DATEA DD (minute , @TIME_ZO NE_MINUTES _OFFSET, H _WAITING_L IST.EVACUA TION_EXPEC TED_DATE),  101) + '  ' + CONVER T(VARCHAR( 5), DATEAD D (minute,  @TIME_ZON E_MINUTES_ OFFSET, H_ WAITING_LI ST.EVACUAT ION_EXPECT ED_DATE),  108) END +  char(13)+ char(10) E LSE '' END  +
  350                    CASE  WHEN H_WA ITING_LIST .EVACUATIO N_ACTUAL_D ATE <> PRE VIOUS_H_WA ITING_LIST .EVACUATIO N_ACTUAL_D ATE OR (H_ WAITING_LI ST.EVACUAT ION_ACTUAL _DATE IS N ULL AND PR EVIOUS_H_W AITING_LIS T.EVACUATI ON_ACTUAL_ DATE IS NO T NULL) OR  (H_WAITIN G_LIST.EVA CUATION_AC TUAL_DATE  IS NOT NUL L AND PREV IOUS_H_WAI TING_LIST. EVACUATION _ACTUAL_DA TE IS NULL )
  351                             THEN ' EVACUATION  ACTUAL DA TE FROM '  + CASE WHE N PREVIOUS _H_WAITING _LIST.EVAC UATION_ACT UAL_DATE I S NULL THE N '<Empty> ' ELSE CON VERT(VARCH AR, DATEAD D (minute,  @TIME_ZON E_MINUTES_ OFFSET, PR EVIOUS_H_W AITING_LIS T.EVACUATI ON_ACTUAL_ DATE), 101 ) + ' ' +  CONVERT(VA RCHAR(5),  DATEADD (m inute, @TI ME_ZONE_MI NUTES_OFFS ET, PREVIO US_H_WAITI NG_LIST.EV ACUATION_A CTUAL_DATE ), 108) EN D + 
  352                                      ' TO ' +  CASE WHEN  H_WAITING _LIST.EVAC UATION_ACT UAL_DATE I S NULL THE N '<Empty> ' ELSE CON VERT(VARCH AR, DATEAD D (minute,  @TIME_ZON E_MINUTES_ OFFSET, H_ WAITING_LI ST.EVACUAT ION_ACTUAL _DATE), 10 1) + ' ' +  CONVERT(V ARCHAR(5),  DATEADD ( minute, @T IME_ZONE_M INUTES_OFF SET, H_WAI TING_LIST. EVACUATION _ACTUAL_DA TE), 108)  END + char (13)+char( 10) ELSE ' ' END +
  353                    CASE  WHEN H_WA ITING_LIST .EVACUATIO N_REASON_F OR_DELAY < > PREVIOUS _H_WAITING _LIST.EVAC UATION_REA SON_FOR_DE LAY OR (H_ WAITING_LI ST.EVACUAT ION_REASON _FOR_DELAY  IS NULL A ND PREVIOU S_H_WAITIN G_LIST.EVA CUATION_RE ASON_FOR_D ELAY IS NO T NULL) OR  (H_WAITIN G_LIST.EVA CUATION_RE ASON_FOR_D ELAY IS NO T NULL AND  PREVIOUS_ H_WAITING_ LIST.EVACU ATION_REAS ON_FOR_DEL AY IS NULL
  354                             THEN ' EVACUATION  REASON FO R DELAY FR OM ' + ISN ULL(PREVIO US_H_WAITI NG_LIST.EV ACUATION_R EASON_FOR_ DELAY, '<E mpty>') +  ' TO ' + I SNULL(H_WA ITING_LIST .EVACUATIO N_REASON_F OR_DELAY,  '<Empty>')  + char(13 )+char(10)  ELSE '' E ND +
  355                    CASE  WHEN H_WA ITING_LIST .EVACUATIO N_TRANSFER _EVACUATE_ TO <> PREV IOUS_H_WAI TING_LIST. EVACUATION _TRANSFER_ EVACUATE_T O OR (H_WA ITING_LIST .EVACUATIO N_TRANSFER _EVACUATE_ TO IS NULL  AND PREVI OUS_H_WAIT ING_LIST.E VACUATION_ TRANSFER_E VACUATE_TO  IS NOT NU LL) OR (H_ WAITING_LI ST.EVACUAT ION_TRANSF ER_EVACUAT E_TO IS NO T NULL AND  PREVIOUS_ H_WAITING_ LIST.EVACU ATION_TRAN SFER_EVACU ATE_TO IS  NULL)
  356                             THEN ' EVACUATION  TRANSFER  EVACUATE T O ' + ISNU LL(PREVIOU S_H_WAITIN G_LIST.EVA CUATION_TR ANSFER_EVA CUATE_TO,  '<Empty>')  + ' TO '  + ISNULL(H _WAITING_L IST.EVACUA TION_TRANS FER_EVACUA TE_TO, '<E mpty>') +  char(13)+c har(10) EL SE '' END  +
  357                    CASE  WHEN H_WA ITING_LIST .EVACUATIO N_EQUIP_SU PPLY_REQUI REMENTS <>  PREVIOUS_ H_WAITING_ LIST.EVACU ATION_EQUI P_SUPPLY_R EQUIREMENT S OR (H_WA ITING_LIST .EVACUATIO N_EQUIP_SU PPLY_REQUI REMENTS IS  NULL AND  PREVIOUS_H _WAITING_L IST.EVACUA TION_EQUIP _SUPPLY_RE QUIREMENTS  IS NOT NU LL) OR (H_ WAITING_LI ST.EVACUAT ION_EQUIP_ SUPPLY_REQ UIREMENTS  IS NOT NUL L AND PREV IOUS_H_WAI TING_LIST. EVACUATION _EQUIP_SUP PLY_REQUIR EMENTS IS  NULL)
  358                             THEN ' EVACUATION  EQUIPMENT  SUPPLY RE QUIREMENTS  ' + ISNUL L(PREVIOUS _H_WAITING _LIST.EVAC UATION_EQU IP_SUPPLY_ REQUIREMEN TS, '<Empt y>') + ' T O ' + ISNU LL(H_WAITI NG_LIST.EV ACUATION_E QUIP_SUPPL Y_REQUIREM ENTS, '<Em pty>') + c har(13)+ch ar(10) ELS E '' END +
  359                    CASE  WHEN H_WA ITING_LIST .EVACUATIO N_TRANSPOR TATION_CAR E_LEVEL <>  PREVIOUS_ H_WAITING_ LIST.EVACU ATION_TRAN SPORTATION _CARE_LEVE L OR (H_WA ITING_LIST .EVACUATIO N_TRANSPOR TATION_CAR E_LEVEL IS  NULL AND  PREVIOUS_H _WAITING_L IST.EVACUA TION_TRANS PORTATION_ CARE_LEVEL  IS NOT NU LL) OR (H_ WAITING_LI ST.EVACUAT ION_TRANSP ORTATION_C ARE_LEVEL  IS NOT NUL L AND PREV IOUS_H_WAI TING_LIST. EVACUATION _TRANSPORT ATION_CARE _LEVEL IS  NULL)
  360                             THEN ' EVACUATION  TRANSPORT ATION CARE  LEVEL ' +  ISNULL(PR EVIOUS_H_W AITING_LIS T.EVACUATI ON_TRANSPO RTATION_CA RE_LEVEL,  '<Empty>')  + ' TO '  + ISNULL(H _WAITING_L IST.EVACUA TION_TRANS PORTATION_ CARE_LEVEL , '<Empty> ') + char( 13)+char(1 0) ELSE ''  END +
  361                    CASE  WHEN H_WA ITING_LIST .EVACUATIO N_ENROUTE_ MEDICAL_AT TENDANT <>  PREVIOUS_ H_WAITING_ LIST.EVACU ATION_ENRO UTE_MEDICA L_ATTENDAN T OR (H_WA ITING_LIST .EVACUATIO N_ENROUTE_ MEDICAL_AT TENDANT IS  NULL AND  PREVIOUS_H _WAITING_L IST.EVACUA TION_ENROU TE_MEDICAL _ATTENDANT  IS NOT NU LL) OR (H_ WAITING_LI ST.EVACUAT ION_ENROUT E_MEDICAL_ ATTENDANT  IS NOT NUL L AND PREV IOUS_H_WAI TING_LIST. EVACUATION _ENROUTE_M EDICAL_ATT ENDANT IS  NULL)
  362                             THEN ' EVACUATION  ENROUTE M EDICAL ATT ENDANT ' +  ISNULL(PR EVIOUS_H_W AITING_LIS T.EVACUATI ON_ENROUTE _MEDICAL_A TTENDANT,  '<Empty>')  + ' TO '  + ISNULL(H _WAITING_L IST.EVACUA TION_ENROU TE_MEDICAL _ATTENDANT , '<Empty> ') + char( 13)+char(1 0) ELSE ''  END +
  363                    CASE  WHEN H_WA ITING_LIST .EVACUATIO N_ENROUTE_ NON_MEDICA L_ATTENDAN T <> PREVI OUS_H_WAIT ING_LIST.E VACUATION_ ENROUTE_NO N_MEDICAL_ ATTENDANT  OR (H_WAIT ING_LIST.E VACUATION_ ENROUTE_NO N_MEDICAL_ ATTENDANT  IS NULL AN D PREVIOUS _H_WAITING _LIST.EVAC UATION_ENR OUTE_NON_M EDICAL_ATT ENDANT IS  NOT NULL)  OR (H_WAIT ING_LIST.E VACUATION_ ENROUTE_NO N_MEDICAL_ ATTENDANT  IS NOT NUL L AND PREV IOUS_H_WAI TING_LIST. EVACUATION _ENROUTE_N ON_MEDICAL _ATTENDANT  IS NULL)
  364                             THEN ' EVACUATION  ENROUTE N ON-MEDICAL  ATTENDANT  ' + ISNUL L(PREVIOUS _H_WAITING _LIST.EVAC UATION_ENR OUTE_NON_M EDICAL_ATT ENDANT, '< Empty>') +  ' TO ' +  ISNULL(H_W AITING_LIS T.EVACUATI ON_ENROUTE _NON_MEDIC AL_ATTENDA NT, '<Empt y>') + cha r(13)+char (10) ELSE  '' END +
  365                    CASE  WHEN TT1. ID <> TT2. ID OR (TT1 .DISPLAY_N AME IS NUL L AND TT2. DISPLAY_NA ME IS NOT  NULL) OR ( TT1.DISPLA Y_NAME IS  NOT NULL A ND TT2.DIS PLAY_NAME  IS NULL)
  366                             THEN ' EVACUATION  TRANSPORT ATION TYPE  FROM ' +  ISNULL(TT1 .DISPLAY_N AME, '<Emp ty>') + '  TO ' + ISN ULL(TT2.DI SPLAY_NAME , '<Empty> ') + char( 13)+char(1 0) ELSE ''  END +
  367                    CASE  WHEN TP1. ID <> TP2. ID OR (TP1 .DISPLAY_N AME IS NUL L AND TP2. DISPLAY_NA ME IS NOT  NULL) OR ( TP1.DISPLA Y_NAME IS  NOT NULL A ND TP2.DIS PLAY_NAME  IS NULL)
  368                             THEN ' EVACUATION  TRANSPORT ATION PROV IDER FROM  ' + ISNULL (TP1.DISPL AY_NAME, ' <Empty>')  + ' TO ' +  ISNULL(TP 2.DISPLAY_ NAME, '<Em pty>') + c har(13)+ch ar(10) ELS E '' END +
  369                    CASE  WHEN WA1. ID <> WA2. ID OR (WA1 .DISPLAY_N AME IS NUL L AND WA2. DISPLAY_NA ME IS NOT  NULL) OR ( WA1.DISPLA Y_NAME IS  NOT NULL A ND WA2.DIS PLAY_NAME  IS NULL)
  370                             THEN ' WAITING AR EA FROM '  + ISNULL(W A1.DISPLAY _NAME, '<E mpty>') +  ' TO ' + I SNULL(WA2. DISPLAY_NA ME, '<Empt y>') + cha r(13)+char (10) ELSE  '' END +
  371                    CASE  WHEN H_WA ITING_LIST .EVACUATIO N_TRANSPOR TATION_COM MENTS <> P REVIOUS_H_ WAITING_LI ST.EVACUAT ION_TRANSP ORTATION_C OMMENTS OR  (H_WAITIN G_LIST.EVA CUATION_TR ANSPORTATI ON_COMMENT S IS NULL  AND PREVIO US_H_WAITI NG_LIST.EV ACUATION_T RANSPORTAT ION_COMMEN TS IS NOT  NULL) OR ( H_WAITING_ LIST.EVACU ATION_TRAN SPORTATION _COMMENTS  IS NOT NUL L AND PREV IOUS_H_WAI TING_LIST. EVACUATION _TRANSPORT ATION_COMM ENTS IS NU LL)
  372                             THEN ' EVACUATION  TRANSPORT ATION COMM ENTS ' + I SNULL(PREV IOUS_H_WAI TING_LIST. EVACUATION _TRANSPORT ATION_COMM ENTS, '<Em pty>') + '  TO ' + IS NULL(H_WAI TING_LIST. EVACUATION _TRANSPORT ATION_COMM ENTS, '<Em pty>') + c har(13)+ch ar(10) ELS E '' END +
  373                    CASE  WHEN H_WA ITING_LIST .EVACUATIO N_DESTINAT ION_ADDRES S <> PREVI OUS_H_WAIT ING_LIST.E VACUATION_ DESTINATIO N_ADDRESS  OR (H_WAIT ING_LIST.E VACUATION_ DESTINATIO N_ADDRESS  IS NULL AN D PREVIOUS _H_WAITING _LIST.EVAC UATION_DES TINATION_A DDRESS IS  NOT NULL)  OR (H_WAIT ING_LIST.E VACUATION_ DESTINATIO N_ADDRESS  IS NOT NUL L AND PREV IOUS_H_WAI TING_LIST. EVACUATION _DESTINATI ON_ADDRESS  IS NULL)
  374                             THEN ' EVACUATION  DESTINATI ON ADDRESS  ' + ISNUL L(PREVIOUS _H_WAITING _LIST.EVAC UATION_DES TINATION_A DDRESS, '< Empty>') +  ' TO ' +  ISNULL(H_W AITING_LIS T.EVACUATI ON_DESTINA TION_ADDRE SS, '<Empt y>') + cha r(13)+char (10) ELSE  '' END +
  375                    CASE  WHEN H_WA ITING_LIST .EVACUATIO N_DESTINAT ION_CITY_S TATE <> PR EVIOUS_H_W AITING_LIS T.EVACUATI ON_DESTINA TION_CITY_ STATE OR ( H_WAITING_ LIST.EVACU ATION_DEST INATION_CI TY_STATE I S NULL AND  PREVIOUS_ H_WAITING_ LIST.EVACU ATION_DEST INATION_CI TY_STATE I S NOT NULL ) OR (H_WA ITING_LIST .EVACUATIO N_DESTINAT ION_CITY_S TATE IS NO T NULL AND  PREVIOUS_ H_WAITING_ LIST.EVACU ATION_DEST INATION_CI TY_STATE I S NULL) 
  376                             THEN ' EVACUATION  DESTINATI ON CITY ST ATE ' + IS NULL(PREVI OUS_H_WAIT ING_LIST.E VACUATION_ DESTINATIO N_CITY_STA TE, '<Empt y>') + ' T O ' + ISNU LL(H_WAITI NG_LIST.EV ACUATION_D ESTINATION _CITY_STAT E, '<Empty >') + char (13)+char( 10) ELSE ' ' END +
  377                    CASE  WHEN H_WA ITING_LIST .EVACUATIO N_DESTINAT ION_POC_TE LEPHONE !=  PREVIOUS_ H_WAITING_ LIST.EVACU ATION_DEST INATION_PO C_TELEPHON E OR (H_WA ITING_LIST .EVACUATIO N_DESTINAT ION_POC_TE LEPHONE IS  NULL AND  PREVIOUS_H _WAITING_L IST.EVACUA TION_DESTI NATION_POC _TELEPHONE  IS NOT NU LL) OR (H_ WAITING_LI ST.EVACUAT ION_DESTIN ATION_POC_ TELEPHONE  IS NOT NUL L AND PREV IOUS_H_WAI TING_LIST. EVACUATION _DESTINATI ON_POC_TEL EPHONE IS  NULL)
  378                             THEN ' EVACUATION  DESTINATI ON POC TEL EPHONE ' +  ISNULL(PR EVIOUS_H_W AITING_LIS T.EVACUATI ON_DESTINA TION_POC_T ELEPHONE,  '<Empty>')  + ' TO '  + ISNULL(H _WAITING_L IST.EVACUA TION_DESTI NATION_POC _TELEPHONE , '<Empty> ') + char( 13)+char(1 0) ELSE ''  END +
  379                     CASE WHEN  H_WAITING_ LIST.E DNS    TION_ORIGI NATOR_POC_ TELEPHONE  != PREVIOU S_H_WAITIN G_LIST.E DNS    TION_ORIGI NATOR_POC_ TELEPHONE  OR (H_WAIT ING_LIST.E DNS    TION_ORIGI NATOR_POC_ TELEPHONE  IS NULL AN D PREVIOUS _H_WAITING _LIST.E DNS    TION_ORIGI NATOR_POC_ TELEPHONE  IS NOT NUL L) OR (H_W AITING_LIS T.E DNS    TION_ORIGI NATOR_POC_ TELEPHONE  IS NOT NUL L AND PREV IOUS_H_WAI TING_LIST. E DNS    TION_ORIGI NATOR_POC_ TELEPHONE  IS NULL)
  380                              THEN 'EVAC UATION ORI GINATOR PO C TELEPHON E ' + ISNU LL(PREVIOU S_H_WAITIN G_LIST.E DNS    TION_ORIGI NATOR_POC_ TELEPHONE,  '<Empty>' ) + ' TO '  + ISNULL( H_WAITING_ LIST.E DNS    TION_ORIGI NATOR_POC_ TELEPHONE,  '<Empty>' ) + char(1 3)+char(10 ) ELSE ''  END +
  381                    CASE  WHEN H_WA ITING_LIST .EVACUATIO N_COMMENTS  != PREVIO US_H_WAITI NG_LIST.EV ACUATION_C OMMENTS OR  (H_WAITIN G_LIST.EVA CUATION_CO MMENTS IS  NULL AND P REVIOUS_H_ WAITING_LI ST.EVACUAT ION_COMMEN TS IS NOT  NULL) OR ( H_WAITING_ LIST.EVACU ATION_COMM ENTS IS NO T NULL AND  PREVIOUS_ H_WAITING_ LIST.EVACU ATION_COMM ENTS IS NU LL) 
  382                             THEN ' EVACUATION  COMMENTS  FROM ' + I SNULL(PREV IOUS_H_WAI TING_LIST. EVACUATION _COMMENTS,  '<Empty>' ) + ' TO '  + ISNULL( H_WAITING_ LIST.EVACU ATION_COMM ENTS, '<Em pty>') + c har(13)+ch ar(10) ELS E '' END +
  383                    CASE  WHEN H_WA ITING_LIST .EVACUATIO N_ENROUTE_ MEDICAL_AT TENDANT_NU MBER != PR EVIOUS_H_W AITING_LIS T.EVACUATI ON_ENROUTE _MEDICAL_A TTENDANT_N UMBER OR ( H_WAITING_ LIST.EVACU ATION_ENRO UTE_MEDICA L_ATTENDAN T_NUMBER I S NULL AND  PREVIOUS_ H_WAITING_ LIST.EVACU ATION_ENRO UTE_MEDICA L_ATTENDAN T_NUMBER I S NOT NULL ) OR (H_WA ITING_LIST .EVACUATIO N_ENROUTE_ MEDICAL_AT TENDANT_NU MBER IS NO T NULL AND  PREVIOUS_ H_WAITING_ LIST.EVACU ATION_ENRO UTE_MEDICA L_ATTENDAN T_NUMBER I S NULL) 
  384                             THEN ' EVACUATION  ENROUTE M EDICAL ATT ENDANT NUM BER ' + IS NULL(CONVE RT(VARCHAR (30), PREV IOUS_H_WAI TING_LIST. EVACUATION _ENROUTE_M EDICAL_ATT ENDANT_NUM BER), '<Em pty>') + '  TO ' + IS NULL(CONVE RT(VARCHAR (30), H_WA ITING_LIST .EVACUATIO N_ENROUTE_ MEDICAL_AT TENDANT_NU MBER), '<E mpty>') +  char(13)+c har(10) EL SE '' END  +
  385                    CASE  WHEN H_WA ITING_LIST .EVACUATIO N_VEHICLE_ ID <> PREV IOUS_H_WAI TING_LIST. EVACUATION _VEHICLE_I D OR (H_WA ITING_LIST .EVACUATIO N_VEHICLE_ ID IS NULL  AND PREVI OUS_H_WAIT ING_LIST.E VACUATION_ VEHICLE_ID  IS NOT NU LL) OR (H_ WAITING_LI ST.EVACUAT ION_VEHICL E_ID IS NO T NULL AND  PREVIOUS_ H_WAITING_ LIST.EVACU ATION_VEHI CLE_ID IS  NULL) 
  386                             THEN ' EVACUATION  VEHICLE I D FROM ' +  ISNULL(PR EVIOUS_H_W AITING_LIS T.EVACUATI ON_VEHICLE _ID, '<Emp ty>') + '  TO ' + ISN ULL(H_WAIT ING_LIST.E VACUATION_ VEHICLE_ID , '<Empty> ') + char( 13)+char(1 0) ELSE ''  END +
  387                    CASE  WHEN H_WA ITING_LIST .EVACUATIO N_VEHICLE_ SEAT_POSIT ION != PRE VIOUS_H_WA ITING_LIST .EVACUATIO N_VEHICLE_ SEAT_POSIT ION OR (H_ WAITING_LI ST.EVACUAT ION_VEHICL E_SEAT_POS ITION IS N ULL AND PR EVIOUS_H_W AITING_LIS T.EVACUATI ON_VEHICLE _SEAT_POSI TION IS NO T NULL) OR  (H_WAITIN G_LIST.EVA CUATION_VE HICLE_SEAT _POSITION  IS NOT NUL L AND PREV IOUS_H_WAI TING_LIST. EVACUATION _VEHICLE_S EAT_POSITI ON IS NULL )  
  388                             THEN ' EVACUATION  VEHICLE S EAT POSITI ON FROM '  + ISNULL(P REVIOUS_H_ WAITING_LI ST.EVACUAT ION_VEHICL E_SEAT_POS ITION, '<E mpty>') +  ' TO ' + I SNULL(H_WA ITING_LIST .EVACUATIO N_VEHICLE_ SEAT_POSIT ION, '<Emp ty>') + ch ar(13)+cha r(10) ELSE  '' END +
  389                    CASE  WHEN H_WA ITING_LIST .EVACUATIO N_MA_TELEP HONE != PR EVIOUS_H_W AITING_LIS T.EVACUATI ON_MA_TELE PHONE OR ( H_WAITING_ LIST.EVACU ATION_MA_T ELEPHONE I S NULL AND  PREVIOUS_ H_WAITING_ LIST.EVACU ATION_MA_T ELEPHONE I S NOT NULL ) OR (H_WA ITING_LIST .EVACUATIO N_MA_TELEP HONE IS NO T NULL AND  PREVIOUS_ H_WAITING_ LIST.EVACU ATION_MA_T ELEPHONE I S NULL) 
  390                             THEN ' EVACUATION  MA TELEPH ONE ' + IS NULL(CONVE RT(VARCHAR (30), PREV IOUS_H_WAI TING_LIST. EVACUATION _MA_TELEPH ONE), '<Em pty>') + '  TO ' + IS NULL(CONVE RT(VARCHAR (30), H_WA ITING_LIST .EVACUATIO N_MA_TELEP HONE), '<E mpty>') +  char(13)+c har(10) EL SE '' END  +
  391                    CASE  WHEN H_WA ITING_LIST .EVACUATIO N_NMA_TELE PHONE != P REVIOUS_H_ WAITING_LI ST.EVACUAT ION_NMA_TE LEPHONE OR  (H_WAITIN G_LIST.EVA CUATION_NM A_TELEPHON E IS NULL  AND PREVIO US_H_WAITI NG_LIST.EV ACUATION_N MA_TELEPHO NE IS NOT  NULL) OR ( H_WAITING_ LIST.EVACU ATION_NMA_ TELEPHONE  IS NOT NUL L AND PREV IOUS_H_WAI TING_LIST. EVACUATION _NMA_TELEP HONE IS NU LL) 
  392                             THEN ' EVACUATION  NMA TELEP HONE ' + I SNULL(CONV ERT(VARCHA R(30), PRE VIOUS_H_WA ITING_LIST .EVACUATIO N_NMA_TELE PHONE), '< Empty>') +  ' TO ' +  ISNULL(CON VERT(VARCH AR(30), H_ WAITING_LI ST.EVACUAT ION_NMA_TE LEPHONE),  '<Empty>')  + char(13 )+char(10)  ELSE '' E ND +
  393                    CASE  WHEN H_WA ITING_LIST .EVACUATIO N_ORIGINAT ING_FACILI TY_NAME !=  PREVIOUS_ H_WAITING_ LIST.EVACU ATION_ORIG INATING_FA CILITY_NAM E OR (H_WA ITING_LIST .EVACUATIO N_ORIGINAT ING_FACILI TY_NAME IS  NULL AND  PREVIOUS_H _WAITING_L IST.EVACUA TION_ORIGI NATING_FAC ILITY_NAME  IS NOT NU LL) OR (H_ WAITING_LI ST.EVACUAT ION_ORIGIN ATING_FACI LITY_NAME  IS NOT NUL L AND PREV IOUS_H_WAI TING_LIST. EVACUATION _ORIGINATI NG_FACILIT Y_NAME IS  NULL) 
  394                             THEN ' EVACUATION  ORIGINATI NG FACILIT Y NAME ' +  ISNULL(CO NVERT(VARC HAR(30), P REVIOUS_H_ WAITING_LI ST.EVACUAT ION_ORIGIN ATING_FACI LITY_NAME) , '<Empty> ') + ' TO  ' + ISNULL (CONVERT(V ARCHAR(30) , H_WAITIN G_LIST.EVA CUATION_OR IGINATING_ FACILITY_N AME), '<Em pty>') + c har(13)+ch ar(10) ELS E '' END +
  395                    CASE  WHEN H_WA ITING_LIST .EVACUATIO N_ORIGINAT ING_ADDRES S != PREVI OUS_H_WAIT ING_LIST.E VACUATION_ ORIGINATIN G_ADDRESS  OR (H_WAIT ING_LIST.E VACUATION_ ORIGINATIN G_ADDRESS  IS NULL AN D PREVIOUS _H_WAITING _LIST.EVAC UATION_ORI GINATING_A DDRESS IS  NOT NULL)  OR (H_WAIT ING_LIST.E VACUATION_ ORIGINATIN G_ADDRESS  IS NOT NUL L AND PREV IOUS_H_WAI TING_LIST. EVACUATION _ORIGINATI NG_ADDRESS  IS NULL) 
  396                             THEN ' EVACUATION  ORIGINATI NG ADDRESS  ' + ISNUL L(CONVERT( VARCHAR(30 ), PREVIOU S_H_WAITIN G_LIST.EVA CUATION_OR IGINATING_ ADDRESS),  '<Empty>')  + ' TO '  + ISNULL(C ONVERT(VAR CHAR(30),  H_WAITING_ LIST.EVACU ATION_ORIG INATING_AD DRESS), '< Empty>') +  char(13)+ char(10) E LSE '' END  +
  397                    CASE  WHEN H_WA ITING_LIST .EVACUATIO N_ORIGINAT ING_CITY_S TATE != PR EVIOUS_H_W AITING_LIS T.EVACUATI ON_ORIGINA TING_CITY_ STATE OR ( H_WAITING_ LIST.EVACU ATION_ORIG INATING_CI TY_STATE I S NULL AND  PREVIOUS_ H_WAITING_ LIST.EVACU ATION_ORIG INATING_CI TY_STATE I S NOT NULL ) OR (H_WA ITING_LIST .EVACUATIO N_ORIGINAT ING_CITY_S TATE IS NO T NULL AND  PREVIOUS_ H_WAITING_ LIST.EVACU ATION_ORIG INATING_CI TY_STATE I S NULL) 
  398                             THEN ' EVACUATION  ORIGINATI NG CITY ST ATE ' + IS NULL(CONVE RT(VARCHAR (30), PREV IOUS_H_WAI TING_LIST. EVACUATION _ORIGINATI NG_CITY_ST ATE), '<Em pty>') + '  TO ' + IS NULL(CONVE RT(VARCHAR (30), H_WA ITING_LIST .EVACUATIO N_ORIGINAT ING_CITY_S TATE), '<E mpty>') +  char(13)+c har(10) EL SE '' END  +
  399                    CASE  WHEN H_WA ITING_LIST .EVACUATIO N_VEHICLE_ OPERATOR_N AME != PRE VIOUS_H_WA ITING_LIST .EVACUATIO N_VEHICLE_ OPERATOR_N AME OR (H_ WAITING_LI ST.EVACUAT ION_VEHICL E_OPERATOR _NAME IS N ULL AND PR EVIOUS_H_W AITING_LIS T.EVACUATI ON_VEHICLE _OPERATOR_ NAME IS NO T NULL) OR  (H_WAITIN G_LIST.EVA CUATION_VE HICLE_OPER ATOR_NAME  IS NOT NUL L AND PREV IOUS_H_WAI TING_LIST. EVACUATION _VEHICLE_O PERATOR_NA ME IS NULL
  400                             THEN ' EVACUATION  VEHICLE O PERATOR NA ME ' + ISN ULL(CONVER T(VARCHAR( 30), PREVI OUS_H_WAIT ING_LIST.E VACUATION_ VEHICLE_OP ERATOR_NAM E), '<Empt y>') + ' T O ' + ISNU LL(CONVERT (VARCHAR(3 0), H_WAIT ING_LIST.E VACUATION_ VEHICLE_OP ERATOR_NAM E), '<Empt y>') + cha r(13)+char (10) ELSE  '' END +
  401                    CASE  WHEN H_WA ITING_LIST .EVACUATIO N_VEHICLE_ OPERATOR_T ELEPHONE ! = PREVIOUS _H_WAITING _LIST.EVAC UATION_VEH ICLE_OPERA TOR_TELEPH ONE OR (H_ WAITING_LI ST.EVACUAT ION_VEHICL E_OPERATOR _TELEPHONE  IS NULL A ND PREVIOU S_H_WAITIN G_LIST.EVA CUATION_VE HICLE_OPER ATOR_TELEP HONE IS NO T NULL) OR  (H_WAITIN G_LIST.EVA CUATION_VE HICLE_OPER ATOR_TELEP HONE IS NO T NULL AND  PREVIOUS_ H_WAITING_ LIST.EVACU ATION_VEHI CLE_OPERAT OR_TELEPHO NE IS NULL
  402                             THEN ' EVACUATION  VEHICLE O PERATOR TE LEPHONE '  + ISNULL(C ONVERT(VAR CHAR(30),  PREVIOUS_H _WAITING_L IST.EVACUA TION_VEHIC LE_OPERATO R_TELEPHON E), '<Empt y>') + ' T O ' + ISNU LL(CONVERT (VARCHAR(3 0), H_WAIT ING_LIST.E VACUATION_ VEHICLE_OP ERATOR_TEL EPHONE), ' <Empty>')  + char(13) +char(10)  ELSE '' EN D +
  403                    CASE  WHEN H_WA ITING_LIST .EVACUATIO N_ENROUTE_ NON_MEDICA L_ATTENDAN T_NUMBER ! = PREVIOUS _H_WAITING _LIST.EVAC UATION_ENR OUTE_NON_M EDICAL_ATT ENDANT_NUM BER OR (H_ WAITING_LI ST.EVACUAT ION_ENROUT E_NON_MEDI CAL_ATTEND ANT_NUMBER  IS NULL A ND PREVIOU S_H_WAITIN G_LIST.EVA CUATION_EN ROUTE_NON_ MEDICAL_AT TENDANT_NU MBER IS NO T NULL) OR  (H_WAITIN G_LIST.EVA CUATION_EN ROUTE_NON_ MEDICAL_AT TENDANT_NU MBER IS NO T NULL AND  PREVIOUS_ H_WAITING_ LIST.EVACU ATION_ENRO UTE_NON_ME DICAL_ATTE NDANT_NUMB ER IS NULL
  404                             THEN ' EVACUATION  ENROUTE N ON-MEDICAL  ATTENDANT  NUMBER '  + ISNULL(C ONVERT(VAR CHAR(30),  PREVIOUS_H _WAITING_L IST.EVACUA TION_ENROU TE_NON_MED ICAL_ATTEN DANT_NUMBE R), '<Empt y>') + ' T O ' + ISNU LL(CONVERT (VARCHAR(3 0), H_WAIT ING_LIST.E VACUATION_ ENROUTE_NO N_MEDICAL_ ATTENDANT_ NUMBER), ' <Empty>')  + char(13) +char(10)  ELSE '' EN D
  405  
  406           EL SE ''--H_W AITING_LIS T.ACTION_H ISTORY 
  407           EN D as TRAN_ UPDS,
  408           CA SE WHEN (H _WAITING_L IST.COMMEN TS != PREV IOUS_H_WAI TING_LIST. COMMENTS)  OR (H_WAIT ING_LIST.C OMMENTS IS  NULL AND  PREVIOUS_H _WAITING_L IST.COMMEN TS IS NOT  NULL) OR ( H_WAITING_ LIST.COMME NTS IS NOT  NULL AND  PREVIOUS_H _WAITING_L IST.COMMEN TS IS NULL
  409                    THEN   'COMMENT S FROM ' +  ISNULL(PR EVIOUS_H_W AITING_LIS T.COMMENTS , '<Empty> ') + ' TO  ' + ISNULL (H_WAITING _LIST.COMM ENTS, '<Em pty>') ELS E '' END a s TRAN_COM MENTS
  410           
  411           FR OM #TRANHI STORY H_WA ITING_LIST
  412           LE FT JOIN #T RANHISTORY  AS PREVIO US_H_WAITI NG_LIST 
  413           ON  PREVIOUS_ H_WAITING_ LIST.ACT_I D = H_WAIT ING_LIST.A CT_ID 
  414                AND PREV IOUS_H_WAI TING_LIST. PK < H_WAI TING_LIST. PK
  415           LE FT JOIN BM S_EIS.dbo. ENTITY AS  ENTITY1 
  416           ON  ENTITY1.I DENTIFIER  = PREVIOUS _H_WAITING _LIST.FACI LITY_UID
  417           LE FT JOIN BM S_EIS.dbo. EHL7_ORGAN IZATION AS  ORG1 
  418           ON  ORG1.PFK_ ORGANIZATI ON = ENTIT Y1.PK_ENTI TY
  419       -- her e are the  2 joins on  ENTITY2
  420           LE FT JOIN BM S_EIS.dbo. ENTITY AS  ENTITY2 
  421           ON  ENTITY2.I DENTIFIER  = H_WAITIN G_LIST.FAC ILITY_UID
  422           LE FT JOIN BM S_EIS.dbo. EHL7_ORGAN IZATION AS  ORG2 
  423           ON  ORG2.PFK_ ORGANIZATI ON = ENTIT Y2.PK_ENTI TY
  424       -- on  of the imp licit conv ersion pro blems was  here below
  425           LE FT JOIN BM S_EIS.dbo. ENTITY AS  VISTASITE1  
  426           ON  VISTASITE 1.IDENTIFI ER = PREVI OUS_H_WAIT ING_LIST.V ISTA_SITE_ UID
  427           LE FT JOIN BM S_EIS.dbo. EHL7_ORGAN IZATION AS  VISTANAME
  428           ON  VISTANAME 1.PFK_ORGA NIZATION =  VISTASITE 1.PK_ENTIT Y
  429           LE FT JOIN BM S_EIS.dbo. ENTITY AS  VISTASITE2  
  430           ON  VISTASITE 2.IDENTIFI ER = H_WAI TING_LIST. VISTA_SITE _UID
  431           LE FT JOIN BM S_EIS.dbo. EHL7_ORGAN IZATION AS  VISTANAME
  432           ON  VISTANAME 2.PFK_ORGA NIZATION =  VISTASITE 2.PK_ENTIT Y
  433           LE FT JOIN #M Y_CONCEPT_ H AS WA1 
  434           ON  WA1.Id =  PREVIOUS_H _WAITING_L IST.WAITIN G_AREA_ID 
  435                AND WA1. CODE_SYSTE M_NAME = ' WaitingAre a'
  436           LE FT JOIN #M Y_CONCEPT_ H AS WA2 
  437           ON  WA2.Id =  H_WAITING_ LIST.WAITI NG_AREA_ID  
  438                AND WA2. CODE_SYSTE M_NAME = ' WaitingAre a'
  439           LE FT JOIN #M Y_CONCEPT_ H AS FD1 O N FD1.ID =  PREVIOUS_ H_WAITING_ LIST.FEE_D ISPOSITION _ID AND FD 1.CODE_SYS TEM_NAME =  'FeeDispo sition'
  440           LE FT JOIN #M Y_CONCEPT_ H AS FD2 O N FD2.ID =  H_WAITING _LIST.FEE_ DISPOSITIO N_ID AND F D2.CODE_SY STEM_NAME  = 'FeeDisp osition'
  441           LE FT JOIN #M Y_CONCEPT_ H AS ED1 O N ED1.ID =  PREVIOUS_ H_WAITING_ LIST.EVACU ATION_DISP OSITION_ST ATUS_ID AN D ED1.CODE _SYSTEM_NA ME = 'Evac Dispositio nStatus'  
  442           LE FT JOIN #M Y_CONCEPT_ H AS ED2 O N ED2.ID =  H_WAITING _LIST.EVAC UATION_DIS POSITION_S TATUS_ID A ND ED2.COD E_SYSTEM_N AME = 'Eva cDispositi onStatus'    
  443           LE FT JOIN #M Y_CONCEPT_ H AS TP1 O N TP1.ID =  PREVIOUS_ H_WAITING_ LIST.EVACU ATION_TRAN SPORTATION _PROVIDER_ ID AND TP1 .CODE_SYST EM_NAME =  'Transport ationProvi der'
  444           LE FT JOIN #M Y_CONCEPT_ H AS TP2 O N TP2.ID =  H_WAITING _LIST.EVAC UATION_TRA NSPORTATIO N_PROVIDER _ID AND TP 2.CODE_SYS TEM_NAME =  'Transpor tationProv ider'
  445           LE FT JOIN #M Y_CONCEPT_ H AS TT1 O N TT1.ID =  PREVIOUS_ H_WAITING_ LIST.EVACU ATION_TRAN SPORTATION _TYPE_ID A ND TT1.COD E_SYSTEM_N AME = 'Tra nsportatio nType'
  446           LE FT JOIN #M Y_CONCEPT_ H AS TT2 O N TT2.ID =  H_WAITING _LIST.EVAC UATION_TRA NSPORTATIO N_TYPE_ID  AND TT2.CO DE_SYSTEM_ NAME = 'Tr ansportati onType'
  447           LE FT JOIN #M Y_CONCEPT_ H AS FR1 O N FR1.ID =  PREVIOUS_ H_WAITING_ LIST.REASO N_USING_FE E_ID AND F R1.CODE_SY STEM_NAME  = 'FeeReas on'
  448           LE FT JOIN #M Y_CONCEPT_ H AS FR2 O N FR2.ID =  H_WAITING _LIST.REAS ON_USING_F EE_ID AND  FR2.CODE_S YSTEM_NAME  = 'FeeRea son'
  449           LE FT JOIN #M Y_CONCEPT_ H AS CF1 O N CF1.ID =  PREVIOUS_ H_WAITING_ LIST.CONTR ACT_FEE_ID  AND CF1.C ODE_SYSTEM _NAME = 'S trictDecis ion'
  450           LE FT JOIN #M Y_CONCEPT_ H AS CF2 O N CF2.ID =  H_WAITING _LIST.CONT RACT_FEE_I D AND CF2. CODE_SYSTE M_NAME = ' StrictDeci sion'
  451           LE FT JOIN #M Y_CONCEPT_ H AS AF1 O N AF1.ID =  PREVIOUS_ H_WAITING_ LIST.AUTHO RIZED_FEE_ ID AND AF1 .CODE_SYST EM_NAME =  'StrictDec ision'
  452           LE FT JOIN #M Y_CONCEPT_ H AS AF2 O N AF2.ID =  H_WAITING _LIST.AUTH ORIZED_FEE _ID AND AF 2.CODE_SYS TEM_NAME =  'StrictDe cision'
  453           -- WHERE H_WA ITING_LIST .ACT_ID =  408
  454       -- OPT ION (MAXDO P 1) 
  455  
  456           SE LECT * FRO M #Results  WHERE (TR AN_UPDS +  TRAN_COMME NTS <> '')
  457           DR OP TABLE # TRANHISTOR Y
  458           DR OP TABLE # MY_CONCEPT _H
  459   END
  460   END
  461