sync

Author: rednetx

ash/top_sqls_by_count.sql

@@ -1,16 +1,25 @@
-select *
+col stext for a100 trunc;
+select 
+   ash.*
+  ,substr(s.sql_text,1,200) stext
+  ,s.elapsed_time/nullif(executions,0)/1e6 as elaexe
+  ,s.executions
+  ,to_char(s.elapsed_time,'tm9') elapsed_time
 from (
   select 
-     h.sql_id
+     row_number()over(order by count(*) desc) rn
+    ,h.sql_id
     ,count(distinct sql_plan_hash_value) plans_cnt
     ,min(sql_plan_hash_value)            phv_min
     ,max(sql_plan_hash_value)            phv_max
-    ,count(distinct sql_exec_id)         execs
-    ,count(*)                            cnt
+    ,count(distinct sql_exec_id)         ash_execs
+    ,count(*)                            ash_cnt
   from v$active_session_history h
   where sql_id is not null
   group by sql_id
-  order by cnt desc
-)
-where rownum<=20
+) ash
+   left join v$sqlarea s
+      on s.sql_id = ash.sql_id
+where rn<=20
+
 /

awr/top_sql.sql

@@ -13,7 +13,7 @@ snaps as (
          ,begin_interval_time as beg_time
          ,end_interval_time as end_time
    from dba_hist_snapshot sn
-   where dbid=(select distinct dbid from dba_hist_database_instance i where i.db_name='&_awr_db_name') 
+   where dbid in (select distinct dbid from dba_hist_database_instance i where i.db_name='&_awr_db_name') 
      --and snap_id between 63481 and 63504
                          --63490 and 63494
      and end_interval_time between timestamp'&_awr_beg_time' and timestamp'&_awr_end_time'

cdb/chck_patches_18c.sql

@@ -0,0 +1,38 @@
+-- -----------------------------------------------------------------------------------
+-- File Name    : https://MikeDietrichDE.com/wp-content/scripts/18c/check_patchesi_18.sql
+-- Author       : Mike Dietrich 
+-- Description  : Displays contents of the patches (BP/PSU) registry and history
+-- Requirements : Access to the DBA role.
+-- Call Syntax  : @check_patches_18.sql
+-- Last Modified: 24/07/2018
+-- Database Rel.: Oracle 12.2.0.1, Oracle 18c, Oracle 19c
+-- -----------------------------------------------------------------------------------
+
+SET LINESIZE 500
+SET PAGESIZE 1000
+SET SERVEROUT ON
+SET LONG 2000000
+
+COLUMN action_time FORMAT A12
+COLUMN action FORMAT A10
+COLUMN patch_type FORMAT A10
+COLUMN description FORMAT A32
+COLUMN status FORMAT A10
+COLUMN version FORMAT A10
+
+alter session set "_exclude_seed_cdb_view"=FALSE;
+
+spool check_patches_18.txt
+
+ select CON_ID,
+        TO_CHAR(action_time, 'YYYY-MM-DD') AS action_time,
+        PATCH_ID,
+        PATCH_TYPE,
+        ACTION,
+        DESCRIPTION,
+        SOURCE_VERSION,
+        TARGET_VERSION
+   from CDB_REGISTRY_SQLPATCH
+  order by CON_ID, action_time, patch_id;
+
+ 

ctx/indexes.sql

@@ -16,6 +16,8 @@ from ctxsys.ctx_indexes
 where idx_owner like '&_owner_mask'
   and idx_name  like '&_index_mask'
   and idx_table like '&_table_mask'
+  and IDX_TABLE      !='DR$POLICY_TAB'
+  and IDX_TABLE_OWNER!='CTXSYS'
 ;
 col status          for a10;
 col DOMIDX_STATUS   for a15;
@@ -36,6 +38,7 @@ from dba_indexes idx
 where idx.owner       like '&_owner_mask'
   and idx.index_name  like '&_index_mask'
   and idx.table_name  like '&_table_mask'
+  and idx.DOMIDX_STATUS is not null
 ;
 
 col idx_owner   clear;

ctx/indexes_invalid.sql

@@ -0,0 +1,49 @@
+accept _owner_mask prompt "Owner mask[%]: " default '%';
+accept _index_mask prompt "Index mask[%]: " default '%';
+accept _table_mask prompt "Table mask[%]: " default '%';
+
+col owner   for a30;
+col idx_name    for a30;
+col idx_table   for a30;
+col idx_status  for a20;
+
+select 
+   idx_owner as owner
+  ,idx_name
+  ,idx_table
+  ,idx_status 
+from ctxsys.ctx_indexes
+where idx_owner like '&_owner_mask'
+  and idx_name  like '&_index_mask'
+  and idx_table like '&_table_mask'
+  and (idx_status!='INDEXED')
+  and IDX_TABLE      !='DR$POLICY_TAB'
+  and IDX_TABLE_OWNER!='CTXSYS'
+;
+col status          for a10;
+col DOMIDX_STATUS   for a15;
+col DOMIDX_OPSTATUS for a15;
+col FUNCIDX_STATUS  for a15;
+col DROPPED         for a7;
+
+
+select 
+  owner,
+  index_name as idx_name,
+  status,
+  DOMIDX_STATUS,
+  DOMIDX_OPSTATUS,
+  FUNCIDX_STATUS,
+  DROPPED 
+from dba_indexes idx
+where idx.owner       like '&_owner_mask'
+  and idx.index_name  like '&_index_mask'
+  and idx.table_name  like '&_table_mask'
+  and (idx.DOMIDX_STATUS != 'VALID' or DOMIDX_OPSTATUS!='VALID')
+;
+
+col owner   clear;
+col idx_name    clear;
+col idx_table   clear;
+col idx_status  clear;
+

externals/my/XT_REGEXP

@@ -0,0 +1 @@
+Subproject commit 2dc145df269e92cc2b1695d2ac7a69d769ab0605

longops.sql

@@ -30,7 +30,8 @@ select
 &_IF_ORA11_OR_HIGHER ,l.sql_plan_operation
 &_IF_ORA11_OR_HIGHER ,l.sql_plan_options
 from v$session_longops l
-where last_update_time>sysdate - 0&_minutes/24/60;
+where last_update_time>sysdate - 0&_minutes/24/60
+order by 1,2,5 desc,6 desc;
 
 undef _minutes;
 col username            clear;

my_pid.sql

@@ -0,0 +1,10 @@
+select 
+    s.sid
+   ,s.serial#
+   ,p.spid  as os_pid
+   ,p.pid   as ora_pid
+from v$session s
+    ,v$process p 
+where s.PADDR=p.addr 
+  and s.sid = userenv('SID')
+/

profiles/patch_create.old.sql

@@ -0,0 +1,39 @@
+prompt ***;
+prompt Using SQL Patch to add hints;
+prompt ***;
+
+set feed on serverout on;
+
+accept p_sqlid      prompt "SQL_ID: ";
+accept p_hints      prompt "Hints: ";
+accept p_name       prompt "Patch name: ";
+accept p_descr      prompt "Description: ";
+
+declare
+   -- params:
+   p_sql_id         varchar2(13)  :=q'[&p_sqlid]';
+   p_hints          varchar2(4000):=q'[&p_hints]';
+   p_name           varchar2(30)  :=q'[&p_name]';
+   p_description    varchar2(120) :=q'[&p_descr]';
+   cl_sql_text      clob;
+begin
+   
+    select 
+       coalesce(
+          (select s1.sql_fulltext from v$sqlarea        s1 where p_sql_id = s1.sql_id)
+         ,(select s2.sql_text     from dba_hist_sqltext s2 where p_sql_id = s2.sql_id and s2.dbid = (select db.dbid from v$database db))
+       ) stext
+       into cl_sql_text
+    from dual;
+    
+   sys.dbms_sqldiag_internal.i_create_patch(
+      sql_text    => cl_sql_text,
+      hint_text   => p_hints,
+      name        => p_name,
+      description => p_description
+   );
+   
+   dbms_output.put_line('SQL Profile '||p_name||' created on instance #'||sys_context('userenv','instance'));
+end;
+/
+undef p_sqlid p_hints p_name p_descr

profiles/patch_create.sql

@@ -12,28 +12,24 @@ accept p_descr      prompt "Description: ";
 declare
    -- params:
    p_sql_id         varchar2(13)  :=q'[&p_sqlid]';
-   p_hints          varchar2(4000):=q'[&p_hints]';
+   p_hints          clob          :=q'[&p_hints]';
    p_name           varchar2(30)  :=q'[&p_name]';
    p_description    varchar2(120) :=q'[&p_descr]';
    cl_sql_text      clob;
+   res              varchar2(4000);
 begin
-   
-    select 
-       coalesce(
-          (select s1.sql_fulltext from v$sqlarea        s1 where p_sql_id = s1.sql_id)
-         ,(select s2.sql_text     from dba_hist_sqltext s2 where p_sql_id = s2.sql_id and s2.dbid = (select db.dbid from v$database db))
-       ) stext
-       into cl_sql_text
-    from dual;
 
-   sys.dbms_sqldiag_internal.i_create_patch(
-      sql_text    => cl_sql_text,
+   res:=sys.dbms_sqldiag_internal.i_create_patch(
+      sql_id      => p_sql_id,
       hint_text   => p_hints,
+      creator     => user,
       name        => p_name,
       description => p_description
    );
 
    dbms_output.put_line('SQL Profile '||p_name||' created on instance #'||sys_context('userenv','instance'));
+   dbms_output.put_line('Results:');
+   dbms_output.put_line(res);
 end;
 /
 undef p_sqlid p_hints p_name p_descr