PLSQL中将游标作为入参重构通用存储过程的实现咨询

该需求完全可以在PL/SQL中实现，你补充的基于SYS_REFCURSOR的封装思路本身就是正确的落地方案。

核心逻辑说明 #

你用到的SYS_REFCURSOR是Oracle原生提供的弱类型游标变量，天然支持作为参数按引用传递，刚好适配你「不同业务存储过程使用不同查询游标、统一处理游标抓取/关闭逻辑」的需求。你当前的写法已经可以正常运行，只需补充几个小的优化点即可投入生产使用。

优化建议 #

• 增加游标状态校验，避免传入未打开的游标触发运行时错误，示例如下：

PROCEDURE MY_READ(myIdx IN BINARY_INTEGER, cur IN SYS_REFCURSOR, rep_table IN OUT rep_table_T) IS
BEGIN
  -- 校验游标是否已打开
  IF NOT cur%ISOPEN THEN
    RAISE_APPLICATION_ERROR(-20001, '传入游标未打开，请检查调用逻辑');
  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
    -- 可在此处给对应下标赋默认值，或抛出业务提示
    NULL;
  END IF;
  CLOSE cur;
END MY_READ;

• 如果所有REP_HELPER类存储过程的游标返回结构完全一致（都是31个和day1~day31类型一一对应的字段），可以定义强类型REF CURSOR，在编译阶段就能校验游标结构合法性，避免运行时才发现字段不匹配的问题：

-- 先在包声明部分定义强类型游标
TYPE rep_cursor_t IS REF CURSOR RETURN rep_table%ROWTYPE;
-- MY_READ的参数替换为强类型即可
PROCEDURE MY_READ(myIdx IN BINARY_INTEGER, cur IN rep_cursor_t, rep_table IN OUT rep_table_T) IS

• 注意PL/SQL中游标参数默认就是按引用传递的，你预期定义里写的by reference是多余语法，Oracle不支持该写法，按你当前的参数定义即可正常运行。

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