立即执行不与 select into 一起使用

Question

我有下面的代码，可以正常工作。

SET SERVEROUTPUT ON;

DECLARE
    cols CLOB;
BEGIN
    SELECT
        LISTAGG('"'
                || column_name
                || '"', ',') WITHIN GROUP(
            ORDER BY
                column_name
        )
    INTO cols
    FROM
        all_tab_columns
    WHERE
        lower(table_name) = 'd_dialler_brut'
        AND column_name LIKE 'REASON%';

    dbms_output.put_line(cols);
END;

但是，如果我尝试以下代码，则会引发以下错误

错误报告 - ORA-00905: 缺少关键字 ORA-06512: 在第 20 行 00905. 00000 - “缺少关键字”

SET SERVEROUTPUT ON;

DECLARE
    cols        CLOB;
    vstr_cols   CLOB;
BEGIN
    vstr_cols := q'[
    SELECT
        LISTAGG('"'
                || column_name
                || '"', ',') WITHIN GROUP(
            ORDER BY
                column_name
        )
    INTO cols
    FROM
        all_tab_columns
    WHERE
        lower(table_name) = 'd_dialler_brut'
        AND column_name LIKE 'REASON%']'
    ;
    EXECUTE IMMEDIATE ( vstr_cols );
    dbms_output.put_line(cols);
END;

第二个代码有什么问题？如何避免错误？

Answer 1

从您正在构建的SELECT 语句中删除INTO 子句并将其添加到EXECUTE IMMEDIATE 语句中

vstr_cols := q'[
SELECT
    LISTAGG('"'
            || column_name
            || '"', ',') WITHIN GROUP(
        ORDER BY
            column_name
    )
FROM
    all_tab_columns
WHERE
    lower(table_name) = 'd_dialler_brut'
    AND column_name LIKE 'REASON%']'
;

EXECUTE IMMEDIATE vstr_cols
             INTO cols;

当然，我首先会质疑在这里使用动态 SQL 是否合适。如果您可以使用静态 SQL 做某事，那么您真的应该使用静态 SQL。

我还强烈建议您在执行 SQL 语句之前记录或使用dbms_output 将其写出。否则，你会让自己更难调试。