《Oracle PL/SQL实例精讲》学习笔记26——优化PL/SQL(第一部分——PL/SQL调优工具)

版权声明:本文为博主原创文章,未经博主允许不得转载。 https://blog.csdn.net/hpdlzu80100/article/details/84194652

本章内容:

1. PL/SQL调优工具(使用PL/SQL剖析器API、使用跟踪API、使用PL/SQL层次式剖析器)

2. PL/SQL优化级别

3. 子程序内联

代码如下:

1. 查看PLSQL_DEBUG参数

SQL> show parameter plsql_debug

NAME                                 TYPE                              VALUE
------------------------------------ --------------------------------- ------------------------------
plsql_debug                          boolean                           FALSE

2. 启用会话级PLSQL_DEBUG

SQL> ALTER SESSION SET PLSQL_DEBUG = TRUE;

Session altered.

3. 运行TRACETABL.SQL

SQL> @D:\app\<USER>\product\12.1.0\dbhome_2\RDBMS\ADMIN\tracetab.sql

Table dropped.


Table dropped.


Sequence dropped.


Table created.


Comment created.


Table created.


Comment created.


Sequence created.

其中,TRACETABL.SQL的内容如下:

Rem
Rem $Header: tracetab.sql 31-mar-2006.16:45:38 jmuller Exp $
Rem
Rem tracetab.sql
Rem
Rem Copyright (c) 1999, 2006, Oracle. All rights reserved.  
Rem
Rem    NAME
Rem      tracetab.sql
Rem
Rem    DESCRIPTION
Rem      Create tables for the PL/SQL tracer
Rem
Rem    NOTES
Rem      This script must be run under SYS
Rem
Rem      The following tables are required to collect data
Rem        plsql_trace_runs - information on trace runs
Rem        plsql_trace_event - detailed trace data
Rem
Rem      For security reasons, these tables are created under SYS, and are
Rem      unique system-wide. The DBA should explicitly grant access to these
Rem      tables to those users who require it.
Rem
Rem      The plsql_trace_runnumber sequence is used for generating unique
Rem      run numbers.
Rem
Rem      THIS SCRIPT DELETES ALL EXISTING DATA!
Rem
Rem    MODIFIED   (MM/DD/YY)
Rem    jmuller     03/14/06 - Fix bug 5066528: several tracing enhancements 
Rem    dalpern     05/18/05 - 4180912: improved info in PLSQL_TRACE_EVENTS 
Rem    jmuller     10/16/02 - Fix bug 2610154: widen *dblink columns
Rem    astocks     09/16/99 - Make use of sys consistent
Rem    jmuller     10/07/99 - Fix bug 708690: TAB -> blank
Rem    astocks     06/07/99 - Tables for PL/SQL tracer
Rem    astocks     06/07/99 - Created
Rem
Rem

drop table sys.plsql_trace_events cascade constraints;
drop table sys.plsql_trace_runs cascade constraints;

drop sequence sys.plsql_trace_runnumber;

create table sys.plsql_trace_runs
(
  runid           number primary key,  -- unique run identifier,
                                       -- from plsql_trace_runnumber
  run_date        date,                -- start time of run
  run_owner       varchar2(31),        -- account under which run was made
  run_comment     varchar2(2047),      -- user provided comment for this run
  run_comment1    varchar2(2047),      -- additional user-supplied comment
  run_end         date,                -- termination time for this run
  run_flags       varchar2(2047),      -- flags for this run
  related_run     number,              -- for correlating client/server   
  run_system_info varchar2(2047),      -- currently unused
  spare1          varchar2(256)        -- unused
);

comment on table sys.plsql_trace_runs is
        'Run-specific information for the PL/SQL trace';

