Oracle传递SYS_REFCURSOR到存储过程报ORA-01001无效游标问题咨询

问题解答 #

首先你的猜测不正确：SYS_REFCURSOR 是Oracle的引用游标类型，本质是指向数据库游标上下文的指针，即便以IN模式传递参数，传递的也只是指针的副本，指向的仍是同一个游标上下文，不存在游标副本的说法。你完全可以在MY_READ存储过程中读取、关闭传入的游标，这个操作本身是符合Oracle语法规范的。

报错原因排查 #

你遇到的非必现ORA-01001: invalid cursor报错，本质是操作了未打开、或者已经被关闭的游标，常见触发场景如下：

• 调用完MY_READ之后，你在REP_HELPER1中又对myCUR1做了操作（比如重复执行CLOSE、再次FETCH等），而游标已经在MY_READ中被关闭，就会触发该报错。这也能解释为什么你直接在REP_HELPER1中完成FETCH和关闭操作就不会报错：不存在重复操作游标的可能。
• 特殊场景下游标打开失败（比如查询涉及的表被锁、权限临时失效等），你没有校验游标状态就直接执行FETCH操作。
• 如果你的代码在循环中多次调用REP_HELPER1，要确认myCUR1变量有没有被复用，避免出现未打开游标就传入MY_READ的情况。

修复建议 #

你可以按以下步骤调整代码验证：

1. 检查REP_HELPER1中调用MY_READ后的代码，删除所有对myCUR1的后续操作，避免重复关闭/读取已经关闭的游标。
2. 在MY_READ中操作游标前先校验状态，示例调整如下：

PROCEDURE MY_READ(myIdx IN BINARY_INTEGER, cur IN OUT SYS_REFCURSOR, rep_table IN OUT rep_table_T) IS
BEGIN
    -- 先校验游标是否打开
    IF NOT cur%ISOPEN THEN
        dbms_output.put_line('游标未打开，索引：' || myIdx);
        RETURN;
    END IF;
         
    FETCH cur INTO rep_table(myIdx).day1,  rep_table(myIdx).day2,  rep_table(myIdx).day3,  rep_table(myIdx).day4,  rep_table(myIdx).day5,
                    rep_table(myIdx).day6,  rep_table(myIdx).day7,  rep_table(myIdx).day8,  rep_table(myIdx).day9,  rep_table(myIdx).day10,
                    rep_table(myIdx).day11, rep_table(myIdx).day12, rep_table(myIdx).day13, rep_table(myIdx).day14, rep_table(myIdx).day15,
                    rep_table(myIdx).day16, rep_table(myIdx).day17, rep_table(myIdx).day18, rep_table(myIdx).day19, rep_table(myIdx).day20,
                    rep_table(myIdx).day21, rep_table(myIdx).day22, rep_table(myIdx).day23, rep_table(myIdx).day24, rep_table(myIdx).day25,
                    rep_table(myIdx).day26, rep_table(myIdx).day27, rep_table(myIdx).day28, rep_table(myIdx).day29, rep_table(myIdx).day30,
                    rep_table(myIdx).day31;
       
    IF cur%NOTFOUND THEN
        dbms_output.put_line('无匹配数据，索引：' || myIdx);
    END IF;
    CLOSE cur;  
END MY_READ;

3. 如果你需要读取查询返回的所有行，当前代码只FETCH一次不符合要求，需要补充循环读取逻辑直到cur%NOTFOUND为真再关闭游标。

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