如何将子查询中的UDT批量收集到其中的类型

时间:2019-02-05 18:31:17

标签: plsql subquery oracle12c user-defined-types bulk-collect

我正在尝试创建一个值集合,我计划为其运行[表]上的FORALL DELETE。 当我在子查询中使用UDT时,似乎没有任何东西被收集到集合中。

这似乎不起作用。

SELECT ATTR1
BULK COLLECT INTO tmpTBL1
FROM Table1
WHERE ATTR1 NOT IN (SELECT ATTR1 FROM TABLE(tmpPList)); --99% sure problem is here.

还确认对象类型中的列大小与“人”表中的大小相同。 (思想填充可能是个问题。)

对象类型

CREATE OR REPLACE type dbo.P_REC AS OBJECT
(
    ATTR1    VARCHAR2(64 BYTE),
    ATTR2    VARCHAR2(128 BYTE),
    ATTR3    VARCHAR2(128 BYTE),
    ATTR4    VARCHAR2(128 BYTE)
);

集合类型

CREATE OR REPLACE type dbo.P_REC_LIST is table of P_REC;

存储过程

PROCEDURE Get_PRecList(tmpPList IN P_REC_LIST,
               resultCursor out sys_refcursor)
IS

TYPE CNsTable IS TABLE OF PERSON.ATTR1%TYPE INDEX BY PLS_INTEGER;
TYPE TmpTable IS TABLE OF P_REC INDEX BY PLS_INTEGER;

tmpTBL1        CNsTable;
Collection1    TmpTable;

BEGIN

    IF tmpPList.count > 0 THEN

    SELECT ATTR1
    BULK COLLECT INTO tmpTBL1
    FROM Table1
    WHERE ATTR1 NOT IN (SELECT ATTR1 FROM TABLE(tmpPList)); --99% sure problem is here.

    FOR indx IN 1 .. tmpTBL1.COUNT
    LOOP
        Collection1(Collection1.COUNT + 1) := tmpPList(indx);
    END LOOP;

    IF Collection1.COUNT > 0 THEN
        FORALL ind IN 1 .. Collection1.COUNT
            DELETE 
            FROM PERSON
            WHERE ATTR1 = Collection1(ind).ATTR1;
    END IF;

模拟表数据

tmpPList 
 __________________________________________
|__attr1__||__attr2__||__attr3__||__attr4__|
   jdoe       John       Doe        abcd
   fmac      Frank       Mac        efgh
   wgab      Wayne       Gab        ijkl

Table1
 __________________________________________
|__attr1__||__attr2__||__attr3__||__attr4__|
   jdoe       John       Doe        abcd
   fmac       Frank      Mac        efgh
   wgab       Wayne      Gab        ijkl
   mkell      Mike       Kell       mnop

Table2
 __________________________________________
|__attr1__||__attr2__||__attr3__||__attr4__|
   mdoe       Mary       Doe        abcd
   jmac       John       Mac        efgh
   mgab       Mitch      Gab        ijkl
   mkell      Mike       Kell       mnop

tmpTBL1
 _________
|__attr1__|
  mkell

Collection1
 __________________________________________
|__attr1__||__attr2__||__attr3__||__attr4__|
   mkell      Mike       Kell       mnop

Before delete - Person
 __________________________________________
|__attr1__||__attr2__||__attr3__||__attr4__|
   jdoe       John       Doe        abcd
   fmac       Frank      Mac        efgh
   wgab       Wayne      Gab        ijkl
   mkell      Mike       Kell       mnop

After delete - Person
 __________________________________________
|__attr1__||__attr2__||__attr3__||__attr4__|
   jdoe       John       Doe        abcd
   fmac       Frank      Mac        efgh
   wgab       Wayne      Gab        ijkl
当我使用TABLE(tmpPList)时,

tmpTBL1不会填充值。 我希望那里的记录会从人身上删除。 试图找到PERSON中存在但tmpPList中不存在的ATTR1。

更新: 使用:Oracle Database 12c企业版12.1.0.2.0版-64位

1 个答案:

答案 0 :(得分:0)

我的问题不在这里。

SELECT ATTR1
BULK COLLECT INTO tmpTBL1
FROM Table1
WHERE ATTR1 NOT IN (SELECT ATTR1 FROM TABLE(tmpPList));

但是这里。不需要整个for循环,没有它,FORALL语句也可以正常工作。

FOR indx IN 1 .. tmpTBL1.COUNT
LOOP
    Collection1(Collection1.COUNT + 1) := tmpPList(indx); 
END LOOP;