Oracle游标无限循环问题：如何正确退出并遍历所有行

需求与问题 #

需求：

• 当游标emp_details无返回数据时，根据v_is_active和v_is_include的值向T1、T2表插入数据
• 当游标有数据时，遍历所有行并向emp表插入日志数据（设置isnew=0）

当前代码问题：使用%NOTFOUND判断时，无法正确退出循环——添加EXIT会仅处理一行数据，不添加则陷入无限循环。

原代码 #

DECLARE
    CURSOR emp_details IS
    SELECT
        empname,
        lastname
    FROM
        emp
    WHERE
        empname = 'xxx';

    v_is_active    VARCHAR2(50 BYTE);
    v_is_include   VARCHAR2(50 BYTE);
    lv_emp_name    emp.empname%TYPE;
    lv_lastname    emp.lastname%TYPE;
BEGIN
    OPEN emp_details;
    
    LOOP
        FETCH emp_details INTO
            lv_emp_name,
            lv_lastname;
        IF emp_details%notfound THEN
            IF v_is_active = 'A' THEN
                -- 执行向表T1插入数据等操作
            END IF;

            IF v_is_include = 'I' THEN
                -- 执行向表T2插入数据等操作
            END IF;

        ELSE
        
            INSERT INTO emp (
                empname,
                isnew
            ) VALUES (
                lv_emp_name,
                0
            );

        END IF;
    -----exit : 若在此添加EXIT会终止循环，仅执行一次；不添加则陷入无限循环。

    -- IF emp_details%FOUND - 当游标存在记录时
        END LOOP;

    CLOSE emp_details;
END;

解决方案 #

方案1：显式游标+正确循环退出逻辑 #

核心思路：用变量标记游标是否有数据，先遍历所有行，循环结束后再处理无数据的插入操作，避免循环内混淆“遍历结束”和“无数据”的逻辑。

DECLARE
    CURSOR emp_details IS
    SELECT
        empname,
        lastname
    FROM
        emp
    WHERE
        empname = 'xxx';

    v_is_active    VARCHAR2(50 BYTE);
    v_is_include   VARCHAR2(50 BYTE);
    lv_emp_name    emp.empname%TYPE;
    lv_lastname    emp.lastname%TYPE;
    v_has_data     BOOLEAN := FALSE; -- 标记游标是否返回数据
BEGIN
    OPEN emp_details;
    
    -- 首次FETCH初始化
    FETCH emp_details INTO lv_emp_name, lv_lastname;
    
    LOOP
        EXIT WHEN emp_details%NOTFOUND;
        
        v_has_data := TRUE;
        -- 处理有数据的情况：插入emp日志
        INSERT INTO emp (
            empname,
            isnew
        ) VALUES (
            lv_emp_name,
            0
        );
        
        -- 继续FETCH下一行
        FETCH emp_details INTO lv_emp_name, lv_lastname;
    END LOOP;

    CLOSE emp_details;
    
    -- 游标无数据时执行T1、T2插入操作
    IF NOT v_has_data THEN
        IF v_is_active = 'A' THEN
            -- 执行向表T1插入数据等操作
        END IF;

        IF v_is_include = 'I' THEN
            -- 执行向表T2插入数据等操作
        END IF;
    END IF;
END;

方案2：FOR循环（简洁推荐） #

PL/SQL的FOR循环会自动处理游标的OPEN、FETCH、CLOSE及循环退出，无需手动管理，同时用变量记录是否有数据被遍历：

DECLARE
    CURSOR emp_details IS
    SELECT
        empname,
        lastname
    FROM
        emp
    WHERE
        empname = 'xxx';

    v_is_active    VARCHAR2(50 BYTE);
    v_is_include   VARCHAR2(50 BYTE);
    v_has_data     BOOLEAN := FALSE;
BEGIN
    -- 自动遍历游标所有行
    FOR emp_rec IN emp_details LOOP
        v_has_data := TRUE;
        -- 处理有数据的情况
        INSERT INTO emp (
            empname,
            isnew
        ) VALUES (
            emp_rec.empname,
            0
        );
    END LOOP;
    
    -- 无数据时执行插入操作
    IF NOT v_has_data THEN
        IF v_is_active = 'A' THEN
            -- 执行向表T1插入数据等操作
        END IF;

        IF v_is_include = 'I' THEN
            -- 执行向表T2插入数据等操作
        END IF;
    END IF;
END;

逻辑说明 #

• 两种方案都通过v_has_data变量分离“遍历结束”和“无数据”的逻辑，避免原代码中循环内触发%NOTFOUND时错误执行无数据插入操作
• 方案2的FOR循环更简洁，减少手动操作游标出错的概率，是PL/SQL中游标遍历的常规写法

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