Question

我有一个如下代码：

DECLARE
rec emp%ROWTYPE
BEGIN
<<start_again>>
FOR rec IN c1 LOOP
    SELECT emp_index
    INTO   flag
    FROM   m_sme006
    WHERE  emp_id = rec.emp_id
           AND eff_dt = rec.eff_dt
           AND end_dt = rec.end_dt
           AND last_maint_ts > rec.last_maint_ts;
END LOOP;
EXCEPTION
    WHEN no_data_found THEN
      GOTO start_again;
END;

每次发生no_data_found异常时，我都希望执行返回并继续下一次迭代。但它会抛出error PLS-00375: illegal GOTO statement

我也可以在异常块中包含此行dbms_output.Put_line('Outside exception block'rec.sme006_index);以查看发生这种情况的位置吗？

先谢谢

Answer 1

您无法将程序流从异常块返回到执行块。您需要将异常块放在循环中，如下所示：

DECLARE
   rec emp%ROWTYPE
BEGIN
FOR rec IN c1 LOOP
    BEGIN
       SELECT emp_index
       INTO   flag
       FROM   m_sme006
       WHERE  emp_id = rec.emp_id
              AND eff_dt = rec.eff_dt
              AND end_dt = rec.end_dt
              AND last_maint_ts > rec.last_maint_ts;
    EXCEPTION
       WHEN no_data_found THEN
          dbms_output.Put_line('Outside exception block ' || rec.sme006_index);
    END;
END LOOP;
END;

Answer 2

我相信你正在寻找这样的东西：

DECLARE
  rec emp%ROWTYPE
BEGIN
  FOR rec IN c1 LOOP
    BEGIN
        SELECT emp_index
        INTO   flag
        FROM   m_sme006
        WHERE  emp_id = rec.emp_id
           AND eff_dt = rec.eff_dt
           AND end_dt = rec.end_dt
           AND last_maint_ts > rec.last_maint_ts;
    EXCEPTION
        WHEN no_data_found THEN
          -- whatever code you want to log your error
    END;
  END LOOP;
END;

当no_data_found停止当前迭代并继续下一个迭代时

2 个答案: