Oracle 一段批量提交的代码

CREATE OR REPLACE PROCEDURE test(p_array_size IN PLS_INTEGER DEFAULT 10000)
IS

TYPE ARRAY IS TABLE OF a%ROWTYPE;
l_data ARRAY;

CURSOR c IS
SELECT *
FROM a;

BEGIN
    OPEN c;
    LOOP
    FETCH c BULK COLLECT INTO l_data LIMIT p_array_size;

    FORALL i IN 1..l_data.COUNT   
      INSERT INTO t VALUES l_data(i);
    COMMIT;
    
    EXIT WHEN c%NOTFOUND;
    END LOOP;
    CLOSE c;
END test;
/

来自 “ ITPUB博客 ” ，链接：http://blog.itpub.net/15142212/viewspace-675441/，如需转载，请注明出处，否则将追究法律责任。

转载于:http://blog.itpub.net/15142212/viewspace-675441/