2026-03-12 20:23:15

2026-03-12 21:23:47 +01:00
parent eab4b36eca
commit 93039b8489
3332 changed files with 699614 additions and 0 deletions
--- a/csierra/cs_spbl_corrupt.sql
+++ b/csierra/cs_spbl_corrupt.sql
@@ -0,0 +1,116 @@
+----------------------------------------------------------------------------------------
+--
+-- File name:   cs_spbl_corrupt.sql
+--
+-- Purpose:     List of Corrupt SQL Plans with: missing Plan Rows from sys.sqlobj$plan
+--
+-- Author:      Carlos Sierra
+--
+-- Version:     2021/01/23
+--
+-- Usage:       Connecting into PDB.
+--
+-- Example:     $ sqlplus / as sysdba
+--              SQL> @cs_spbl_corrupt.sql
+--
+-- Notes:       *** Requires Oracle Diagnostics Pack License ***
+--
+--              Developed and tested on 12.1.0.2.
+--
+---------------------------------------------------------------------------------------
+--
+@@cs_internal/cs_primary.sql
+@@cs_internal/cs_cdb_warn.sql
+@@cs_internal/cs_set.sql
+@@cs_internal/cs_def.sql
+@@cs_internal/cs_file_prefix.sql
+--
+DEF cs_script_name = 'cs_spbl_corrupt';
+--
+SELECT '&&cs_file_prefix._&&cs_script_name.' cs_file_name FROM DUAL;
+--
+@@cs_internal/cs_spool_head.sql
+PRO SQL> @&&cs_script_name..sql 
+@@cs_internal/cs_spool_id.sql
+--
+COL created FOR A26 HEA 'Created';
+COL last_modified FOR A19 HEA 'Last Modified';
+COL signature FOR 99999999999999999999 HEA 'Signature';
+COL category FOR A10 HEA 'Category' TRUNC;
+COL obj_type FOR 99999999 HEA 'Obj Type';
+COL plan_name FOR A30 HEA 'Plan Name';
+COL ori FOR 999 HEA 'Ori';
+COL sql_handle FOR A30 HEA 'SQL Handle';
+COL sql_text FOR A80 HEA 'SQL Text' TRUNC;
+COL description FOR A125 HEA 'Description';
+COL category FOR A30;
+COL enabled FOR A10 HEA 'Enabled';
+COL accepted FOR A10 HEA 'Accepted';
+COL fixed FOR A10 HEA 'Fixed' PRI;
+COL reproduced FOR A10 HEA 'Reproduced';
+COL autopurge FOR A10 HEA 'Autopurge';
+COL adaptive FOR A10 HEA 'Adaptive';
+COL plan_id FOR 999999999990 HEA 'Plan ID';
+--
+PRO
+PRO Corrupt Baselines
+PRO ~~~~~~~~~~~~~~~~~
+-- only works from PDB. do not use CONTAINERS(table_name) since it causes ORA-00600: internal error code, arguments: [kkdolci1], [], [], [], [], [], [],
+SELECT o.signature,
+       o.category,
+       o.obj_type,
+       o.plan_id,
+       o.name AS plan_name,
+       TO_CHAR(a.created, '&&cs_timestamp_full_format.') AS created,
+       TO_CHAR(a.last_modified, '&&cs_datetime_full_format.') AS last_modified, 
+       DECODE(BITAND(o.flags, 1),   0, 'NO', 'YES') AS enabled,
+       DECODE(BITAND(o.flags, 2),   0, 'NO', 'YES') AS accepted,
+       DECODE(BITAND(o.flags, 4),   0, 'NO', 'YES') AS fixed,
+       DECODE(BITAND(o.flags, 64),  0, 'YES', 'NO') AS reproduced,
+       DECODE(BITAND(o.flags, 128), 0, 'NO', 'YES') AS autopurge,
+       DECODE(BITAND(o.flags, 256), 0, 'NO', 'YES') AS adaptive, 
+       a.origin AS ori, 
+       t.sql_handle,
+       t.sql_text,
+       a.description
+  FROM sys.sqlobj$ o,
+       sys.sqlobj$auxdata a,
+       sys.sql$text t
+ WHERE o.category = 'DEFAULT'
+   AND o.obj_type = 2 /* 1:profile, 2:baseline, 3:patch */
+   AND a.signature = o.signature
+   AND a.category = o.category
+   AND a.obj_type = o.obj_type
+   AND a.plan_id = o.plan_id
+   AND t.signature = o.signature
+   AND NOT EXISTS (
+         SELECT NULL
+           FROM sys.sqlobj$plan p
+          WHERE p.signature = o.signature
+            AND p.category = o.category
+            AND p.obj_type = o.obj_type 
+            AND p.plan_id = o.plan_id
+            AND p.id = 1
+            AND ROWNUM = 1
+   )
+   AND NOT EXISTS (
+         SELECT NULL
+           FROM sys.sqlobj$data d
+          WHERE d.signature = o.signature
+            AND d.category = o.category
+            AND d.obj_type = o.obj_type 
+            AND d.plan_id = o.plan_id
+            AND d.comp_data IS NOT NULL
+            AND ROWNUM = 1
+   )
+ ORDER BY
+       o.signature, o.category, o.obj_type, o.plan_id
+/
+--
+PRO
+PRO SQL> @&&cs_script_name..sql 
+--
+@@cs_internal/cs_spool_tail.sql
+@@cs_internal/cs_undef.sql
+@@cs_internal/cs_reset.sql
+--