694. EPMO Open Source Coordination Office Redaction File Detail Report

Produced by Araxis Merge on 10/26/2017 10:44:45 PM Eastern Daylight Time. See www.araxis.com for information about Merge. This report uses XHTML and CSS2, and is best viewed with a modern standards-compliant browser. For optimum results when printing this report, use landscape orientation and enable printing of background images and colours in your browser.

694.1 Files compared

# Location File Last Modified
1 OSCIF_BMS_v2_iter 2_September_2017.zip\BMS_Cand\Source\Sources\Database\BMSv2Updates\2.2.20.2 usp_Insert_Transfer.sql Wed Oct 18 19:03:32 2017 UTC
2 OSCIF_BMS_v2_iter 2_September_2017.zip\BMS_Cand\Source\Sources\Database\BMSv2Updates\2.2.20.2 usp_Insert_Transfer.sql Thu Oct 26 19:41:50 2017 UTC

694.2 Comparison summary

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

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

694.4 Active regular expressions

No regular expressions were active.

694.5 Comparison detail

  1   USE [BMS]
  2   GO
  3   /****** Ob ject:  Sto redProcedu re [dbo].[ usp_Insert _Transfer]     Script  Date: 8/2 1/2017 3:4 8:44 PM ** ****/
  4   SET ANSI_N ULLS ON
  5   GO
  6   SET QUOTED _IDENTIFIE R ON
  7   GO
  8   -- ======= ========== ========== ========== ========
  9   -- Author:                 PII
  10   -- Create  date: 08.0 9.2011
  11   -- Descrip tion: Inse rts a tran sfer reque st, intent  or event.
  12   -- ======= ========== ========== ========== ========
  13   ALTER PROC EDURE [dbo ].[usp_Ins ert_Transf er] 
  14           @A CT_ID INT  OUTPUT,
  15           @C REATION_DA TE DATETIM E,
  16           @C ANCELED_DA TE DATETIM E,
  17           @P ARENT_ACT_ ID INT,
  18           @F LOW_ID UNI QUEIDENTIF IER,
  19           @D OMAIN_ID N VARCHAR(50 ),
  20           @I EN VARCHAR (50),
  21           @P ATIENT_UID  UNIQUEIDE NTIFIER,
  22           @R EQ_ERA_COD E NVARCHAR (100),
  23           @R EQ_ERA_COD E_SYSTEM N VARCHAR(10 0),
  24           @R EQ_ERA_COD E_SYSTEM_N AME NVARCH AR(100),
  25           @R EQ_ERA_DIS PLAY_NAME  NVARCHAR(2 50),
  26           @R EQ_FACILIT Y_UID UNIQ UEIDENTIFI ER,
  27           @R EQ_DIAGNOS IS NVARCHA R(250),
  28           @R EQ_CURRENT _LOCATION  NVARCHAR(1 50),
  29           @R EQ_COMMENT S NVARCHAR (250),
  30           @R EQ_CONTRAC T_CODE NVA RCHAR(100) ,
  31           @R EQ_CONTRAC T_CODE_SYS TEM NVARCH AR(100),
  32           @R EQ_CONTRAC T_CODE_SYS TEM_NAME N VARCHAR(10 0),
  33           @R EQ_CONTRAC T_DISPLAY_ NAME NVARC HAR(250),
  34           @R EQ_SPECIAL ITY_CODE N VARCHAR(10 0),
  35           @R EQ_SPECIAL ITY_CODE_S YSTEM      NVARCHAR(1 00),
  36           @R EQ_SPECIAL ITY_CODE_S YSTEM_NAME  NVARCHAR( 100),
  37           @R EQ_SPECIAL ITY_DISPLA Y_NAME NVA RCHAR(250) ,
  38           @R EQ_LOCATIO N_ADMISSIO N_DATE DAT ETIME,
  39           @R EQ_FACILIT Y_REGION N VARCHAR(10 0),
  40           @R EQ_FACILIT Y_VISN NVA RCHAR(100) ,
  41           @R EQ_ENTERED _BY NVARCH AR(100) =  NULL,
  42           @R EQ_LAST_ED IT_BY NVAR CHAR(100)  = NULL,
  43           @R EQ_EDITED  DATETIME =  NULL,
  44           @R EQ_REQUEST ED_DATE DA TETIME = N ULL,
  45           @R EQ_VISTA_S ITE_UID UN IQUEIDENTI FIER,
  46           @E VN_DISPOSI TION_CODE  NVARCHAR(1 00),
  47           @E VN_DISPOSI TION_CODE_ SYSTEM NVA RCHAR(100) ,
  48           @E VN_DISPOSI TION_CODE_ SYSTEM_NAM E NVARCHAR (100),
  49           @E VN_DISPOSI TION_DISPL AY_NAME NV ARCHAR(250 ),
  50           @E VN_ADMISSI ON_FACILIT Y_UID      UNIQUEIDEN TIFIER,
  51           @E VN_COMMENT  NVARCHAR( 150),
  52           @E VN_DISPOSI TION_DATE  DATETIME =  NULL,
  53           @O PERATION_T YPE CHAR(3 ),
  54           @I S_NATIONAL _WAIT_LIST  BIT,
  55           @T YPE_OF_BED _WARD NVAR CHAR(250),
  56           @I S_FEE bit,
  57           @T RANSFER_CO ORDINATOR  nvarchar(2 50),
  58           @T RANSFER_CO ORDINATOR_ PHONE nvar char(100)
  59   AS
  60   BEGIN
  61   SET NOCOUN T ON
  62  
  63           EX EC dbo.usp _Insert_Ac t
  64                    @PAT IENT_UID =  @PATIENT_ UID,
  65                    @CRE ATION_DATE  = @CREATI ON_DATE,
  66                    @CAN CELED_DATE  = @CANCEL ED_DATE,
  67                    @PAR ENT_ACT_ID  = @PARENT _ACT_ID,
  68                    @FLO W_ID = @FL OW_ID,
  69                    @DOM AIN_ID = @ DOMAIN_ID,
  70                    @IEN  = @IEN,
  71                    @ID  = @ACT_ID  OUTPUT
  72  
  73           IF  @OPERATIO N_TYPE = ' REQ'
  74                    BEGI N
  75                             DECLAR E @CONTRAC T_ID INT,  @ERA_ID IN T, @SPECIA LITY_ID IN T
  76  
  77                             -- CON TRACT CONC EPT EXISTE NCE CHECK
  78                             EXEC d bo.usp_Man age_Concep t 
  79                                      @CODE =  @REQ_CONTR ACT_CODE, 
  80                                      @CODE_SY STEM = @RE Q_CONTRACT _CODE_SYST EM, 
  81                                      @CODE_SY STEM_NAME  = @REQ_CON TRACT_CODE _SYSTEM_NA ME, 
  82                                      @DISPLAY _NAME = @R EQ_CONTRAC T_DISPLAY_ NAME, 
  83                                      @ID = @C ONTRACT_ID   OUTPUT
  84  
  85                             -- ERA  CONCEPT E XISTENCE C HECK
  86                             EXEC d bo.usp_Man age_Concep t 
  87                                      @CODE =  @REQ_ERA_C ODE, 
  88                                      @CODE_SY STEM = @RE Q_ERA_CODE _SYSTEM, 
  89                                      @CODE_SY STEM_NAME  = @REQ_ERA _CODE_SYST EM_NAME, 
  90                                      @DISPLAY _NAME = @R EQ_ERA_DIS PLAY_NAME,  
  91                                      @ID = @E RA_ID  OUT PUT
  92  
  93                             -- SPE CIALITY CO NCEPT EXIS TENCE CHEC K
  94                             EXEC d bo.usp_Man age_Concep t 
  95                                      @CODE =  @REQ_SPECI ALITY_CODE , 
  96                                      @CODE_SY STEM = @RE Q_SPECIALI TY_CODE_SY STEM, 
  97                                      @CODE_SY STEM_NAME  = @REQ_SPE CIALITY_CO DE_SYSTEM_ NAME, 
  98                                      @DISPLAY _NAME = @R EQ_SPECIAL ITY_DISPLA Y_NAME, 
  99                                      @ID = @S PECIALITY_ ID  OUTPUT
  100  
  101                             SELECT  TOP 1 @AC T_ID = ID  FROM ACT W HERE FLOW_ ID = @FLOW _ID AND PA RENT_ACT_I D IS NULL  ORDER BY I D DESC
  102  
  103                             INSERT  INTO TRAN SFER_REQ
  104                             (
  105                                      ACT_ID,
  106                                      ERA_ID,
  107                                      FACILITY _UID,
  108                                      VISTA_SI TE_UID,
  109                                      CONTRACT _ID,
  110                                      SPECIALI TY_ID,
  111                                      DIAGNOSI S,
  112                                      CURRENT_ LOCATION,
  113                                      COMMENTS ,
  114                                      LOCATION _ADMISSION _DATE,
  115                                      FACILITY _REGION,
  116                                      FACILITY _VISN,
  117                                      REQUESTE D_DATE,
  118                                      ENTERED_ BY,
  119                                      LAST_EDI T_BY,
  120                                      EDITED,
  121                                      IS_NATIO NAL_WAIT_L IST,
  122                                      TYPE_OF_ BED_WARD,
  123                                      IS_FEE,
  124                                      TRANSFER _COORDINAT OR,
  125                                      TRANSFER _COORDINAT OR_PHONE
  126                             )
  127                             VALUES
  128                             (
  129                                      @ACT_ID  ,
  130                                      @ERA_ID,
  131                                      @REQ_FAC ILITY_UID,
  132                                      @REQ_VIS TA_SITE_UI D,
  133                                      @CONTRAC T_ID,
  134                                      @SPECIAL ITY_ID,
  135                                      @REQ_DIA GNOSIS,
  136                                      @REQ_CUR RENT_LOCAT ION,
  137                                      @REQ_COM MENTS,
  138                                      @REQ_LOC ATION_ADMI SSION_DATE ,
  139                                      @REQ_FAC ILITY_REGI ON,
  140                                      @REQ_FAC ILITY_VISN ,
  141                                      @REQ_REQ UESTED_DAT E,
  142                                      @REQ_ENT ERED_BY,
  143                                      @REQ_LAS T_EDIT_BY,
  144                                      @REQ_EDI TED,
  145                                      @IS_NATI ONAL_WAIT_ LIST,
  146                                      @TYPE_OF _BED_WARD,
  147                                      @IS_FEE,
  148                                      @TRANSFE R_COORDINA TOR,
  149                                      @TRANSFE R_COORDINA TOR_PHONE
  150                             )
  151                    END
  152           EL SE
  153                    IF @ OPERATION_ TYPE = 'EV N'
  154                             BEGIN                              
  155                                      DECLARE  @DISPOSITI ON_ID INT
  156  
  157                                      -- DISPO SITION CON CEPT EXIST ENCE CHECK
  158                                      EXEC dbo .usp_Manag e_Concept 
  159                                               @CODE = @E VN_DISPOSI TION_CODE,  
  160                                               @CODE_SYST EM = @EVN_ DISPOSITIO N_CODE_SYS TEM, 
  161                                               @CODE_SYST EM_NAME =  @EVN_DISPO SITION_COD E_SYSTEM_N AME, 
  162                                               @DISPLAY_N AME = @EVN _DISPOSITI ON_DISPLAY _NAME, 
  163                                               @ID = @DIS POSITION_I D  OUTPUT
  164  
  165                                      SELECT T OP 1 @ACT_ ID = ID FR OM ACT WHE RE FLOW_ID  = @FLOW_I D AND PARE NT_ACT_ID  = @PARENT_ ACT_ID ORD ER BY ID D ESC
  166  
  167                                      INSERT I NTO TRANSF ER_EVN
  168                                      (
  169                                               ACT_ID,
  170                                               COMMENT,
  171                                               ADMISSION_ FACILITY_U ID,
  172                                               DISPOSITIO N_ID,
  173                                               DISPOSITIO N_DATE
  174                                      )
  175                                      VALUES
  176                                      (
  177                                               @ACT_ID,
  178                                               @EVN_COMME NT,
  179                                               @EVN_ADMIS SION_FACIL ITY_UID,
  180                                               @DISPOSITI ON_ID,
  181                                               @EVN_DISPO SITION_DAT E                                      
  182                                      )       
  183                             END
  184  
  185   END

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