Oracle PL/SQL中判断游标值是否存在于另一游标全量行的问题

你的代码逻辑错误在于同步逐行读取两个游标，这只会对比cursor1和cursor2的第1行、第2行……直到其中一个游标读完就停止，完全没实现“检查cursor1的行是否存在于cursor2所有行中”的需求。另外SQL%ROWCOUNT在这里不适用，它不会记录游标fetch的行数。

方式1：嵌套游标循环（逐行检查） #

对cursor1的每一行，完整遍历cursor2的所有行查找匹配：

DECLARE
  CURSOR cursor1 IS
    SELECT col1, col2 FROM table1;
  CURSOR cursor2 IS
    SELECT col1, col3 FROM table2;
  c1_rec cursor1%ROWTYPE;
  c2_rec cursor2%ROWTYPE;
  v_match_found BOOLEAN;
BEGIN
  OPEN cursor1;
  LOOP
    FETCH cursor1 INTO c1_rec;
    EXIT WHEN cursor1%NOTFOUND;
    
    v_match_found := FALSE;
    -- 每次检查cursor1的新行时，重新打开cursor2遍历所有行
    OPEN cursor2;
    LOOP
      FETCH cursor2 INTO c2_rec;
      EXIT WHEN cursor2%NOTFOUND;
      
      IF c1_rec.col1 = c2_rec.col1 OR c1_rec.col2 = c2_rec.col3 THEN
        v_match_found := TRUE;
        -- 找到匹配后可以提前退出cursor2的循环，提升效率
        EXIT;
      END IF;
    END LOOP;
    CLOSE cursor2;
    
    IF v_match_found THEN
      DBMS_OUTPUT.PUT_LINE('cursor1行(col1=' || c1_rec.col1 || ', col2=' || c1_rec.col2 || ')在cursor2中找到匹配');
    ELSE
      DBMS_OUTPUT.PUT_LINE('cursor1行(col1=' || c1_rec.col1 || ', col2=' || c1_rec.col2 || ')在cursor2中无匹配');
    END IF;
  END LOOP;
  CLOSE cursor1;
END;
/

方式2：用SQL EXISTS子查询（更高效） #

不需要手动处理游标，直接用SQL的EXISTS子查询判断，性能比嵌套游标更好：

DECLARE
  CURSOR cursor1 IS
    SELECT col1, col2 FROM table1;
  c1_rec cursor1%ROWTYPE;
BEGIN
  FOR c1_rec IN cursor1 LOOP
    IF EXISTS (
      SELECT 1 FROM table2
      WHERE col1 = c1_rec.col1 OR col3 = c1_rec.col2
    ) THEN
      DBMS_OUTPUT.PUT_LINE('cursor1行(col1=' || c1_rec.col1 || ', col2=' || c1_rec.col2 || ')在cursor2中找到匹配');
    ELSE
      DBMS_OUTPUT.PUT_LINE('cursor1行(col1=' || c1_rec.col1 || ', col2=' || c1_rec.col2 || ')在cursor2中无匹配');
    END IF;
  END LOOP;
END;
/

• 嵌套游标方式需要注意每次检查cursor1的新行时，要重新打开cursor2并从头遍历
• EXISTS子查询利用数据库的查询优化器，通常比手动游标循环更高效，尤其是数据量大时
• 如果你需要的是“cursor1的行是否存在于cursor2的所有行中”（即cursor2的每一行都和当前cursor1行匹配），只需把OR改成AND，并调整逻辑判断所有行都满足条件即可

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