PLSQL_性能优化效能跟踪工具DBMS_PROFILER分析（案例）

原创

mb61ee611ac9cd6 2022-04-01 14:08:01 博主文章分类：[1.1 数据]. PLSQL ©著作权

文章标签 PLSQL sql html oracle 文章分类 代码人生

©著作权归作者所有：来自51CTO博客作者mb61ee611ac9cd6的原创作品，请联系作者获取转载授权，否则将追究法律责任

2014-06-01 Created By BaoXinjian

一、摘要

Oracle PLSQL性能诊断是经常会遇到问题，所以Oracle提供了比较多的程式诊断工具，其中包括了dbms_profiler包

DBMS_PROFILER中会用到一些基本构建如下

在调用程式前DBMS_PROFILER.START_PROFILER，启动对该程式监控
在调用程式后DBMS_PROFILER.STOP_PROFILER，结束对程式监控
在监控过程中，系统会将资料存放至三个表中PLSQL_PROFILER_RUNS -> UNITS -> DATA
通过profiler.sql工具产生HTML形式的性能报表

个人感觉，如果本人自己测试程式性能的话，只需查看监控数据在PLSQL_PROFILER_RUNS / UNITS/ DATA即可

但是如果遇到客户对程式性能有怀疑时，需要通过profiler.sql产生HTML性能报表就非常重要了，总不能让客户查看SQL，而Oracle自带的标准HTML汇总报表旧非常有说服力了

二、案例

需求：客户要求诊断一个客制化的package的性能，使用dbms_profiler跟踪，发现问题所在并进行调优

1. 建立测试脚本，测试dbms_profiler

2. 查询SQL Performance的三个重要表PLSQL_PROFILER_RUNS->UNITS->DATA，通过Run_Id

3. 查询SQL Performance通过profiler.sql导出html格式的性能报表,调用时输入唯一参数Run_Id

三、案例实现

Step1. 建立测试脚本，测试dbms_profiler

1     DECLARE
 2 
 3         x_to_currecny GL_DAILY_RATES.TO_CURRENCY%TYPE;
 4 
 5         x_from_currency GL_DAILY_RATES.FROM_CURRENCY%TYPE;
 6 
 7         x_conversion_date GL_DAILY_RATES.CONVERSION_DATE%TYPE;
 8 
 9         x_rate NUMBER;
10 
11     BEGIN
12 
13         DBMS_PROFILER.START_PROFILER('BXJ_PLSQL_DBMS_PROFILER');
14 
15         SELECT to_currency, from_currency, conversion_date
16 
17            INTO x_to_currecny, x_from_currency, x_conversion_date
18 
19          FROM gl_daily_rates
20 
21        WHERE ROWNUM <= 1;
22 
23         x_rate := bxj_get_rate.get_rate_1(x_to_currecny,
24 
25         x_from_currency,
26 
27         x_conversion_date);
28 
29         DBMS_OUTPUT.PUT_LINE('x_rate=' || x_rate);
30 
31         DBMS_PROFILER.STOP_PROFILER;
32 
33     END;

Step2.1 查询SQL Performance的三个重要表PLSQL_PROFILER_RUNS->UNITS->DATA

1     select * from PLSQL_PROFILER_RUNS
 2 
 3         where run_comment= 'BXJ_PLSQL_DBMS_PROFILER'
 4 
 5  
 6 
 7     select * from PLSQL_PROFILER_UNITS
 8 
 9         where runid = 15
10 
11  
12 
13     select * from PLSQL_PROFILER_DATA
14 
15         where runid = 15
16 
17         order by line#

Step2.2. 具体SQL

1     SELECT d.line#, s.text,d.total_time, d.total_occur, d.min_time,d.max_time
 2 
 3      FROM plsql_profiler_data d, sys.all_source s, plsql_profiler_units u
 4 
 5     WHERE d.runid = 15
 6 
 7         AND u.unit_name = 'BXJ_GET_RATE'
 8 
 9         AND u.runid = d.runid
10 
11         AND d.unit_number = u.unit_number
12 
13         AND d.total_occur <> 0
14 
15         AND s.TYPE(+) = u.unit_type
16 
17         AND s.owner(+) = u.unit_owner
18 
19         AND s.name(+) = u.unit_name
20 
21         AND d.line# = NVL (s.line, d.line#)
22 
23     ORDER BY u.unit_number, d.line#;