|
SQL>
SQL> CREATE OR REPLACE PACKAGE Debug AS
2 PROCEDURE Debug(p_Description IN VARCHAR2,
3 p_Value IN VARCHAR2);
4
5 PROCEDURE Reset;
6 END Debug;
7 /
Package created.
SQL>
SQL> CREATE OR REPLACE PACKAGE BODY Debug AS
2 PROCEDURE Debug(p_Description IN VARCHAR2,
3 p_Value IN VARCHAR2) IS
4 BEGIN
5 DBMS_OUTPUT.PUT_LINE(p_Description || ': ' || p_Value);
6 END Debug;
7
8 PROCEDURE Reset IS
9 BEGIN
10 DBMS_OUTPUT.DISABLE;
11 DBMS_OUTPUT.ENABLE(1000000);
12 END Reset;
13 BEGIN /* Package initialization code */
14 Reset;
15 END Debug;
16 /
Package body created.
SQL>
SQL>
SQL>
|