Příklad hromadného shromažďování Oracle pomocí objektu typu typ řádku kurzoru

V tomto příspěvku uvádím příklad provedení vložení pomocí příkazu Oracle Bulk Collect a FORALL. Vytvořena funkce PL SQL, která bude brát data z EMP tabulky pomocí kurzoru, poté vytvoří proměnnou typu pole daného typu kurzorového řádku a poté hromadně shromáždí a vloží do BONUS tabulky pomocí FORALL.

Níže je příklad:

CREATE OR REPLACE FUNCTION f_currowtype
RETURN BOOLEAN
IS
CURSOR c_emp
IS
SELECT empno,
ename,
job,
sal
FROM emp;

TYPE t_emp IS TABLE OF c_emp%ROWTYPE;

e_rec   t_emp;
BEGIN
OPEN c_emp;

FETCH c_emp
BULK COLLECT INTO e_rec;

CLOSE c_emp;

FORALL i IN e_rec.FIRST .. e_rec.LAST
insert into bonus (empno, amount)
values (e_rec(i).empno, e_rec(i).sal * 10 / 100);

DBMS_OUTPUT.put_line ('Rows inserted: ' || SQL%ROWCOUNT);

COMMIT;
RETURN TRUE;
EXCEPTION
WHEN OTHERS
THEN
ROLLBACK;
RETURN FALSE;
END;

Můžete jej spustit následovně:

SET SERVEROUTPUT ON;

BEGIN
IF f_currowtype
THEN
DBMS_OUTPUT.put_line ('Success');
ELSE
DBMS_OUTPUT.put_line ('Failed');
END IF;
END;