在pl / sql包中添加跟踪

Question

我需要向PL / SQL包中添加跟踪以分析代码中的错误。

例如，如果我有这段代码，并且希望添加跟踪（命名为对诸如“ proc_traces”之类的存储过程的调用，如下所示：

CREATE OR REPLACE PACKAGE BODY PK_TEST AS
   FUNCTION F_FOO( v_number1 IN NUMBER,
                  v_varchar_a1 IN VARCHAR2,
                  v_varchar_a2 IN VARCHAR2,
                  v_date IN DATE,
                  v_mesg OUT VARCHAR2) IS
   v_val VARCHAR2;
   v_resp NUMBER;
   BEGIN
      proc_traces('1', sysdate, 'USER', 'v_nmber1: ' || v_number1 || ' v_varchar_a1: ' || v_varchar_a1 || ' v_varchar_a2: ' || v_varchar_a2 || ' v_date: ' || v_date);
      --
      IF v_number1 = 3456 THEN
         v_mesg := 'Product obsolete';
      ELSIF v_number <> 3456 THEN
         v_mesg := 'Product updated';
         v_resp := PK_ANOTHER.F_FOO2( v_number);
         -- Init Trace
         proc_traces('1', sysdate, 'USER', 'v_resp: ' || v_resp);
         -- End trace
      END;
   END f_foo;
END PK_TEST;

我希望在代码中自动添加跟踪，插入换行符，注释等。如何使用正则表达式或php代码来做到这一点？