oracle - 将 SYS_REFCURSOR 与 CTE 结合使用(包括 Update 语句)

Question

我使用 CTE 获取一些值，然后使用 UPDATE 语句从数据库表中清除返回的值。

这发生在存储过程内。

UPDATE TABLE1
   SET AA = NULL, BB = NULL
 WHERE EXISTS
          (WITH T1 AS (SELECT AA, BB, CC FROM TABLEABC)
               ,T2
                AS (SELECT AA, BB, CB
                      FROM T1
                     WHERE T1.AA > 100)
           SELECT *
             FROM T2
            WHERE TABLE1.CC = T2.CC

我的 BB 列有一些标识数据，我想在 Update 语句清除这些数据之前捕获这些数据。谁能指导我如何捕获此列数据并作为过程输出返回。

OPEN SYS_REFCURSOR FOR

Answer 1

不幸的是，UPDATE 语句的 RETURNING INTO 子句将为您提供更新后的值，而不是之前的值。 p>

因此，如果您想保存旧值，则必须在 UPDATE 语句之前执行此操作。请注意锁定行，并且仅实际更新已保存的行，因为在保存数据和更新数据之间，您的表可能会被修改。

然后，返回引用游标中保存的数据。

这是将所有这些组合在一起的代码:

CREATE TABLE TABLE1 ( AA number, BB number );

CREATE OR REPLACE PACKAGE so_test AS

  TYPE TABLE1_LIST_TAB IS TABLE OF TABLE1%ROWTYPE;

  FUNCTION do_it return sys_refcursor;

END so_test;


CREATE OR REPLACE PACKAGE BODY so_test AS

  FUNCTION do_it RETURN SYS_REFCURSOR IS
    l_old_data TABLE1_LIST_TAB;
    l_rc SYS_REFCURSOR;
  BEGIN

    SELECT AA, BB 
    BULK COLLECT INTO l_old_data
    FROM table1
    WHERE -- put your conditions here of what you intend to update
    FOR UPDATE;

    UPDATE TABLE1
      SET AA = NULL, BB = NULL
    WHERE EXISTS ( SELECT 'record old data is captured'
                 FROM   TABLE(l_old_data) od
                 WHERE  od.aa = table1.aa   -- Assuming AA is a primary key
               ) 
    RETURNING AA, BB BULK COLLECT INTO l_old_data;

    OPEN l_rc FOR SELECT * FROM TABLE(l_old_data);

    RETURN l_rc;

  END do_it;
END so_test;

注意:如果您不是使用 12c，则需要将 TABLE1_LIST_TAB 定义为数据库中的 OBJECT 类型，而不是在包规范中，否则包主体无法编译。