Question

DBMS_OUTPUT 是一个内置的软件包，能够显示输出显示调试信息，并从 PL/ SQL 块，子程序，包和触发器发送消息。我们已经使用这个包在我们所有的教程中。

让我们来看看一个小的代码片段，将显示在数据库中的所有用户表。尝试在数据库列出了所有的表名：

BEGIN
   dbms_output.put_line  (user || ' Tables in the database:');
   FOR t IN (SELECT table_name FROM user_tables)
   LOOP
      dbms_output.put_line(t.table_name);
   END LOOP;
END;
/

DBMS_OUTPUT 子程序

DBMS_OUTPUT 包含有以下子程序：

S.N	子程序及用途
1	DBMS_OUTPUT.DISABLE; 禁止信息输出
2	DBMS_OUTPUT.ENABLE(buffer_size IN INTEGER DEFAULT 20000); 启用消息输出。 BUFFER_SIZE=null 表示无限的缓冲区大小
3	DBMS_OUTPUT.GET_LINE (line OUT VARCHAR2, status OUT INTEGER); 检索缓存信息的单行
4	DBMS_OUTPUT.GET_LINES (lines OUT CHARARR, numlines IN OUT INTEGER); 检索来自缓冲器的行的数组
5	DBMS_OUTPUT.NEW_LINE; 放置行结束的标志
6	DBMS_OUTPUT.PUT(item IN VARCHAR2); 放置在所述缓冲器中的部分行
7	DBMS_OUTPUT.PUT_LINE(item IN VARCHAR2); 放置在所述缓冲器中的行

示例:

DECLARE
   lines dbms_output.chararr;
   num_lines number;
BEGIN
   -- enable the buffer with default size 20000
   dbms_output.enable;

   dbms_output.put_line('Hello Reader!');
   dbms_output.put_line('Hope you have enjoyed the tutorials!');
   dbms_output.put_line('Have a great time exploring pl/sql!');

   num_lines := 3;

   dbms_output.get_lines(lines, num_lines);

   FOR i IN 1..num_lines LOOP
      dbms_output.put_line(lines(i));
   END LOOP;
END;
/

当上述代码在 SQL 提示符执行时，它产生了以下结果：

Hello Reader!
Hope you have enjoyed the tutorials!
Have a great time exploring pl/sql!

PL/SQL procedure successfully completed.