Produced by Araxis Merge on 4/5/2017 7:54:24 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.
| # | Location | File | Last Modified |
|---|---|---|---|
| 1 | ADR_v17.0.0.0, build 3_April_2017.zip\ADR_v17.0.0.0, build 3_April_2017\DDL\ADRMGT | package body.sql | Thu Mar 30 20:07:04 2017 UTC |
| 2 | ADR_v17.0.0.0, build 3_April_2017.zip\ADR_v17.0.0.0, build 3_April_2017\DDL\ADRMGT | package body.sql | Tue Apr 4 14:53:24 2017 UTC |
| Description | Between Files 1 and 2 |
|
|---|---|---|
| Text Blocks | Lines | |
| Unchanged | 1 | 570 |
| Changed | 1 | 2 |
| Inserted | 0 | 0 |
| Removed | 0 | 0 |
| 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 |
No regular expressions were active.
| 1 | DROP PACKA GE BODY AD RMGT.STATS _UTIL; | |
| 2 | ||
| 3 | CREATE OR REPLACE PA CKAGE BODY ADRMGT.ST ATS_UTIL | |
| 4 | ||
| 5 | -- ####### ########## ########## ########## ########## ########## ########## ########## ## | |
| 6 | -- # Desc ription: 1 750 - ADR create 1 t able and 4 SPs for e xport/impo rt stats | |
| 7 | -- # | |
| 8 | -- # Usa ge: Calle d by run_w rapper.sql | |
| 9 | -- # Inp ut Paramet ers: | |
| 10 | -- # 1 ) None | |
| 11 | -- # Out put: | |
| 12 | -- # 1 ) Terminal | |
| 13 | -- # Int ernal Scri pt Paramet ers: | |
| 14 | -- # 1 ) None | |
| 15 | -- # | |
| 16 | -- # | |
| 17 | -- ####### ########## ########## ########## ########## ########## ########## ######## | |
| 18 | -- # Chang e History | |
| 19 | -- # | |
| 20 | -- # DATE User Name DESCRI PTION | |
| 21 | -- # ----- ----- ---- ---------- --- ------ ---------- ---------- ---------- ---------- --- | |
| 22 | -- # 01/30 /2013 Rich ard Do Create d | |
| 23 | -- # | |
| 24 | -- # | |
| 25 | -- ####### ########## ########## ########## ########## ########## ########## ######## | |
| 26 | AS | |
| 27 | ||
| 28 | ||
| 29 | /********* ********** ********** ********** ********** ********** ********** ***/ | |
| 30 | /* */ | |
| 31 | /* VerifyT able: This function is to vali date table */ | |
| 32 | /* */ | |
| 33 | /********* ********** ********** ********** ********** ********** ********** ***/ | |
| 34 | ||
| 35 | FUNCTION V erifyTable ( | |
| 36 | p_sche maname IN VARCHAR2, | |
| 37 | p_tabl ename IN VARCHAR2) | |
| 38 | ||
| 39 | RETURN NUMBER | |
| 40 | ||
| 41 | IS | |
| 42 | VN_row _cnt NUMBE R := 0; | |
| 43 | BEGIN | |
| 44 | ||
| 45 | VC_msg_ log := 'Ve rifing tab le existed or not.'; | |
| 46 | ||
| 47 | SELECT COUNT(1) | |
| 48 | INT O vn_row_c nt | |
| 49 | FROM a ll_tables | |
| 50 | WHERE t able_name = UPPER(p_ tablename) | |
| 51 | AND o wner = UPPER(p_ schemaname ); | |
| 52 | ||
| 53 | RETURN vn_row_cnt ; | |
| 54 | ||
| 55 | EXCEPTI ON | |
| 56 | ||
| 57 | WHEN OTHERS TH EN | |
| 58 | ||
| 59 | D BMS_OUTPUT .PUT_LINE( 'EXCEPTION (VerifyTa ble SP): ' ||VC_msg_l og||' - ER RMSG '||SQ LERRM); | |
| 60 | ||
| 61 | ||
| 62 | END Verify Table; | |
| 63 | /********* ********** ********** ********** ********** ********** ********** ***/ | |
| 64 | /* */ | |
| 65 | /* VerifyS chema: Thi s function is to val idate sche ma */ | |
| 66 | /* */ | |
| 67 | /********* ********** ********** ********** ********** ********** ********** ***/ | |
| 68 | ||
| 69 | FUNCTION V erifySchem a (p_schem aname IN V ARCHAR2) | |
| 70 | ||
| 71 | RETURN NUMBER | |
| 72 | ||
| 73 | IS | |
| 74 | ||
| 75 | VN_row_c nt NUMBER := 0; | |
| 76 | ||
| 77 | BEGIN | |
| 78 | ||
| 79 | ||
| 80 | VC_msg _log := 'V erifing sc hema owner existed o r not.'; | |
| 81 | ||
| 82 | SELECT COUNT(1) | |
| 83 | INT O vn_row_c nt | |
| 84 | FROM al l_tables | |
| 85 | WHERE o wner = UPP ER(p_schem aname) | |
| 86 | AND row num <= 1; | |
| 87 | ||
| 88 | RETURN vn_row_cnt ; | |
| 89 | ||
| 90 | EXCEPTI ON | |
| 91 | ||
| 92 | WHEN OTHERS TH EN | |
| 93 | ||
| 94 | DBMS_OUTP UT.PUT_LIN E('EXCEPTI ON (Verify Schema SP) : '||VC_ms g_log||' - ERRMSG '| |SQLERRM); | |
| 95 | ||
| 96 | ||
| 97 | END Verify Schema; | |
| 98 | ||
| 99 | /********* ********** ********** ********** ********** ********** ********** ********** *****/ | |
| 100 | /* * / | |
| 101 | /* CreateS tatTable: This proce dure is to create a staging ta ble to hol d stattist ics */ | |
| 102 | /* .. */ | |
| 103 | /********* ********** ********** ********** ********** ********** ********** ********** *****/ | |
| 104 | PROCEDURE CreateStat Table( | |
| 105 | p_stat tab VARCHA R2, | |
| 106 | p_stat owner VARC HAR2) | |
| 107 | ||
| 108 | IS | |
| 109 | VN_row_cnt NUMBER := 0; | |
| 110 | BEGIN | |
| 111 | ||
| 112 | VC_msg _log := 'V erifing ta ble existe d or not.' ; | |
| 113 | ||
| 114 | SELECT COUNT(1) | |
| 115 | I NTO vn_row _cnt | |
| 116 | FROM a ll_tables | |
| 117 | WHERE TABLE_NAME = VC_statt ab | |
| 118 | AND ow ner = VC_s tattab_own er; | |
| 119 | ||
| 120 | IF vn_ row_cnt > 0 THEN | |
| 121 | ||
| 122 | DB MS_OUTPUT. PUT_LINE(' INFORMATIO N - Stagin g table '| |VC_statta b||' alrea dy existed .'); | |
| 123 | ||
| 124 | ELSE | |
| 125 | ||
| 126 | VC _msg_log : = 'Creatin g staging table '|| VC_stattab ; | |
| 127 | ||
| 128 | DB MS_STATS.C REATE_STAT _TABLE(own name =>VC_ stattab_ow ner ,statt ab => VC_s tattab , t blspace => VC_statta b_tbs); | |
| 129 | ||
| 130 | END IF ; | |
| 131 | ||
| 132 | ||
| 133 | EXCEPTI ON | |
| 134 | ||
| 135 | WHE N OTHERS T HEN | |
| 136 | ||
| 137 | R AISE_APPLI CATION_ERR OR(-20035, 'EXCEPTION (CreateSt atTable SP ): '||VC_m sg_log||' - ERRMSG ' ||SQLERRM) ; | |
| 138 | ||
| 139 | ||
| 140 | END Create StatTable; | |
| 141 | ||
| 142 | ||
| 143 | /********* ********** ********** ********** ********** ********** ********** ********** *****/ | |
| 144 | /* */ | |
| 145 | /* ExportT abStats: T his proced ure is to export sta tistics of a specifi ed table t o */ | |
| 146 | /* a staging t able.. */ | |
| 147 | /********* ********** ********** ********** ********** ********** ********** ********** *****/ | |
| 148 | PROCEDURE ExportTabS tats( | |
| 149 | p_ ownname IN VARCHAR2, | |
| 150 | p_ tabname IN VARCHAR2) | |
| 151 | ||
| 152 | ||
| 153 | IS | |
| 154 | ||
| 155 | BEGIN | |
| 156 | ||
| 157 | VC_msg_l og := 'Beg in export table stat s.'; | |
| 158 | ||
| 159 | DBMS_STA TS.EXPORT_ TABLE_STAT S(ownname => p_ownna me, tabnam e => p_tab name, stat tab => VC_ stattab, s tatown => VC_stattab _owner, ca scade => t rue); | |
| 160 | ||
| 161 | ||
| 162 | EXCEPTIO N | |
| 163 | ||
| 164 | WHE N OTHERS T HEN | |
| 165 | ||
| 166 | RAISE_APPL ICATION_ER ROR(-20036 ,'EXCEPTIO N (ExportT abStats SP ): '||VC_m sg_log||' - ERRMSG ' ||SQLERRM) ; | |
| 167 | ||
| 168 | END Export TabStats; | |
| 169 | ||
| 170 | /********* ********** ********** ********** ********** ********** ********** ********** ******/ | |
| 171 | /* */ | |
| 172 | /* ImportT abStats: T his proced ure is to import sta tistics of to a spec ified tabl e */ | |
| 173 | /* . */ | |
| 174 | /********* ********** ********** ********** ********** ********** ********** ********** ******/ | |
| 175 | ||
| 176 | PROCEDURE ImportTabS tats(p_own name IN VA RCHAR2, p_ tabname IN VARCHAR2) | |
| 177 | ||
| 178 | IS | |
| 179 | ||
| 180 | ||
| 181 | BEGIN | |
| 182 | ||
| 183 | VC_msg_ log := 'Be gin import ing table stats.'; | |
| 184 | ||
| 185 | DBMS_ST ATS.IMPORT _TABLE_STA TS(ownname => p_ownn ame, tabna me => p_ta bname, sta ttab => VC _stattab, statown => VC_statta b_owner, c ascade => true); | |
| 186 | ||
| 187 | ||
| 188 | EXCEPTI ON | |
| 189 | ||
| 190 | WHE N OTHERS T HEN | |
| 191 | ||
| 192 | R AISE_APPLI CATION_ERR OR(-20038, 'EXCEPTION (ImportTa bStats SP) : '||VC_ms g_log||' - ERRMSG '| |SQLERRM); | |
| 193 | ||
| 194 | END Import TabStats; | |
| 195 | ||
| 196 | ||
| 197 | /********* ********** ********** ********** ********** ********** ********** *******/ | |
| 198 | /* */ | |
| 199 | /* ExportS chemaStats : This pro cedure is to export statistics of a sche ma */ | |
| 200 | /* */ | |
| 201 | /********* ********** ********** ********** ********** ********** ********** *******/ | |
| 202 | ||
| 203 | PROCEDURE ExportSche maStats(p_ schemaname IN VARCHA R2) | |
| 204 | ||
| 205 | IS | |
| 206 | ||
| 207 | BEGIN | |
| 208 | ||
| 209 | VC_msg_ log := 'Be gin export ing schema stats.'; | |
| 210 | ||
| 211 | DBMS_ST ATS.EXPORT _SCHEMA_ST ATS(ownnam e=> p_sche maname, st attab => V C_stattab, statown = > VC_statt ab_owner); | |
| 212 | ||
| 213 | ||
| 214 | EXCEPTION | |
| 215 | ||
| 216 | WHE N OTHERS T HEN | |
| 217 | ||
| 218 | RAISE_APP LICATION_E RROR(-2005 0,'EXCEPTI ON (Export SchemaStat s SP): '|| VC_msg_log ||' - ERRM SG '||SQLE RRM); | |
| 219 | ||
| 220 | ||
| 221 | END Export SchemaStat s; | |
| 222 | ||
| 223 | /********* ********** ********** ********** ********** ********** ********** *******/ | |
| 224 | /* */ | |
| 225 | /* ImportS chemaStats : This pro cedure is to import statistics of a sche ma */ | |
| 226 | /* */ | |
| 227 | /********* ********** ********** ********** ********** ********** ********** *******/ | |
| 228 | ||
| 229 | PROCEDURE ImportSche maStats(p_ schemaname IN VARCHA R2) | |
| 230 | ||
| 231 | IS | |
| 232 | ||
| 233 | ||
| 234 | BEGIN | |
| 235 | ||
| 236 | VC_msg_ log := 'Be gin import ing schema stats.'; | |
| 237 | ||
| 238 | DBMS_ST ATS.IMPORT _SCHEMA_ST ATS(ownnam e => p_sch emaname, s tattab => VC_stattab , statown => VC_stat tab_owner) ; | |
| 239 | ||
| 240 | ||
| 241 | EXCEPTION | |
| 242 | ||
| 243 | WHEN O THERS THEN | |
| 244 | ||
| 245 | RAI SE_APPLICA TION_ERROR (-20055,'E XCEPTION ( ImportSche maStats SP ): '||VC_m sg_log||' - ERRMSG ' ||SQLERRM) ; | |
| 246 | ||
| 247 | END Import SchemaStat s; | |
| 248 | ||
| 249 | END STATS_ UTIL; | |
| 250 | / | |
| 251 | ||
| 252 | ||
| 253 | CREATE OR REPLACE PU BLIC SYNON YM STATS_U TIL FOR AD RMGT.STATS _UTIL; | |
| 254 | ||
| 255 | ||
| 256 | GRANT EXEC UTE ON ADR MGT.STATS_ UTIL TO AD R; | |
| 257 | ||
| 258 | GRANT EXEC UTE ON ADR MGT.STATS_ UTIL TO AD RAAP; | |
| 259 | ||
| 260 | GRANT EXEC UTE ON ADR MGT.STATS_ UTIL TO AD REXT; | |
| 261 | ||
| 262 | GRANT EXEC UTE ON ADR MGT.STATS_ UTIL TO AD RFILE; | |
| 263 | ||
| 264 | GRANT EXEC UTE ON ADR MGT.STATS_ UTIL TO AD RREF; | |
| 265 | ||
| 266 | GRANT EXEC UTE ON ADR MGT.STATS_ UTIL TO AD RTMP; | |
| 267 | ||
| 268 | GRANT EXEC UTE ON ADR MGT.STATS_ UTIL TO BE NS; | |
| 269 | ||
| 270 | GRANT EXEC UTE ON ADR MGT.STATS_ UTIL TO CI S; | |
| 271 | ||
| 272 | GRANT EXEC UTE ON ADR MGT.STATS_ UTIL TO EE SRV; | |
| 273 | ||
| 274 | GRANT EXEC UTE ON ADR MGT.STATS_ UTIL TO ES RJMS; | |
| 275 | ||
| 276 | GRANT EXEC UTE ON ADR MGT.STATS_ UTIL TO ID HADM02; | |
| 277 | ||
| 278 | GRANT EXEC UTE ON ADR MGT.STATS_ UTIL TO LO BR; | |
| 279 | ||
| 280 | GRANT EXEC UTE ON ADR MGT.STATS_ UTIL TO OD M; | |
| 281 | ||
| 282 | GRANT EXEC UTE ON ADR MGT.STATS_ UTIL TO PS IM; | |
| 283 | ||
| 284 | GRANT EXEC UTE ON ADR MGT.STATS_ UTIL TO VB R; | |
| 285 | ||
| 286 | GRANT EXEC UTE ON ADR MGT.STATS_ UTIL TO DNS ; |
Araxis Merge (but not the data content of this report) is Copyright © 1993-2016 Araxis Ltd (www.araxis.com). All rights reserved.