使用参数化游标合并表数据遇错误，求正确实现方案

原代码存在的核心问题 #

• 参数化游标定义了参数但未传入值，且未实际利用参数实现过滤逻辑，不符合参数化游标的设计意图
• 混用MySQL语法（如@count会话变量、SET赋值语句），Oracle PL/SQL需使用本地变量而非会话变量
• WHERE EXISTS (oldroll)语法错误，EXISTS子句必须包含完整的子查询逻辑，不能直接放变量
• 游标循环中EXIT WHEN语句位置错误，会导致最后一次FETCH无数据后仍执行后续逻辑，引发异常
• 声明了未使用的冗余变量（newroll、newname）

修正后的参数化游标实现代码 #

DECLARE
    -- 定义记录类型，统一存储游标返回的行数据
    TYPE rollcall_record IS RECORD (
        roll_no   NUMBER,
        name      VARCHAR2(25)
    );
    v_current_rollcall rollcall_record;
    
    -- 参数化游标：支持传入学号范围作为过滤条件，灵活控制要处理的数据
    CURSOR c_o_rollcall(p_start_roll NUMBER DEFAULT 1, p_end_roll NUMBER DEFAULT 9999) IS
        SELECT roll_no, name
        FROM o_rollcall
        WHERE roll_no BETWEEN p_start_roll AND p_end_roll;
        
    v_entry_exists NUMBER; -- 标记当前条目是否已存在于N_RollCall
BEGIN
    -- 打开参数化游标，传入自定义的学号范围参数（示例为1到100，可按需调整）
    OPEN c_o_rollcall(p_start_roll => 1, p_end_roll => 100);
    LOOP
        FETCH c_o_rollcall INTO v_current_rollcall;
        EXIT WHEN c_o_rollcall%NOTFOUND; -- 先判断是否取到有效数据，再执行后续逻辑
        
        -- 查询N_RollCall中是否存在当前学号的条目
        SELECT COUNT(*)
        INTO v_entry_exists
        FROM n_rollcall
        WHERE roll_no = v_current_rollcall.roll_no;
        
        IF v_entry_exists > 0 THEN
            DBMS_OUTPUT.PUT_LINE('学号 ' || v_current_rollcall.roll_no || ' 已存在，跳过插入');
        ELSE
            INSERT INTO n_rollcall(roll_no, name)
            VALUES(v_current_rollcall.roll_no, v_current_rollcall.name);
            DBMS_OUTPUT.PUT_LINE('成功插入学号 ' || v_current_rollcall.roll_no || ' 的数据');
        END IF;
    END LOOP;
    CLOSE c_o_rollcall;
    
    COMMIT; -- 提交事务，若不需要自动提交可注释此句
EXCEPTION
    WHEN OTHERS THEN
        DBMS_OUTPUT.PUT_LINE('执行异常：' || SQLERRM);
        ROLLBACK; -- 异常时回滚所有操作
END;
/

代码关键说明 #

1. 参数化游标应用：通过p_start_roll和p_end_roll参数实现数据过滤，满足参数化游标的要求，可灵活指定要同步的学号范围
2. 记录类型优化：用自定义ROLLCALL_RECORD类型存储游标行数据，相比单独声明多个变量更简洁易维护
3. 语法规范：全程使用Oracle PL/SQL本地变量，避免混用其他数据库语法
4. 循环逻辑修正：将EXIT WHEN放在FETCH之后，确保只有取到有效数据时才执行后续逻辑，避免无效循环
5. 异常处理：添加通用异常捕获，出错时输出错误信息并回滚事务，保证数据一致性

补充：高效替代方案（非游标实现） #

如果业务允许不强制使用游标，Oracle的MERGE语句可以更高效地实现数据合并逻辑：

MERGE INTO n_rollcall target
USING o_rollcall source
ON (target.roll_no = source.roll_no)
WHEN NOT MATCHED THEN
    INSERT (roll_no, name) VALUES (source.roll_no, source.name);
COMMIT;

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