Печать значения переменной в SQL Developer


Я хотел напечатать значение конкретной переменной, которая находится внутри анонимного блока. Я использую Oracle SQL Developer. Я пробовал использовать dbms_output.put_line. Но это не работает. Код, который я использую, показан ниже.

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;

и я получаю выход только как anonymous block completed.

7 84

7 ответов:

вам нужно включить dbms_output. В Oracle SQL Developer:

  1. показать окно вывода СУБД (вид->вывод СУБД).
  2. Нажмите кнопку " + " в верхней части окна вывода СУБД и выберите в открывшемся диалоговом окне открытое соединение с базой данных.

в SQL * Plus:

 SET SERVEROUTPUT ON

SQL Developer, похоже, выводит только текст DBMS_OUTPUT, когда вы явно включили панель окна DBMS_OUTPUT.

перейдите в (меню) VIEW -> Dbms_output для вызова панели.

нажмите на зеленый знак плюс, чтобы включить вывод для вашего соединения, а затем запустите код.

EDIT: не забудьте установить размер буфера в соответствии с количеством выходных данных, которые вы ожидаете.

сделать вывод сервера в первую очередь

  1. SET SERVEROUTPUT on затем

  2. перейти в окно вывода СУБД (вид->вывод СУБД)

  3. нажмите клавишу Ctrl+N для подключения сервера

есть 2 варианта:

set serveroutput on format wrapped;

или

Откройте меню " Вид "и нажмите на кнопку "Вывод СУБД". Вы должны получить окно вывода СУБД в нижней части листа. Затем вам нужно добавить соединение (по какой-то причине это не делается автоматически).

выберите Вид-- > вывод СУБД в меню и

перейти в окно вывода СУБД (вид->вывод СУБД).

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;

Я добавил закрыть второй курсор. Он работает и получает выход, а также...