Imprimir el valor de una variable en SQL Developer

Question

Quería imprimir el valor de una variable particular que está dentro de un bloque anónimo. Estoy usando Oracle SQL Developer. Intenté usar dbms_output.put_line. Pero no está funcionando. El código que estoy usando se muestra a continuación.

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; 

Y yo estoy recibiendo la salida sólo como anonymous block completed.

Answer 1

Debe activar dbms_output. En Oracle SQL Developer:

1. Muestra la ventana Salida DBMS (Ver-> Salida DBMS).
2. Presione el botón "+" en la parte superior de la ventana Salida de Dbms y luego seleccione una conexión de base de datos abierta en el cuadro de diálogo que se abre.

En SQL * Plus:

SET SERVEROUTPUT ON 

Answer 2

SQL Developer parece única salida del texto DBMS_OUTPUT cuando se ha activado de forma explícita en el cristal de la ventana DBMS_OUTPUT.

Ir a (Menú) VER -> Dbms_output para invocar el panel.

Haga clic en el signo más verde para habilitar la salida de su conexión y luego ejecute el código.

EDITAR: No olvide establecer el tamaño del búfer de acuerdo con la cantidad de salida que está esperando.

Answer 3

seleccione Ver -> Salida de DBMS en el menú y

Answer 4

Ir a la ventana de salida de DBMS (Ver-> Salida DBMS).

Answer 5

Hay otra opción:

set serveroutput on format wraped; 

o

Abrir el menú 'Ver' y haga clic en 'salida de DBMS. Debería obtener una ventana de salida dbms en la parte inferior de la hoja de trabajo. Luego necesita agregar la conexión (por alguna razón esto no se hace automáticamente).

Answer 6

salida del servidor realice en primer lugar

1. SET SERVEROUTPUT on continuación

2. Ir a la ventana de salida de DBMS (Ver-> Salida DBMS)

3. entonces Prensa Ctrl +N para conectar el servidor

Answer 7

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; 

He añadido Close of second cursor. Está trabajando y obteniendo salida también ...