PL/SQL 使用游标重写表中的值

Question

我试图在光标的帮助下重写我的表中的值，但没有成功。 例如，在表 testik 中，我需要将酒精列中的值“N”重写为“NO”。 有人可以给我一些建议吗？

DECLARE
CURSOR kurzor IS SELECT * FROM testik ORDER BY datum DESC;
ttest kurzor%ROWTYPE;

BEGIN
FOR ttest IN kurzor LOOP
    IF (ttest.alcohol = 'N') THEN
            INSERT INTO testik(alcohol) VALUES ('NO');
    END IF;
    END LOOP;
END;
/

当我运行脚本时，它将返回该过程成功完成但表 testik 没有变化。

Answer 1

非常混乱，我只能提供一个有根据的猜测。 您的解释听起来好像您想要更新，但您的代码确实插入了。

也许您想要做的实际上只是：

UPDATE testik SET alcohol = 'NO' WHERE alcohol = 'N';
COMMIT;

PS：不需要 PL/SQL 进行简单的更新。

Answer 2

当您学习光标和其他东西时，您可以考虑以下一种选择。

样品表：

SQL> select * from testik;

        ID ALC
---------- ---
         1 Y
         2 N         --> should be updated to NO
         3 YES
         4 NO
         5 N         --> should be updated to NO

光标只获取您感兴趣的行； 如果您不想对alcohol列值与N不同的行执行任何操作，则循环遍历整个表是没有意义的。

请注意，它被声明for update ，以便您可以将update与where current of子句一起使用； 它将更新您刚刚获取的行。

我还显示了更新的行数（您没有要求这样做，但这样做没有害处）。

SQL> set serveroutput on;
SQL> declare
  2    cursor c1 is select id, alcohol
  3                 from testik
  4                 where alcohol = 'N'
  5                 order by id
  6                 for update;
  7    c1r   c1%rowtype;
  8    l_cnt number := 0;
  9  begin
 10    open c1;
 11    loop
 12      fetch c1 into c1r;
 13      exit when c1%notfound;
 14
 15      update testik set
 16        alcohol = 'NO'
 17        where current of c1;
 18      l_cnt := l_cnt + 1;
 19    end loop;
 20    close c1;
 21    dbms_output.put_line('Updated ' || l_cnt || ' row(s)');
 22  end;
 23  /
Updated 2 row(s)

PL/SQL procedure successfully completed.

结果：

SQL> select * from testik;

        ID ALC
---------- ---
         1 Y
         2 NO
         3 YES
         4 NO
         5 NO

SQL>