In giá trị của một biến trong SQL Developer

Tôi muốn in giá trị của một biến cụ thể bên trong một khối ẩn danh. Tôi đang sử dụng Oracle SQL Developer. Tôi đã thử sử dụng dbms_output.put_line. Nhưng nó không hoạt động. Mã mà tôi đang sử dụng được hiển thị bên dưới.

SET SERVEROUTPUT ON

DECLARE

  CTABLE USER_OBJECTS.OBJECT_NAME%TYPE;
  CCOLUMN ALL_TAB_COLS.COLUMN_NAME%TYPE;
  V_ALL_COLS VARCHAR2(500);

  CURSOR CURSOR_TABLE
    IS
    SELECT OBJECT_NAME 
    FROM USER_OBJECTS 
    WHERE OBJECT_TYPE='TABLE'
    AND OBJECT_NAME LIKE 'tb_prm_%';

  CURSOR CURSOR_COLUMNS (V_TABLE_NAME IN VARCHAR2)
    IS
    SELECT COLUMN_NAME
    FROM ALL_TAB_COLS
    WHERE TABLE_NAME = V_TABLE_NAME;

BEGIN

  OPEN CURSOR_TABLE;

  LOOP
    FETCH CURSOR_TABLE INTO CTABLE;
    EXIT WHEN CURSOR_TABLE%NOTFOUND;

    OPEN CURSOR_COLUMNS (CTABLE);

    V_ALL_COLS := NULL;

    LOOP
      FETCH CURSOR_COLUMNS INTO CCOLUMN;
      V_ALL_COLS := V_ALL_COLS || CCOLUMN;
      IF CURSOR_COLUMNS%FOUND THEN
        V_ALL_COLS := V_ALL_COLS || ', ';
      ELSE
        EXIT;
      END IF;
    END LOOP;

    DBMS_OUTPUT.PUT_LINE(V_ALL_COLS);

  END LOOP;
  CLOSE CURSOR_TABLE;

END;

Và tôi chỉ nhận được đầu ra là anonymous block completed.

Bạn cần bật dbms_output. Trong Oracle SQL Developer:

1. Hiển thị cửa sổ Đầu ra DBMS (Xem-> Đầu ra DBMS).
2. Nhấn nút "+" ở đầu cửa sổ Dbms Output, sau đó chọn một kết nối cơ sở dữ liệu đang mở trong hộp thoại mở ra.

Trong SQL * Plus:

 SET SERVEROUTPUT ON

Nhà phát triển SQL dường như chỉ xuất văn bản DBMS_OUTPUT khi bạn đã bật ngăn cửa sổ DBMS_OUTPUT một cách rõ ràng.

Đi tới (Menu) XEM -> Dbms_output để gọi ngăn.

Nhấp vào dấu Cộng màu xanh lá cây để bật đầu ra cho kết nối của bạn và sau đó chạy mã.

CHỈNH SỬA: Đừng quên đặt kích thước bộ đệm theo số lượng đầu ra bạn đang mong đợi.

Đặt đầu ra máy chủ trên Trước hết

1. SET SERVEROUTPUT on sau đó

2. Đi tới cửa sổ Đầu ra DBMS (Xem-> Đầu ra DBMS)

3. sau đó Nhấn Ctrl+ Nđể kết nối máy chủ

Có 2 lựa chọn:

set serveroutput on format wrapped;

hoặc là

Mở menu 'xem' và nhấp vào 'đầu ra dbms'. Bạn sẽ nhận được một cửa sổ đầu ra dbms ở cuối trang tính. Sau đó, bạn cần thêm kết nối (vì một số lý do mà điều này không được thực hiện tự động).

1) Vào menu xem.
2) Chọn mục menu DBMS_OUTPUT.
3) Nhấn Ctrl+ Nvà chọn trình chỉnh sửa kết nối.
4) Thực hiện lệnh SET SERVEROUTPUT ON.
5) Sau đó thực thi Tập lệnh PL / SQL của bạn.

DECLARE

  CTABLE USER_OBJECTS.OBJECT_NAME%TYPE;
  CCOLUMN ALL_TAB_COLS.COLUMN_NAME%TYPE;
  V_ALL_COLS VARCHAR2(5000);

  CURSOR CURSOR_TABLE
    IS
    SELECT OBJECT_NAME 
    FROM USER_OBJECTS 
    WHERE OBJECT_TYPE='TABLE'
    AND OBJECT_NAME LIKE 'STG%';

  CURSOR CURSOR_COLUMNS (V_TABLE_NAME IN VARCHAR2)
    IS
    SELECT COLUMN_NAME
    FROM ALL_TAB_COLS
    WHERE TABLE_NAME = V_TABLE_NAME;

BEGIN

  OPEN CURSOR_TABLE;
  LOOP
    FETCH CURSOR_TABLE INTO CTABLE;

    OPEN CURSOR_COLUMNS (CTABLE);
    V_ALL_COLS := NULL;
    LOOP

      FETCH CURSOR_COLUMNS INTO CCOLUMN;
      V_ALL_COLS := V_ALL_COLS || CCOLUMN;
      IF CURSOR_COLUMNS%FOUND THEN
        V_ALL_COLS := V_ALL_COLS || ', ';
      ELSE
        EXIT;
      END IF;
    END LOOP;
   close CURSOR_COLUMNS ;
    DBMS_OUTPUT.PUT_LINE(V_ALL_COLS);
    EXIT WHEN CURSOR_TABLE%NOTFOUND;
  END LOOP;`enter code here`
  CLOSE CURSOR_TABLE;

END;

Tôi đã thêm Đóng con trỏ thứ hai. Nó hoạt động và nhận được đầu ra ...

chọn Xem -> Đầu ra DBMS trong menu và

Chuyển đến cửa sổ Đầu ra DBMS (Xem-> Đầu ra DBMS).