PROSAGA码农传奇-plsql-在SQL Developer中打印变量的值

在SQL Developer中打印变量的值

作者: 狗头军师
发布时间: 2024-04-07 08:44:47 (2月前)

<p>我想打印一个匿名块内的特定变量的值。我正在使用Oracle SQL Developer。我尝试使用dbms_output.put_line。但这是行不通的。我正在使用的代码如下所示。</p>
<pre><code>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;
</code></pre><p>我只得到输出anonymous block completed。</p>