一次捕獲SQL調優資訊的指令碼 sql10.sql
--------------------------------------------------------------------------------
--
-- File name: sql10.sql
-- Author: zhangqiao
-- Copyright: zhangqiaoc@olm.com.cn
--
--------------------------------------------------------------------------------
alter session set nls_date_format='yyyymmdd';
col file_name new_value file_name noprint
select to_char(sysdate,'yyyymmddhh24miss')||'_'||'&&1' file_name from dual;
spool sql_&file_name
set pagesize 0
SET VERIFY OFF
set linesize 130
-------------------------------------------------------------------------------------------------
col CPU_TIME heading "CPU|TIME" for 999,999,999
col ELAPSED_TIME heading "ELAPSED|TIME" for 999,999,999
col PARSE_CALLS heading "PARSE|CALLS" for 999,999
col DISK_READS heading "DISK|READS" for 999,999,999
col BUFFER_GETS heading "BUFFER|GETS" for 999,999,999
col SORTS heading "SORTS" for 999,999
col ROWS_PROCESSED heading "ROWS|PROCESSED" for 999,999,999
col FETCHES heading "FETCHES" for 999,999,999
col EXECUTIONS heading "EXEC" for 999,999,999
col CPU_PRE_EXEC heading "CPU|PRE EXEC" for 999,999,999
col DISK_PRE_EXEC heading "DISK|PRE EXEC" for 999,999,999
col GET_PRE_EXEC heading "GET|PRE EXEC" for 999,999,999
col ROWS_PRE_EXEC heading "ROWS|PRE EXEC" for 999,999,999
col ROWS_PRE_FETCHES heading "ROWS|PRE FETCHES" for 999,999,999
-------------------------------------------------------------------------------------------------
col TABLE_NAME heading "TABLE|NAME" for a15
col OWNER heading "OWNER" for a5
col TABLESPACE_NAME heading "TABLESPACE|NAME" for a10
col LOGGING heading "LOG" for a3
col BUFFER_POOL heading "BUFFER|POOL" for a7
col DEGREE heading "DEGREE" for a6
col PARTITIONED heading "PART" for a4
col NUM_ROWS heading "NUM|ROWS" for 999,999,999
col BLOCKS heading "BLOCKS" for 999,999,999
col EMPTY_BLOCKS heading "EMPTY|BLOCKS" for 999,999,999
col AVG_SPACE heading "AVG|SPACE" for 999,999,999
col AVG_ROW_LEN heading "AVG|ROW_LEN" for 999,999,999
col AVG_ROW_LEN heading "AVG|ROW_LEN" for 999,999,999
col LAST_ANALYZED heading "LAST|ANALYZED"
-------------------------------------------------------------------------------------------------
col TABLE_OWNER heading "TABLE|OWNER" for a10
col INDEX_NAME heading "Index|Name" for a15
col UNIQUENESS heading "UNIQUE" for a9
col COLUMN_NAME heading "COLUMN|NAME" for a15
col COLUMN_POSITION heading "COL|POS" for 999
col DESCEND heading "DESC" for a4
-------------------------------------------------------------------------------------------------
col CHILD_NUMBER heading "CHILD|NUMBER" for 999
col name heading "BIND|NAME" for a10
col value_string heading "VALUE|STRING" for a60
col DATATYPE_STRING heading "DATATYPE|STRING" for a20
-------------------------------------------------------------------------------------------------
col program heading "PROGRAM" for a30
col event heading "EVENT" for a40
col total heading "TOTAL" for 999,999
col wait_class heading "WAIT|CLASS" for a15
-------------------------------------------------------------------------------------------------
col DATA_TYPE heading "DATA|TYPE" for a15
col NULLABLE heading "NL" for a2
col HISTOGRAM heading "HIST" for a5
col DENSITY heading "DENSITY" for 999,999,999
col NUM_NULLS heading "NUM|NULLS" for 999,999,999
col NUM_BUCKETS heading "NUM|BUCKETS" for 999,999,999
col AVG_COL_LEN heading "AVG|COL LEN" for 999,999,999
-------------------------------------------------------------------------------------------------
col LOGGING heading "LOG" for a3
col STATUS heading "STATUS" for a6
col INDEX_TYPE heading "INDEX|TYPE" for a8
col UNIQUENESS heading "Unique" for a9
col BLEV heading "B|Tree|Level" for 99
col LEAF_BLOCKS heading "Leaf|Blks" for 999,999
col DISTINCT_KEYS heading "Distinct|Keys" for 999,999,999
col AVG_LEAF_BLOCKS_PER_KEY heading "Average|Leaf Blocks|Per Key" for 99,999
col AVG_DATA_BLOCKS_PER_KEY heading "Average|Data Blocks|Per Key" for 99,999
col CLUSTERING_FACTOR heading "Cluster|Factor" for 999,999,999
col COLUMN_POSITION heading "Col|Pos" for 999
prompt ****************************************************************************************
prompt CURSOR
prompt ****************************************************************************************
select * from table(dbms_xplan.display_cursor('&&1',0,'all'));
select * from table(dbms_xplan.display_cursor('&&1',1,'all'));
select * from table(dbms_xplan.display_cursor('&&1',2,'all'));
select * from table(dbms_xplan.display_cursor('&&1',3,'all'));
prompt
prompt ****************************************************************************************
prompt AWR
prompt ****************************************************************************************
select * from table(dbms_xplan.display_awr('&&1',null,null,'all'));
prompt
prompt ****************************************************************************************
prompt SQL STATS
prompt ****************************************************************************************
set pagesize 9999
select distinct parsing_schema_name from v$sql where sql_id='&&1';
select CPU_TIME,
ELAPSED_TIME,
DISK_READS,
BUFFER_GETS,
ROWS_PROCESSED,
FETCHES,
PARSE_CALLS,
SORTS,
EXECUTIONS from v$sqlstats where sql_id='&&1';
select
CPU_TIME/decode(EXECUTIONS,0,1,EXECUTIONS) CPU_PRE_EXEC,
ELAPSED_TIME/decode(EXECUTIONS,0,1,EXECUTIONS) ELA_PRE_EXEC,
DISK_READS/decode(EXECUTIONS,0,1,EXECUTIONS) DISK_PRE_EXEC,
BUFFER_GETS/decode(EXECUTIONS,0,1,EXECUTIONS) GET_PRE_EXEC,
ROWS_PROCESSED/decode(EXECUTIONS,0,1,EXECUTIONS) ROWS_PRE_EXEC,
ROWS_PROCESSED/decode(FETCHES,0,1,FETCHES) ROWS_PRE_FETCHES,EXECUTIONS
from v$sqlstats where sql_id='&&1';
prompt
prompt ****************************************************************************************
prompt TABLES
prompt ****************************************************************************************
break on owner
WITH t AS
(SELECT /*+ materialize */DISTINCT OBJECT_OWNER, OBJECT_NAME
FROM (SELECT OBJECT_OWNER, OBJECT_NAME
FROM V$SQL_PLAN
WHERE SQL_ID = '&&1'
AND OBJECT_NAME IS NOT NULL
UNION ALL
SELECT OBJECT_OWNER, OBJECT_NAME
FROM DBA_HIST_SQL_PLAN
WHERE SQL_ID = '&&1'
AND OBJECT_NAME IS NOT NULL))
SELECT owner,
TABLE_NAME,
TABLESPACE_NAME,
LOGGING,
BUFFER_POOL,
ltrim(DEGREE) DEGREE,
PARTITIONED,
NUM_ROWS,
BLOCKS,
EMPTY_BLOCKS,
AVG_SPACE,
AVG_ROW_LEN,
LAST_ANALYZED
FROM DBA_TABLES
WHERE (OWNER, TABLE_NAME) IN
(SELECT table_owner,table_name FROM dba_indexes
WHERE (owner,index_name) IN (SELECT * FROM t)
UNION ALL SELECT * FROM t);
prompt
prompt ****************************************************************************************
prompt INDEX INFO
prompt ****************************************************************************************
break on table_owner on table_name on index_name on index_type on uniqueness on LOGGING on status
WITH t AS
(SELECT /*+ materialize */DISTINCT OBJECT_OWNER, OBJECT_NAME
FROM (SELECT OBJECT_OWNER, OBJECT_NAME
FROM V$SQL_PLAN
WHERE SQL_ID = '&&1'
AND OBJECT_NAME IS NOT NULL
UNION ALL
SELECT OBJECT_OWNER, OBJECT_NAME
FROM DBA_HIST_SQL_PLAN
WHERE SQL_ID = '&&1'
AND OBJECT_NAME IS NOT NULL))
SELECT A.TABLE_OWNER,
A.TABLE_NAME,
A.INDEX_NAME,
UNIQUENESS,
COLUMN_NAME,
COLUMN_POSITION,
DESCEND
FROM DBA_INDEXES A, DBA_IND_COLUMNS B
WHERE (A.OWNER, A.table_name) IN
(SELECT table_owner,table_name FROM dba_indexes
WHERE (owner,index_name) IN (SELECT * FROM t)
UNION ALL SELECT * FROM t)
AND A.OWNER = B.INDEX_OWNER
AND A.INDEX_NAME = B.INDEX_NAME;
prompt
prompt ****************************************************************************************
prompt BIND
prompt ****************************************************************************************
break on CHILD_NUMBER
SELECT CHILD_NUMBER,NAME,POSITION,DATATYPE_STRING,VALUE_STRING
FROM v$sql_bind_capture WHERE SQL_ID = '&&1'
order by CHILD_NUMBER,POSITION;
prompt
prompt ****************************************************************************************
prompt LITERAL SQL
prompt ****************************************************************************************
set serveroutput on size 1000000
DECLARE
LVC_SQL_TEXT VARCHAR2(4000);
LVC_ORIG_SQL_TEXT VARCHAR2(4000);
LN_CHILD NUMBER := 10000;
LVC_BIND VARCHAR2(200);
CURSOR C1 IS
SELECT CHILD_NUMBER, NAME, POSITION, DATATYPE_STRING, VALUE_STRING
FROM V$SQL_BIND_CAPTURE
WHERE SQL_ID = '&&1'
ORDER BY CHILD_NUMBER, POSITION;
BEGIN
SELECT SQL_FULLTEXT
INTO LVC_ORIG_SQL_TEXT
FROM V$SQL
WHERE SQL_ID = '&&1'
AND ROWNUM = 1;
FOR R1 IN C1 LOOP
IF (R1.CHILD_NUMBER <> LN_CHILD) THEN
IF LN_CHILD <> 10000 THEN
DBMS_OUTPUT.PUT_LINE(LVC_SQL_TEXT);
DBMS_OUTPUT.PUT_LINE('--------------------------------------------------------');
END IF;
LN_CHILD := R1.CHILD_NUMBER;
LVC_SQL_TEXT := LVC_ORIG_SQL_TEXT;
END IF;
IF R1.NAME LIKE ':SYS_B_%' THEN
LVC_BIND := ':"'||substr(R1.NAME,2)||'"';
ELSE
LVC_BIND := R1.NAME;
END IF;
IF r1.VALUE_STRING IS NOT NULL THEN
IF R1.DATATYPE_STRING = 'NUMBER' THEN
LVC_SQL_TEXT := REGEXP_REPLACE(LVC_SQL_TEXT, LVC_BIND, R1.VALUE_STRING,1,1,'i');
ELSIF R1.DATATYPE_STRING LIKE 'VARCHAR%' THEN
LVC_SQL_TEXT := REGEXP_REPLACE(LVC_SQL_TEXT, LVC_BIND, ''''||R1.VALUE_STRING||'''',1,1,'i');
ELSE
LVC_SQL_TEXT := REGEXP_REPLACE(LVC_SQL_TEXT, LVC_BIND, ''''||R1.VALUE_STRING||'''',1,1,'i');
END IF;
ELSE
LVC_SQL_TEXT := REGEXP_REPLACE(LVC_SQL_TEXT, LVC_BIND, 'NULL',1,1,'i');
END IF;
END LOOP;
DBMS_OUTPUT.PUT_LINE(LVC_SQL_TEXT);
END;
/
prompt
prompt ****************************************************************************************
prompt SQL WAIT HIST
prompt ****************************************************************************************
break on program
SELECT PROGRAM,EVENT, SUM(CNT) TOTAL, WAIT_CLASS
FROM (SELECT DECODE(SESSION_STATE,
'ON CPU',
DECODE(SESSION_TYPE, 'BACKGROUND', 'BCPU', 'CPU'),
EVENT) EVENT,
REPLACE(TRANSLATE(DECODE(SESSION_STATE,
'ON CPU',
DECODE(SESSION_TYPE,
'BACKGROUND',
'BCPU',
'CPU'),
WAIT_CLASS),
' $',
'____'),
'/') WAIT_CLASS,
PROGRAM,
1 CNT
FROM V$ACTIVE_SESSION_HISTORY
WHERE SQL_ID = '&&1'
AND SAMPLE_TIME >= SYSDATE - 4 / 24
AND SAMPLE_TIME <= SYSDATE)
GROUP BY EVENT, WAIT_CLASS, PROGRAM
ORDER BY PROGRAM,TOTAL DESC;
prompt
prompt ****************************************************************************************
prompt TABLE COLUMNS
prompt ****************************************************************************************
break on owner on table_name
WITH t AS
(SELECT /*+ materialize */DISTINCT OBJECT_OWNER, OBJECT_NAME
FROM (SELECT OBJECT_OWNER, OBJECT_NAME
FROM V$SQL_PLAN
WHERE SQL_ID = '&&1'
AND OBJECT_NAME IS NOT NULL
UNION ALL
SELECT OBJECT_OWNER, OBJECT_NAME
FROM DBA_HIST_SQL_PLAN
WHERE SQL_ID = '&&1'
AND OBJECT_NAME IS NOT NULL))
SELECT OWNER,
TABLE_NAME,
COLUMN_NAME,
DATA_TYPE,
NULLABLE,
substr(HISTOGRAM,0,5) HISTOGRAM,
DENSITY,
NUM_NULLS,
NUM_BUCKETS,
AVG_COL_LEN,
LAST_ANALYZED
FROM DBA_TAB_COLS
WHERE (OWNER, TABLE_NAME) IN
(SELECT table_owner,table_name FROM dba_indexes
WHERE (owner,index_name) IN (SELECT * FROM t)
UNION ALL SELECT * FROM t)
ORDER BY owner,table_name,COLUMN_ID;
prompt
prompt ****************************************************************************************
prompt INDEX STATS
prompt ****************************************************************************************
WITH t AS
(SELECT /*+ materialize */DISTINCT OBJECT_OWNER, OBJECT_NAME
FROM (SELECT OBJECT_OWNER, OBJECT_NAME
FROM V$SQL_PLAN
WHERE SQL_ID = '&&1'
AND OBJECT_NAME IS NOT NULL
UNION ALL
SELECT OBJECT_OWNER, OBJECT_NAME
FROM DBA_HIST_SQL_PLAN
WHERE SQL_ID = '&&1'
AND OBJECT_NAME IS NOT NULL))
SELECT INDEX_NAME,
INDEX_TYPE,
LOGGING,
STATUS,
BLEVEL BLEV,
LEAF_BLOCKS,
DISTINCT_KEYS,
NUM_ROWS,
AVG_LEAF_BLOCKS_PER_KEY,
AVG_DATA_BLOCKS_PER_KEY,
CLUSTERING_FACTOR,
LAST_ANALYZED
FROM DBA_INDEXES T
WHERE (TABLE_OWNER, TABLE_NAME) IN
(SELECT table_owner,table_name FROM dba_indexes
WHERE (owner,index_name) IN (SELECT * FROM t)
UNION ALL SELECT * FROM t)
ORDER BY 1
/
spool off
undefine 1
--
-- File name: sql10.sql
-- Author: zhangqiao
-- Copyright: zhangqiaoc@olm.com.cn
--
--------------------------------------------------------------------------------
alter session set nls_date_format='yyyymmdd';
col file_name new_value file_name noprint
select to_char(sysdate,'yyyymmddhh24miss')||'_'||'&&1' file_name from dual;
spool sql_&file_name
set pagesize 0
SET VERIFY OFF
set linesize 130
-------------------------------------------------------------------------------------------------
col CPU_TIME heading "CPU|TIME" for 999,999,999
col ELAPSED_TIME heading "ELAPSED|TIME" for 999,999,999
col PARSE_CALLS heading "PARSE|CALLS" for 999,999
col DISK_READS heading "DISK|READS" for 999,999,999
col BUFFER_GETS heading "BUFFER|GETS" for 999,999,999
col SORTS heading "SORTS" for 999,999
col ROWS_PROCESSED heading "ROWS|PROCESSED" for 999,999,999
col FETCHES heading "FETCHES" for 999,999,999
col EXECUTIONS heading "EXEC" for 999,999,999
col CPU_PRE_EXEC heading "CPU|PRE EXEC" for 999,999,999
col DISK_PRE_EXEC heading "DISK|PRE EXEC" for 999,999,999
col GET_PRE_EXEC heading "GET|PRE EXEC" for 999,999,999
col ROWS_PRE_EXEC heading "ROWS|PRE EXEC" for 999,999,999
col ROWS_PRE_FETCHES heading "ROWS|PRE FETCHES" for 999,999,999
-------------------------------------------------------------------------------------------------
col TABLE_NAME heading "TABLE|NAME" for a15
col OWNER heading "OWNER" for a5
col TABLESPACE_NAME heading "TABLESPACE|NAME" for a10
col LOGGING heading "LOG" for a3
col BUFFER_POOL heading "BUFFER|POOL" for a7
col DEGREE heading "DEGREE" for a6
col PARTITIONED heading "PART" for a4
col NUM_ROWS heading "NUM|ROWS" for 999,999,999
col BLOCKS heading "BLOCKS" for 999,999,999
col EMPTY_BLOCKS heading "EMPTY|BLOCKS" for 999,999,999
col AVG_SPACE heading "AVG|SPACE" for 999,999,999
col AVG_ROW_LEN heading "AVG|ROW_LEN" for 999,999,999
col AVG_ROW_LEN heading "AVG|ROW_LEN" for 999,999,999
col LAST_ANALYZED heading "LAST|ANALYZED"
-------------------------------------------------------------------------------------------------
col TABLE_OWNER heading "TABLE|OWNER" for a10
col INDEX_NAME heading "Index|Name" for a15
col UNIQUENESS heading "UNIQUE" for a9
col COLUMN_NAME heading "COLUMN|NAME" for a15
col COLUMN_POSITION heading "COL|POS" for 999
col DESCEND heading "DESC" for a4
-------------------------------------------------------------------------------------------------
col CHILD_NUMBER heading "CHILD|NUMBER" for 999
col name heading "BIND|NAME" for a10
col value_string heading "VALUE|STRING" for a60
col DATATYPE_STRING heading "DATATYPE|STRING" for a20
-------------------------------------------------------------------------------------------------
col program heading "PROGRAM" for a30
col event heading "EVENT" for a40
col total heading "TOTAL" for 999,999
col wait_class heading "WAIT|CLASS" for a15
-------------------------------------------------------------------------------------------------
col DATA_TYPE heading "DATA|TYPE" for a15
col NULLABLE heading "NL" for a2
col HISTOGRAM heading "HIST" for a5
col DENSITY heading "DENSITY" for 999,999,999
col NUM_NULLS heading "NUM|NULLS" for 999,999,999
col NUM_BUCKETS heading "NUM|BUCKETS" for 999,999,999
col AVG_COL_LEN heading "AVG|COL LEN" for 999,999,999
-------------------------------------------------------------------------------------------------
col LOGGING heading "LOG" for a3
col STATUS heading "STATUS" for a6
col INDEX_TYPE heading "INDEX|TYPE" for a8
col UNIQUENESS heading "Unique" for a9
col BLEV heading "B|Tree|Level" for 99
col LEAF_BLOCKS heading "Leaf|Blks" for 999,999
col DISTINCT_KEYS heading "Distinct|Keys" for 999,999,999
col AVG_LEAF_BLOCKS_PER_KEY heading "Average|Leaf Blocks|Per Key" for 99,999
col AVG_DATA_BLOCKS_PER_KEY heading "Average|Data Blocks|Per Key" for 99,999
col CLUSTERING_FACTOR heading "Cluster|Factor" for 999,999,999
col COLUMN_POSITION heading "Col|Pos" for 999
prompt ****************************************************************************************
prompt CURSOR
prompt ****************************************************************************************
select * from table(dbms_xplan.display_cursor('&&1',0,'all'));
select * from table(dbms_xplan.display_cursor('&&1',1,'all'));
select * from table(dbms_xplan.display_cursor('&&1',2,'all'));
select * from table(dbms_xplan.display_cursor('&&1',3,'all'));
prompt
prompt ****************************************************************************************
prompt AWR
prompt ****************************************************************************************
select * from table(dbms_xplan.display_awr('&&1',null,null,'all'));
prompt
prompt ****************************************************************************************
prompt SQL STATS
prompt ****************************************************************************************
set pagesize 9999
select distinct parsing_schema_name from v$sql where sql_id='&&1';
select CPU_TIME,
ELAPSED_TIME,
DISK_READS,
BUFFER_GETS,
ROWS_PROCESSED,
FETCHES,
PARSE_CALLS,
SORTS,
EXECUTIONS from v$sqlstats where sql_id='&&1';
select
CPU_TIME/decode(EXECUTIONS,0,1,EXECUTIONS) CPU_PRE_EXEC,
ELAPSED_TIME/decode(EXECUTIONS,0,1,EXECUTIONS) ELA_PRE_EXEC,
DISK_READS/decode(EXECUTIONS,0,1,EXECUTIONS) DISK_PRE_EXEC,
BUFFER_GETS/decode(EXECUTIONS,0,1,EXECUTIONS) GET_PRE_EXEC,
ROWS_PROCESSED/decode(EXECUTIONS,0,1,EXECUTIONS) ROWS_PRE_EXEC,
ROWS_PROCESSED/decode(FETCHES,0,1,FETCHES) ROWS_PRE_FETCHES,EXECUTIONS
from v$sqlstats where sql_id='&&1';
prompt
prompt ****************************************************************************************
prompt TABLES
prompt ****************************************************************************************
break on owner
WITH t AS
(SELECT /*+ materialize */DISTINCT OBJECT_OWNER, OBJECT_NAME
FROM (SELECT OBJECT_OWNER, OBJECT_NAME
FROM V$SQL_PLAN
WHERE SQL_ID = '&&1'
AND OBJECT_NAME IS NOT NULL
UNION ALL
SELECT OBJECT_OWNER, OBJECT_NAME
FROM DBA_HIST_SQL_PLAN
WHERE SQL_ID = '&&1'
AND OBJECT_NAME IS NOT NULL))
SELECT owner,
TABLE_NAME,
TABLESPACE_NAME,
LOGGING,
BUFFER_POOL,
ltrim(DEGREE) DEGREE,
PARTITIONED,
NUM_ROWS,
BLOCKS,
EMPTY_BLOCKS,
AVG_SPACE,
AVG_ROW_LEN,
LAST_ANALYZED
FROM DBA_TABLES
WHERE (OWNER, TABLE_NAME) IN
(SELECT table_owner,table_name FROM dba_indexes
WHERE (owner,index_name) IN (SELECT * FROM t)
UNION ALL SELECT * FROM t);
prompt
prompt ****************************************************************************************
prompt INDEX INFO
prompt ****************************************************************************************
break on table_owner on table_name on index_name on index_type on uniqueness on LOGGING on status
WITH t AS
(SELECT /*+ materialize */DISTINCT OBJECT_OWNER, OBJECT_NAME
FROM (SELECT OBJECT_OWNER, OBJECT_NAME
FROM V$SQL_PLAN
WHERE SQL_ID = '&&1'
AND OBJECT_NAME IS NOT NULL
UNION ALL
SELECT OBJECT_OWNER, OBJECT_NAME
FROM DBA_HIST_SQL_PLAN
WHERE SQL_ID = '&&1'
AND OBJECT_NAME IS NOT NULL))
SELECT A.TABLE_OWNER,
A.TABLE_NAME,
A.INDEX_NAME,
UNIQUENESS,
COLUMN_NAME,
COLUMN_POSITION,
DESCEND
FROM DBA_INDEXES A, DBA_IND_COLUMNS B
WHERE (A.OWNER, A.table_name) IN
(SELECT table_owner,table_name FROM dba_indexes
WHERE (owner,index_name) IN (SELECT * FROM t)
UNION ALL SELECT * FROM t)
AND A.OWNER = B.INDEX_OWNER
AND A.INDEX_NAME = B.INDEX_NAME;
prompt
prompt ****************************************************************************************
prompt BIND
prompt ****************************************************************************************
break on CHILD_NUMBER
SELECT CHILD_NUMBER,NAME,POSITION,DATATYPE_STRING,VALUE_STRING
FROM v$sql_bind_capture WHERE SQL_ID = '&&1'
order by CHILD_NUMBER,POSITION;
prompt
prompt ****************************************************************************************
prompt LITERAL SQL
prompt ****************************************************************************************
set serveroutput on size 1000000
DECLARE
LVC_SQL_TEXT VARCHAR2(4000);
LVC_ORIG_SQL_TEXT VARCHAR2(4000);
LN_CHILD NUMBER := 10000;
LVC_BIND VARCHAR2(200);
CURSOR C1 IS
SELECT CHILD_NUMBER, NAME, POSITION, DATATYPE_STRING, VALUE_STRING
FROM V$SQL_BIND_CAPTURE
WHERE SQL_ID = '&&1'
ORDER BY CHILD_NUMBER, POSITION;
BEGIN
SELECT SQL_FULLTEXT
INTO LVC_ORIG_SQL_TEXT
FROM V$SQL
WHERE SQL_ID = '&&1'
AND ROWNUM = 1;
FOR R1 IN C1 LOOP
IF (R1.CHILD_NUMBER <> LN_CHILD) THEN
IF LN_CHILD <> 10000 THEN
DBMS_OUTPUT.PUT_LINE(LVC_SQL_TEXT);
DBMS_OUTPUT.PUT_LINE('--------------------------------------------------------');
END IF;
LN_CHILD := R1.CHILD_NUMBER;
LVC_SQL_TEXT := LVC_ORIG_SQL_TEXT;
END IF;
IF R1.NAME LIKE ':SYS_B_%' THEN
LVC_BIND := ':"'||substr(R1.NAME,2)||'"';
ELSE
LVC_BIND := R1.NAME;
END IF;
IF r1.VALUE_STRING IS NOT NULL THEN
IF R1.DATATYPE_STRING = 'NUMBER' THEN
LVC_SQL_TEXT := REGEXP_REPLACE(LVC_SQL_TEXT, LVC_BIND, R1.VALUE_STRING,1,1,'i');
ELSIF R1.DATATYPE_STRING LIKE 'VARCHAR%' THEN
LVC_SQL_TEXT := REGEXP_REPLACE(LVC_SQL_TEXT, LVC_BIND, ''''||R1.VALUE_STRING||'''',1,1,'i');
ELSE
LVC_SQL_TEXT := REGEXP_REPLACE(LVC_SQL_TEXT, LVC_BIND, ''''||R1.VALUE_STRING||'''',1,1,'i');
END IF;
ELSE
LVC_SQL_TEXT := REGEXP_REPLACE(LVC_SQL_TEXT, LVC_BIND, 'NULL',1,1,'i');
END IF;
END LOOP;
DBMS_OUTPUT.PUT_LINE(LVC_SQL_TEXT);
END;
/
prompt
prompt ****************************************************************************************
prompt SQL WAIT HIST
prompt ****************************************************************************************
break on program
SELECT PROGRAM,EVENT, SUM(CNT) TOTAL, WAIT_CLASS
FROM (SELECT DECODE(SESSION_STATE,
'ON CPU',
DECODE(SESSION_TYPE, 'BACKGROUND', 'BCPU', 'CPU'),
EVENT) EVENT,
REPLACE(TRANSLATE(DECODE(SESSION_STATE,
'ON CPU',
DECODE(SESSION_TYPE,
'BACKGROUND',
'BCPU',
'CPU'),
WAIT_CLASS),
' $',
'____'),
'/') WAIT_CLASS,
PROGRAM,
1 CNT
FROM V$ACTIVE_SESSION_HISTORY
WHERE SQL_ID = '&&1'
AND SAMPLE_TIME >= SYSDATE - 4 / 24
AND SAMPLE_TIME <= SYSDATE)
GROUP BY EVENT, WAIT_CLASS, PROGRAM
ORDER BY PROGRAM,TOTAL DESC;
prompt
prompt ****************************************************************************************
prompt TABLE COLUMNS
prompt ****************************************************************************************
break on owner on table_name
WITH t AS
(SELECT /*+ materialize */DISTINCT OBJECT_OWNER, OBJECT_NAME
FROM (SELECT OBJECT_OWNER, OBJECT_NAME
FROM V$SQL_PLAN
WHERE SQL_ID = '&&1'
AND OBJECT_NAME IS NOT NULL
UNION ALL
SELECT OBJECT_OWNER, OBJECT_NAME
FROM DBA_HIST_SQL_PLAN
WHERE SQL_ID = '&&1'
AND OBJECT_NAME IS NOT NULL))
SELECT OWNER,
TABLE_NAME,
COLUMN_NAME,
DATA_TYPE,
NULLABLE,
substr(HISTOGRAM,0,5) HISTOGRAM,
DENSITY,
NUM_NULLS,
NUM_BUCKETS,
AVG_COL_LEN,
LAST_ANALYZED
FROM DBA_TAB_COLS
WHERE (OWNER, TABLE_NAME) IN
(SELECT table_owner,table_name FROM dba_indexes
WHERE (owner,index_name) IN (SELECT * FROM t)
UNION ALL SELECT * FROM t)
ORDER BY owner,table_name,COLUMN_ID;
prompt
prompt ****************************************************************************************
prompt INDEX STATS
prompt ****************************************************************************************
WITH t AS
(SELECT /*+ materialize */DISTINCT OBJECT_OWNER, OBJECT_NAME
FROM (SELECT OBJECT_OWNER, OBJECT_NAME
FROM V$SQL_PLAN
WHERE SQL_ID = '&&1'
AND OBJECT_NAME IS NOT NULL
UNION ALL
SELECT OBJECT_OWNER, OBJECT_NAME
FROM DBA_HIST_SQL_PLAN
WHERE SQL_ID = '&&1'
AND OBJECT_NAME IS NOT NULL))
SELECT INDEX_NAME,
INDEX_TYPE,
LOGGING,
STATUS,
BLEVEL BLEV,
LEAF_BLOCKS,
DISTINCT_KEYS,
NUM_ROWS,
AVG_LEAF_BLOCKS_PER_KEY,
AVG_DATA_BLOCKS_PER_KEY,
CLUSTERING_FACTOR,
LAST_ANALYZED
FROM DBA_INDEXES T
WHERE (TABLE_OWNER, TABLE_NAME) IN
(SELECT table_owner,table_name FROM dba_indexes
WHERE (owner,index_name) IN (SELECT * FROM t)
UNION ALL SELECT * FROM t)
ORDER BY 1
/
spool off
undefine 1
來自 “ ITPUB部落格 ” ，連結：http://blog.itpub.net/8242091/viewspace-720513/，如需轉載，請註明出處，否則將追究法律責任。
相關文章
- 一次捕獲SQL調優資訊的指令碼 sql9.sqlSQL指令碼
- 獲取top N cpu pid的sql資訊指令碼SQL指令碼
- SQL Server一次SQL調優案例SQLServer
- 【Mysql】捕獲線上sqlMySql
- 記一次SQL Server刪除SQL調優SQLServer
- 記一次SQL調優過程SQL
- 【sql調優】系統資訊統計SQL
- unix 系統捕獲sql語句和手工調整AWR的設定SQL
- 使用mysqlsniffer捕獲SQL語句MySql
- 【SQL】如何獲得表及欄位的說明資訊（comment）的建立指令碼SQL指令碼
- 品牌指南：如何捕獲土豪的芳心？–資訊圖
- 檢視錶的統計資訊SQL指令碼SQL指令碼
- Python 指令碼之獲取CPU資訊Python指令碼
- 生產sql調優之統計資訊分析SQL
- 【DataGuarad】獲取standby 庫的配置資訊的指令碼指令碼
- SQL調優SQL
- 收集統計資訊的SQL指令碼（sosi.sql）--崔華大師SQL指令碼
- JavaScript事件捕獲冒泡與捕獲JavaScript事件
- SQL Server 變更資料捕獲(CDC)SQLServer
- 一次SQL調優 聊一聊 SQLSERVER 資料頁SQLServer
- SQL Server 監控統計阻塞指令碼資訊SQLServer指令碼
- 獲取sql完整指令碼，get_fulltext.shSQL指令碼
- vbs指令碼獲取Am註冊路徑資訊指令碼
- 獲取linux伺服器基本資訊指令碼Linux伺服器指令碼
- sql調優1SQL
- oracle sql調優OracleSQL
- oracle異常捕獲程式碼(轉)Oracle
- 如何實現對 Oracle 的實時資料捕獲和效能調優｜Flink CDC 專題Oracle
- 捕獲cookie的值Cookie
- 一次 JVM 調優的筆記JVM筆記
- jQuery捕獲jQuery
- MySQL調優篇 | SQL調優實戰（5）MySql
- 一條大sql的調優SQL
- Teradata SQL調優SQL
- 儲存過程——異常捕獲&列印異常資訊儲存過程
- Oracle中SQL調優（SQL TUNING）之最權威獲取SQL執行計劃大全OracleSQL
- DRF之異常捕獲原始碼分析原始碼
- 一次rman 指令碼的部署指令碼