如何分析 Oracle 存储过程的端到端性能

Question

我想知道从外部进程访问数据库并说执行此操作到数据库返回到进程并说开始，我的存储过程需要多长时间才能执行。

有没有一种简单易行的方法来完成这项非常基本的任务？

当然，关于存储过程执行期间发生的情况以及执行每个任务（插入、plsql 字符串操作等）花费了多少存储过程时间的报告将是一个额外的好处，但我真的只想要一些简单且易于执行的东西使用。 （而且免费）

Answer 1

如果您使用的是 Oracle 11g，您应该查看分层分析器 DBMS_HPROF。这是一个工具，可以为您提供 PL/SQL 程序中所有节点的运行时间。顾名思义，它对于调查调用程序的程序特别有用。它还识别与函数调用不同的 SQL 语句的计时。 了解更多信息。

它是标准 11g 部署的一部分，因此是免费的。好吧，一旦您支付了许可证费用，它就是免费的:)

默认情况下，DBMS_HPROF 包的权限不会授予任何人。因此，您需要让具有 SYSDBA 访问权限的人来了解您的情况。分析还需要创建一些表。这些事情都不应该成为问题，但我知道有时它们确实是问题。

---

唉，你使用的是早期版本。这样你就只剩下了 DBMS_PROFILER，它从 9i 就已经存在了。这基本上对于单个程序来说效果很好。它的主要缺点是我们只能在具有 CREATE 权限的程序上使用它（即只能在我们的架构中的程序，除非我们具有 CREATE ANY PROCEDURE 权限，这通常意味着成为 DBA）。此外，为了分析嵌入式 SQL 语句，我们需要使用 DBMS_TRACE 包。 了解更多信息。

Answer 2

最简单、最便宜的选择
您可以将事件记录到“调试”表并检查日志之间的持续时间，例如。
在插入表 a 之前记录事件，并将时间戳 a 插入调试表。
将带有时间戳 b 的表插入调试表后记录事件。

如果您的存储过程超过 5 行，这会有点耗时，但它仍然会对您有所帮助。还要实现一个调试标志，因此当您需要记录时间戳时，请将过程顶部的标志设置为 true，然后重新编译它。执行存储过程时，它将记录所有事件，完成调试后，将标志设置为 false 并重新编译。

Answer 3

如果您希望将自己的延时写入 PL/SQL 程序，下面是我用于执行此操作的模板代码。此外，这不需要 DBA 的帮助。我的 DBA 通常不愿意让我有更多机会接触更多的东西。那，我讨厌等待他们真正给我访问权限。

/* This procedure is simply an example of parsing out an Elapsed time into their individual time parts */
/*   In other words it provides to the user the elapsed time in hours : minutes : seconds . milliseconds */

DECLARE

  G_START_TIME1     NUMBER        := DBMS_UTILITY.GET_TIME;
  G_START_TIME2     NUMBER        := DBMS_UTILITY.GET_TIME;
  vG_ELAPSED_TIME   VARCHAR2(200);

  /* Variables below are used for storing Elapsed time. */
  RETVAL           NUMBER;
  hourss            NUMBER;
  minutess          NUMBER;
  secondss          NUMBER;
  millisecondss     NUMBER;
    n_hrs         NUMBER := 360000;
    n_mins        NUMBER := 6000;
    n_secs        NUMBER := 100;
    n_sixty       NUMBER := 60;
    n_thirty      NUMBER := 30;
    n_ten         NUMBER := 10;

  v_PrintTime     VARCHAR2(200);


  /* The procedure below is simply used to simulate the passage of time */
  PROCEDURE waste_time(pn_Seconds NUMBER) IS

  n_CentiSeconds  NUMBER  :=  pn_Seconds * 100;
  n_ProgramStart  NUMBER  := DBMS_UTILITY.GET_TIME; /* dbms_utility_get_time returns times in hundreds of a second */

  BEGIN
    WHILE DBMS_UTILITY.GET_TIME < n_ProgramStart + n_CentiSeconds
    LOOP
      null;
    END LOOP;
  END waste_time;

BEGIN

  G_START_TIME1   :=    -2019618227; --dbms_utility.get_time;

  --waste_time(1);
  --dbms_output.put_line('1 Second Wasted'|| chr(10));

  G_START_TIME2   :=    G_START_TIME1 + 366110; ---2019619227; --dbms_utility.get_time;

  dbms_output.put_line('Start_time: '||G_START_TIME1);
  dbms_output.put_line('End_time:   '||G_START_TIME2||chr(10));

  vG_ELAPSED_TIME :=  G_START_TIME2 - G_START_TIME1;
  millisecondss   :=  vG_ELAPSED_TIME * n_ten;
  secondss        :=  vG_ELAPSED_TIME / n_secs;
  minutess        :=  vG_ELAPSED_TIME / n_mins;
  hourss          :=  vG_ELAPSED_TIME / n_hrs;

  dbms_output.put_line('Total Time: '||millisecondss ||' Milliseconds');
  dbms_output.put_line('Total Time: '||vG_ELAPSED_TIME ||' Centiseconds');
  dbms_output.put_line('Total Time: '||secondss ||' Seconds');
  dbms_output.put_line('Total Time: '||minutess ||' Minutes');
  dbms_output.put_line('Total Time: '||hourss ||' Hours');

  millisecondss   :=  mod(vG_ELAPSED_TIME * n_ten, 1000);            /* Milliseconds into Seconds.  Returns left over millisedonds */
  secondss        :=  trunc(mod(vG_ELAPSED_TIME / n_secs, n_sixty)); /* Seconds into hours.  Returns how many seconds are left over */
  minutess        :=  trunc(mod(vG_ELAPSED_TIME / n_mins, n_sixty)); /* Seconds into hours.  Returns how many seconds are left over */
  hourss          :=  trunc(vG_ELAPSED_TIME / n_hrs);                /* Spit out hours only using just trunc here.  Since we don't need to build up Days we can leave this as is */

  v_PrintTime     :=  hourss ||':'|| minutess ||':'|| secondss ||'.'|| millisecondss;

  dbms_output.put_line(chr(10) ||'Elapsed Time: '|| v_PrintTime);


END;