create table sys.plsql_trace_events
(
  runid           number references sys.plsql_trace_runs,--  run identifier
  event_seq       number,           -- unique sequence number within run
  event_time      date,             -- timestamp
  related_event   number,
  event_kind      number,
  event_unit_dblink varchar2(4000),
  event_unit_owner varchar2(31),
  event_unit      varchar2(31),     -- unit where the event happened
  event_unit_kind varchar2(31),
  event_line      number,           -- line in the unit where event happened
  event_proc_name varchar2(31),     -- if not empty, procedure where event 
                                    -- happened
  stack_depth     number,
--
-- Fields that apply to procedure calls
  proc_name       varchar2(31),     -- if not empty, name of procedure called
  proc_dblink     varchar2(4000),
  proc_owner      varchar2(31),
  proc_unit       varchar2(31),
  proc_unit_kind  varchar2(31),
  proc_line       number,
  proc_params     varchar2(2047),
--
-- Fields that apply to ICDs (Calls to PL/SQL internal routines)
  icd_index       number,         
--
-- Fields that apply to exceptions
  user_excp       number,
  excp            number,
--
-- Field for comments
--     User defined event - text supplied by user
--     SQL event          - actual SQL string
--     Others             - Description of event 
  event_comment   varchar2(2047),
----
-- Fields for bulk binds
-- ?
--
-- Fields from dbms_application_info, dbms_session, and ECID
  module          varchar2(4000),
  action          varchar2(4000),
  client_info     varchar2(4000),
  client_id       varchar2(4000),
  ecid_id         varchar2(4000),
  ecid_seq        number,
--
--
-- Fields for extended callstack and errorstack info
--  (currently set only for "Exception raised", "Exception handled" and "Trace
--  flags changed" ([5066528]) events)
--
  callstack       clob,
  errorstack      clob,
--
  primary key(runid, event_seq)
);

comment on table sys.plsql_trace_events is 
        'Accumulated data from all trace runs';

create sequence sys.plsql_trace_runnumber start with 1 nocache;

4. 用户授权

SQL> grant select on plsql_trace_events to c##student;

Grant succeeded.

SQL> grant select on plsql_trace_runs to c##student;

Grant succeeded.

5. 测试

SQL> /* Formatted on 2018/11/19 23:11:50 (QP5 v5.256.13226.35538) */
SQL> CREATE OR REPLACE PROCEDURE TEST_TRACE
  2  AS
  3     v_num1   NUMBER;
  4     v_num2   NUMBER;
  5     v_num3   NUMBER;
  6     v_date   DATE;
  7  BEGIN
  8     FOR i IN 1 .. 10
  9     LOOP
 10        v_num1 := 1;
 11        v_num2 := i + i / 2 + SQRT (i);
 12        v_num3 := v_num1 + v_num2;
 13
 14        SELECT SYSDATE INTO v_date FROM DUAL;
 15     END LOOP;
 16  END;
 17  /

Procedure created.

SQL>
SQL> BEGIN
  2      DBMS_TRACE.SET_PLSQL_TRACE(DBMS_TRACE.TRACE_ALL_CALLS);
  3      TEST_TRACE;
  4      DBMS_TRACE.CLEAR_PLSQL_TRACE;
  5  END;
  6  /
SQL>   SELECT R.RUNID,
  2           E.EVENT_SEQ,
  3           E.EVENT_UNIT_OWNER,
  4           E.EVENT_UNIT,
  5           E.EVENT_UNIT_KIND,
  6           E.PROC_LINE,
  7           E.EVENT_COMMENT
  8      FROM PLSQL_TRACE_RUNS R, PLSQL_TRACE_EVENTS E
  9     WHERE R.RUNID = 1 AND R.RUNID = E.RUNID
 10  ORDER BY R.RUNID, E.EVENT_SEQ;

RUNID EVENT_SEQ EVENT_UNIT EVENT_UNIT   EVENT_UNIT_KIND PROC_LINE EVENT_COMMENT
----- --------- ---------- ------------ --------------- --------- ------------------------------
    1         1                                                   PL/SQL Trace Tool started
    1         2                                                   Trace flags changed
    1         3 SYS        DBMS_TRACE   PACKAGE BODY           75 Return from procedure call
    1         4 SYS        DBMS_TRACE   PACKAGE BODY           81 Return from procedure call
    1         5 SYS        DBMS_TRACE   PACKAGE BODY            3 Return from procedure call
    1         6            <anonymous>  ANONYMOUS BLOCK         1 Procedure Call
    1         7 SYS        TEST_TRACE   PROCEDURE                 PL/SQL Internal Call
    1         8 SYS        TEST_TRACE   PROCEDURE                 PL/SQL Internal Call
    1         9 SYS        TEST_TRACE   PROCEDURE                 PL/SQL Internal Call
    1        10 SYS        TEST_TRACE   PROCEDURE                 PL/SQL Internal Call
    1        11 SYS        TEST_TRACE   PROCEDURE                 PL/SQL Internal Call
    1        12 SYS        TEST_TRACE   PROCEDURE                 PL/SQL Internal Call
    1        13 SYS        TEST_TRACE   PROCEDURE                 PL/SQL Internal Call
    1        14 SYS        TEST_TRACE   PROCEDURE                 PL/SQL Internal Call
    1        15 SYS        TEST_TRACE   PROCEDURE                 PL/SQL Internal Call
    1        16 SYS        TEST_TRACE   PROCEDURE                 PL/SQL Internal Call
    1        17 SYS        TEST_TRACE   PROCEDURE               4 Return from procedure call
    1        18            <anonymous>  ANONYMOUS BLOCK        92 Procedure Call
    1        19 SYS        DBMS_TRACE   PACKAGE BODY           69 Procedure Call
    1        20 SYS        DBMS_TRACE   PACKAGE BODY           64 Procedure Call
    1        21 SYS        DBMS_TRACE   PACKAGE BODY           12 Procedure Call
    1        22 SYS        DBMS_TRACE   PACKAGE BODY           66 Return from procedure call
    1        23 SYS        DBMS_TRACE   PACKAGE BODY           72 Return from procedure call
    1        24 SYS        DBMS_TRACE   PACKAGE BODY           21 Procedure Call
    1        25                                                   PL/SQL trace stopped

猜你喜欢

转载自blog.csdn.net/hpdlzu80100/article/details/84194652