80. EPMO Open Source Coordination Office Redaction File Detail Report

Produced by Araxis Merge on 1/15/2018 12:47:37 AM Eastern Standard 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.

80.1 Files compared

# Location File Last Modified
1 AHOBPRe_v5.0_build3.zip\DatabaseScripts\AHOBPR\HRE_Build3\SCRIPTS\ClinicalUserAdHocReport SP_ClinicalUserAdHocReport.txt Mon Jan 8 21:47:14 2018 UTC
2 AHOBPRe_v5.0_build3.zip\DatabaseScripts\AHOBPR\HRE_Build3\SCRIPTS\ClinicalUserAdHocReport SP_ClinicalUserAdHocReport.txt Fri Jan 12 21:55:55 2018 UTC

80.2 Comparison summary

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

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

80.4 Active regular expressions

No regular expressions were active.

80.5 Comparison detail

  1   USE [Regis try_AHOBPR HRE]
  2   GO
  3  
  4   /****** Ob ject:  Sto redProcedu re [AHOBPR ].[SP_Clin icalUserAd HocReport]     Script  Date: 11/ 29/2017 9: 29:50 AM * *****/
  5   DROP PROCE DURE [AHOB PR].[SP_Cl inicalUser AdHocRepor t]
  6   GO
  7  
  8   /****** Ob ject:  Sto redProcedu re [AHOBPR ].[SP_Clin icalUserAd HocReport]     Script  Date: 11/ 29/2017 9: 29:50 AM * *****/
  9   SET ANSI_N ULLS OFF
  10   GO
  11  
  12   SET QUOTED _IDENTIFIE R OFF
  13   GO
  14  
  15  
  16  
  17   -- ======= ========== ========== ========== ========
  18   -- Author:                 P II
  19   -- Create  date: Nove mber 27, 2 017
  20   -- Descrip tion: Used  for the A HOBPR Clin ical User  Ad-Hoc Rep ort
  21   -- ======= ========== ========== ========== ========
  22  
  23   CREATE PRO CEDURE [AH OBPR].[SP_ ClinicalUs erAdHocRep ort]
  24     @actionT ypeId varc har(30) =  NULL, -- A ction Type  ID
  25     @fromDat eText varc har(100) =  NULL,
  26     @toDateT ext varcha r(100) = N ULL,
  27     @userRol eId varcha r(30) = NU LL, -- Use r role ID
  28     @StatusI d varchar( 30) = NULL , -- User  Status ID
  29     @Primary Job varcha r(8000) =  NULL, -- M ultiple Pr imary Job,  comma-sep arated val ues when n ot NULL
  30     @WorkLoc ation varc har(8000)  = NULL, --  Multiple  Work Locat ion, comma -separated  values wh en not NUL L  
  31     @Seconda ryJob varc har(8000)  = NULL, --  Multiple  Secondary  Job, comma -separated  values wh en not NUL L
  32     @ChangeS tatusState   varchar( 100) = NUL L, -- Mult iple state s, comma-s eparated v alues when  not NULL 
  33     @JobTitl e varchar( 80) = NULL  -- Job Ti tle 
  34   AS
  35  
  36   BEGIN
  37    DECLARE @ fromDate D ATETIME2(0 ) = NULL,
  38              @toDate DA TETIME2(0)  = NULL,
  39                      @Q uery VARCH AR(8000),
  40                      @S tate varch ar(30) = N ULL;
  41  
  42     
  43   SET @Query  = 'SELECT  U.LAST_NA ME, U.FIRS T_NAME, AH OBPR.GetUs erRolesByI D(U.USER_I D) AS ROLE S,P.PRIMAR Y_JOB, U.J OB_TITLE,
  44                                      CASE WHE N D.ACTIVE _FLAG = 1  THEN ''Act ive'' 
  45                                               WHEN D.ACT IVE_FLAG =  0 THEN '' Inactive''
  46                                               WHEN D.PEN DING_FLAG  = 1 THEN ' 'Pending''  
  47                                               END AS Sta tus,  W.WO RK_LOCATIO N,audit_fi le.CREATED , F.STATES ,audit_fil e.TYPE_ID                             
  48                                FRO M [AHOBPR] .[AHOBPR_U SER] D
  49                                               LEFT OUTER  JOIN DBO. USERS U ON  D.USER_ID  = U.USER_ ID
  50                                               LEFT JOIN  [AHOBPR].[ STD_PRIMAR Y_JOB] P O N D.PRIMAR Y_JOB_ID =  P.STD_PRI MARY_JOB_I D
  51                                               LEFT JOIN  [AHOBPR].[ STD_WORK_L OCATION] W  ON D.WORK _LOCATION_ ID = W.STD _WORK_LOCA TION_ID ';
  52  
  53   IF @Change StatusStat e <> NULL
  54           BE GIN
  55                    Sele ct @State  = AHOBPR.G etStateCod eByID (@Ch angeStatus State);
  56                    SET  @Query = @ Query + '  JOIN [AHOB PR].[USER_ STATES_FIL TER] F ON  F.USER_ID  = U.USER_I D';
  57                    SET  @Query = @ Query + '  AND STATES  LIKE (''% ' + @State  + '%'') ' ;
  58           EN D
  59   ELSE
  60           SE T @Query =  @Query +  'LEFT OUTE R JOIN [AH OBPR].[USE R_STATES_F ILTER] F O N F.USER_I D = U.USER _ID';
  61  
  62   SET @Query  = @Query  + ' JOIN ( SELECT * F ROM
  63                             (SELEC T ROW_NUMB ER() OVER( PARTITION  BY USER_ID  ORDER BY  created DE SC) AS Seq ,*
  64                             FROM A HOBPR.AUDI T_LOG';
  65  
  66   IF @action TypeId <>  NULL
  67           SE T @Query =  @Query +  ' WHERE TY PE_ID = '' ' + @actio nTypeId +  ''' ';
  68  
  69           SE T @Query =  @Query +  ')t
  70                    WHER E Seq=1) a udit_file  on audit_f ile.user_i d = U.USER _ID ';
  71  
  72   SET @Query  = @Query  + 'WHERE 1  = 1 ';
  73  
  74   IF      @f romDateTex t <> NULL  and @toDat eText <> N ULL
  75           SE T @Query =  @Query +  'and audit _file.CREA TED BETWEE N ''' + @f romDateTex t + ''' AN D ''' + @t oDateText  + ''' ';
  76           
  77                                              
  78   IF @userRo leId <> NU LL
  79           IF  @userRole Id = 100  
  80                    SET  @Query = @ Query + 'A ND AHOBPR. GetUserRol esByID(U.U SER_ID) li ke (''%Reg istry%'')  ';
  81           IF  @userRole Id = 101
  82                    SET  @Query = @ Query + 'A ND AHOBPR. GetUserRol esByID(U.U SER_ID) li ke (''%Adv anced%'')  ';
  83           IF  @userRole Id = 102
  84                    SET  @Query = @ Query + 'A ND AHOBPR. GetUserRol esByID(U.U SER_ID) li ke (''%Car e Team%'')  ';
  85           IF  @userRole Id = 417
  86                    SET  @Query = @ Query + 'A ND AHOBPR. GetUserRol esByID(U.U SER_ID) li ke (''%Hel p Desk%'')  ';
  87  
  88   IF @Status Id = 0
  89        SET @ Query = @Q uery + 'AN D D.ACTIVE _FLAG = 1  OR D.ACTIV E_FLAG = 0  OR D.PEND ING_FLAG =  1 ';
  90  
  91   IF @Status Id = 1
  92        SET @ Query = @Q uery + 'AN D D.ACTIVE _FLAG = 1  ';
  93  
  94   IF @Status Id = 2
  95        SET @ Query = @Q uery + 'AN D D.ACTIVE _FLAG = 0  ';
  96  
  97   IF @Status Id = 3
  98        SET @ Query = @Q uery + 'AN D D.PENDIN G_FLAG = 1  ';
  99  
  100  
  101   IF ISNULL( @PrimaryJo b,'') > ''
  102       BEGIN
  103         SET  @PrimaryJo b = REPLAC E(@Primary Job,',','' ',''');
  104         SET  @Query = @ Query + '  AND PRIMAR Y_JOB_ID I N ( ''' +  @PrimaryJo b + ''') ' ;
  105                                      
  106           EN D
  107  
  108   IF ISNULL( @Secondary Job,'') >  ''
  109       BEGIN
  110         SET  @Secondary Job = REPL ACE(@Secon daryJob,', ',''',''') ;
  111         SET  @Query = @ Query + '  AND SECOND ARY_JOB_ID  IN ( '''  + @Seconda ryJob + '' ') ';
  112                                      
  113           EN D
  114  
  115   IF ISNULL( @WorkLocat ion,'') >  ''
  116       BEGIN
  117         SET  @WorkLocat ion = REPL ACE(@WorkL ocation,', ',''',''') ;
  118         SET  @Query = @ Query + '  AND WORK_L OCATION_ID  IN ( '''  + @WorkLoc ation + '' ') ';
  119                                      
  120           EN D              
  121  
  122   IF @JobTit le <> NULL
  123           SE T @Query =  @Query +  'AND JOB_T ITLE like  (''%' + @J obTitle +  '%'') ';
  124  
  125   PRINT  @Qu ery;
  126     
  127   EXECUTE (@ Query);  
  128           
  129   END
  130  
  131  
  132  
  133   GO
  134  
  135  

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