341. EPMO Open Source Coordination Office Redaction File Detail Report

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

341.1 Files compared

# Location File Last Modified
1 OSCIF_BMS_v2_iter 2_September_2017.zip\BMS_Cand\BMS_Source_C72993\C72993-Sources.zip\C72993\Source\Sources\Database\CreationScripts\BMS\4.Stored Procedures dbo.usp_Get_Bed_Unavailable.sql Fri Nov 22 17:02:44 2013 UTC
2 OSCIF_BMS_v2_iter 2_September_2017.zip\BMS_Cand\BMS_Source_C72993\C72993-Sources.zip\C72993\Source\Sources\Database\CreationScripts\BMS\4.Stored Procedures dbo.usp_Get_Bed_Unavailable.sql Thu Oct 26 18:29:11 2017 UTC

341.2 Comparison summary

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

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

341.4 Active regular expressions

No regular expressions were active.

341.5 Comparison detail

  1   /****** Ob ject:  Sto redProcedu re [dbo].[ usp_Get_Be d_Unavaila ble]    Sc ript Date:  03/22/201 2 11:04:49  ******/
  2   IF  EXISTS  (SELECT *  FROM sys. objects WH ERE object _id = OBJE CT_ID(N'[d bo].[usp_G et_Bed_Una vailable]' ) AND type  in (N'P',  N'PC'))
  3   DROP PROCE DURE [dbo] .[usp_Get_ Bed_Unavai lable]
  4   GO
  5   SET ANSI_N ULLS ON
  6   GO
  7   SET QUOTED _IDENTIFIE R ON
  8   GO
  9   -- ======= ========== ========== ========== ========
  10   -- Author:                 PII
  11   -- Create  date: 07.0 9.2011
  12   -- Descrip tion: Get  bed unavai lable by I D.
  13   -- ======= ========== ========== ========== ========
  14   CREATE PRO CEDURE [db o].[usp_Ge t_Bed_Unav ailable] 
  15           @A CT_ID INT  = NULL,
  16           @D OMAIN_ID N VARCHAR(50 ) = NULL,
  17           @B ED_UID UNI QUEIDENTIF IER = NULL
  18   AS
  19   BEGIN
  20   SET NOCOUN T ON
  21  
  22           DE CLARE @SQL _SELECT NV ARCHAR(MAX ), @SQL_WH ERE NVARCH AR(MAX), @ SQL NVARCH AR(MAX)
  23  
  24           --  GET THE L IST OF WAR DS
  25           DE CLARE @I I NT, @ROWCO UNT INT, @ FK INT, @W ARD_LIST N VARCHAR(MA X)
  26           IF  (@BED_UID  IS NULL)
  27                    SET  @FK = @ACT _ID
  28           EL SE
  29                    SELE CT @FK = A CT_ID FROM  BED_UNAVA ILABLE AS  BU 
  30                             INNER  JOIN ACT A S A ON A.I D = BU.ACT _ID
  31                    WHER E BED_UID  = @BED_UID  AND COMPL ETEDBY IS  NULL AND C OMPLETED_D ATE IS NUL L AND A.CA NCELED_DAT E IS NULL 
  32  
  33           CR EATE TABLE  #WARDS (I D INT, WAR D_UID UNIQ UEIDENTIFI ER)
  34  
  35           IN SERT INTO  #WARDS (ID , WARD_UID )
  36                    SELE CT ROW_NUM BER() OVER  (ORDER BY  WARD_UID) , WARD_UID  
  37                     FRO M BED_UNAV AILABLE_WA RD
  38                    WHER E BED_UNAV AILABLE_ID  = @FK  
  39           SE T @ROWCOUN T = @@ROWC OUNT
  40  
  41           SE T @I = 1
  42           SE T @WARD_LI ST = COALE SCE(@WARD_ LIST,'')
  43           WH ILE (@I <=  @ROWCOUNT )
  44                    BEGI N
  45                             SELECT  @WARD_LIS T = @WARD_ LIST + CAS T(WARD_UID  AS NVARCH AR(50)) +  ',' FROM # WARDS WHER E ID = @I
  46                             SET @I  = @I + 1
  47                    END
  48  
  49           DR OP TABLE # WARDS
  50                    
  51       SET @S QL_SELECT  = 'SELECT
  52                                                       [A ].[ID] AS  ACT_ID,
  53                                                       [A ].[CREATIO N_DATE],
  54                                                       [A ].[CANCELE D_DATE],
  55                                                       [A ].[PARENT_ ACT_ID],
  56                                                       [A ].[FLOW_ID ],
  57                                                       [A ].[DOMAIN_ ID],
  58                                                       [A ].[IEN],                
  59                                                       [T OCC].[CODE ] AS [TYPE _CODE],
  60                                                       [T OCC].[CODE _SYSTEM] A S [TYPE_CO DE_SYSTEM] ,
  61                                                       [T OCC].[CODE _SYSTEM_NA ME] AS [TY PE_CODE_SY STEM_NAME] ,
  62                                                       [T OCC].[DISP LAY_NAME]  AS [TYPE_D ISPLAY_NAM E],
  63                                                       [R OCC].[CODE ] AS [REAS ON_CODE],
  64                                                       [R OCC].[CODE _SYSTEM] A S [REASON_ CODE_SYSTE M],
  65                                                       [R OCC].[CODE _SYSTEM_NA ME] AS [RE ASON_CODE_ SYSTEM_NAM E],
  66                                                       [R OCC].[DISP LAY_NAME]  AS [REASON _DISPLAY_N AME],
  67                                                       [B U].[DIVISI ON_UID] AS  [DIVISION _UID],
  68                                                       [B U].[BED_UI D] AS [BED _UID],
  69                                                       [B U].[CREATI ONBY] AS [ CREATED_BY ],
  70                                                       [B U].[EDITED BY] AS [ED ITED_BY],
  71                                                       [B U].[EDITED _DATE] AS  [EDITED_DA TE],
  72                                                       [B U].[COMPLE TEDBY] AS  [COMPLETED _BY],
  73                                                       [B U].[COMPLE TED_DATE]  AS [COMPLE TED_DATE],                
  74                                                       [B U].[VISTA_ SITE_UID]  AS [VISTA_ SITE_UID],
  75                                                       [B U].[IS_UNA VAILABLE_F ROM_VISTA]  AS IS_UNA VAILABLE_F ROM_VISTA,           
  76                                                       '' ' + @WARD_ LIST + '''  AS [WARD_ LIST],
  77                                                       [B U].EXPECTE D_COMPLETE D_DATE AS  EXPECTED_C OMPLETED_D ATE 
  78                                                  FROM AC T A
  79                                                       IN NER JOIN B ED_UNAVAIL ABLE AS BU  ON A.ID =  BU.ACT_ID
  80                                                       LE FT JOIN CO NCEPT AS T OCC ON BU. TYPE_ID =  TOCC.ID
  81                                                       LE FT JOIN CO NCEPT AS R OCC ON BU. REASON_ID  = ROCC.ID'
  82                                                                             
  83      SET @SQ L_WHERE =  ' WHERE [A ].[DOMAIN_ ID] = '''  + @DOMAIN_ ID + '''
  84                           AND [BU] .[COMPLETE DBY] IS NU LL AND [BU ].[COMPLET ED_DATE] I S NULL AND  [A].[CANC ELED_DATE]  IS NULL' 
  85      
  86      IF @ACT _ID IS NOT  NULL
  87        SET @ SQL_WHERE  += ' AND [ A].[ID] =  ''' + CAST (@ACT_ID A S VARCHAR)  + '''' 
  88          
  89      IF @BED _UID IS NO T NULL
  90               BEGIN
  91                     SET  @SQL_WHER E += ' AND  BU.BED_UI D = ''' +  CAST(@BED_ UID AS VAR CHAR(50))  + ''''
  92               END
  93                                                       
  94      SET @SQ L = @SQL_S ELECT + @S QL_WHERE    
  95      
  96      EXECUTE  sp_execut esql @SQL                                                
  97  
  98   END
  99   GO