Oracle动态SQL存储过程查询最新月度审计表无运行输出求助

问题排查 #

你的代码存在4个核心问题导致运行无输出无效果：

• 核心逻辑差异：Oracle 中 EXECUTE IMMEDIATE 直接执行 SELECT 语句时，必须搭配 INTO 子句将查询结果存入变量/集合，或者显式输出，你当前的写法只是执行了查询但没有接收和处理结果，自然看不到任何输出。这和SQL Server中直接执行SELECT就会返回结果集的逻辑完全不同。
• 表名拼接错误：用extract提取月、日返回的是数字，个位数的月/日不会补前导零，比如1月会返回'1'而非'01'，最终拼接出来的表名会缺失一位，大概率找不到对应的表，你没收到报错大概率是没有开启错误捕获或者输出。
• 时间计算隐患：直接用interval '-1' month计算上月日期会有边界问题，比如3月31日减1个月会因为2月没有31日直接报错，推荐用Oracle原生的ADD_MONTHS函数，会自动处理月末日期的适配。
• 无输出配置：如果你需要查看查询结果，要么通过输出参数返回游标，要么通过DBMS_OUTPUT打印查询内容，同时调用存储过程前需要开启服务端输出。

修复方案 #

方案1：用DBMS_OUTPUT打印查询结果（适合小数据量调试场景） #

CREATE OR REPLACE PROCEDURE GetLatestMonthAuditTable
AS
    v_lastmonth DATE := ADD_MONTHS(SYSDATE, -1);
    v_table_name VARCHAR2(30) := 'AUDIT_' || TO_CHAR(v_lastmonth, 'YYYYMM') || TO_CHAR(LAST_DAY(v_lastmonth), 'DD');
    v_sql VARCHAR2(1024);
    -- 定义和查询字段匹配的集合，字段长度请和你实际表结构保持一致
    TYPE audit_rec IS RECORD (
        act_code VARCHAR2(100),
        change_by VARCHAR2(100),
        change_date DATE
    );
    TYPE audit_tab IS TABLE OF audit_rec;
    v_audit_data audit_tab;
BEGIN
    v_sql := 'SELECT ACT_CODE, CHANGE_BY, CHANGE_DATE FROM ' || v_table_name;
    EXECUTE IMMEDIATE v_sql BULK COLLECT INTO v_audit_data;
    
    -- 打印结果，调用前请先执行 SET SERVEROUTPUT ON 开启输出
    FOR i IN 1..v_audit_data.COUNT LOOP
        DBMS_OUTPUT.PUT_LINE('ACT_CODE:'||v_audit_data(i).act_code||' CHANGE_BY:'||v_audit_data(i).change_by||' CHANGE_DATE:'||TO_CHAR(v_audit_data(i).change_date,'YYYY-MM-DD HH24:MI:SS'));
    END LOOP;
EXCEPTION
    WHEN OTHERS THEN
        DBMS_OUTPUT.PUT_LINE('执行错误：'||SQLERRM||' 执行的SQL：'||v_sql);
END;
/

调用方式：

SET SERVEROUTPUT ON;
EXEC GetLatestMonthAuditTable;

方案2：返回游标结果集（适合应用调用、大数据量场景） #

CREATE OR REPLACE PROCEDURE GetLatestMonthAuditTable(
    p_audit_cursor OUT SYS_REFCURSOR
)
AS
    v_lastmonth DATE := ADD_MONTHS(SYSDATE, -1);
    v_table_name VARCHAR2(30) := 'AUDIT_' || TO_CHAR(v_lastmonth, 'YYYYMM') || TO_CHAR(LAST_DAY(v_lastmonth), 'DD');
    v_sql VARCHAR2(1024);
BEGIN
    v_sql := 'SELECT ACT_CODE, CHANGE_BY, CHANGE_DATE FROM ' || v_table_name;
    OPEN p_audit_cursor FOR v_sql;
EXCEPTION
    WHEN OTHERS THEN
        DBMS_OUTPUT.PUT_LINE('执行错误：'||SQLERRM||' 执行的SQL：'||v_sql);
END;
/

调用方式：

VAR cur REFCURSOR;
EXEC GetLatestMonthAuditTable(:cur);
PRINT cur;

内容的提问来源于stack exchange，提问作者Oscar Cymru