遇到SQL異常后如何繼續運行程序？

Question

我已編寫PL / SQL代碼以僅打印大於id = 4的記錄。 我在程序中使用了goto語句，沒有異常檢測到。 遇到異常后，請幫助我繼續執行該程序。 我的代碼是

declare
    cursor cur is select * from student;
    c student%rowtype;
    lt3 exception;
    PRAGMA
    exception_init(lt3,-77);
begin
    open cur;
    loop
        <<backup>>
        fetch cur into c;
        if c.id < 4 then
            raise lt3;
        else
            dbms_output.put_line(c.name);
        end if;
    end loop;
    close cur;
exception
    when lt3 then
    dbms_output.put_line('Exception encountered');
    goto backup;
end;
/

我應該在哪里改變？

我在錯誤

ERROR at line 24:
ORA-06550: line 24, column 7:
PLS-00201: identifier 'BACKUP' must be declared
ORA-06550: line 24, column 2:
PL/SQL: Statement ignored

Answer 1

當您在cursor使用goto時，游標將關閉，因此您無法實現預期的行為。

從文件

如果使用GOTO語句過早退出游標FOR循環，則游標將自動關閉。 如果循環內引發異常，游標也會自動關閉。

您可以做的一件事是在循環中使用continue ， break ， exit來控制執行

open cur;
loop
    fetch cur into c;
    if c.id < 4 then
          continue;
    else
          dbms_output.put_line(c.name);
    end if;
end loop;
close cur;

Answer 2

如果可以，應該避免在任何代碼中使用goto語句。

下面的代碼應該可以實現您想做的事情。 我沒有數據庫訪問權限，所以可能語法不正確。

declare
    cursor cur is select * from student;
    c student%rowtype;
    lt3 exception;
    PRAGMA
    exception_init(lt3,-77);
begin
    open cur;
    loop
    begin
            fetch cur into c;
            if c.id < 4 then
        raise lt3;
            else
                dbms_output.put_line(c.name);
            end if;
    exception
        when lt3 then
        dbms_output.put_line('Exception encountered');
    end;
    end loop;
    close cur;
exception
    when others then
    dbms_output.put_line('other error encountered');
end;

Answer 3

您確實應該選擇id> 4以避免異常。

后藤將無法以這種方式工作。 您需要使用continue或break來執行控制。