CREATE OR REPLACE FUNCTION apply_cola (salary_in IN NUMBER)

RETURN NUMBER

IS

RETURN salary_in * 2;

END;

DECLARE

TYPE two_columns_rt IS RECORD (

employee_id employees.employee_id%TYPE

, salary employees.salary%TYPE

);

TYPE id_name_list_tt IS TABLE OF two_columns_rt INDEX BY PLS_INTEGER;

l_list id_name_list_tt;

SELECT employee_id, salary

BULK COLLECT INTO l_list FROM employees;

FOR idx IN 1 .. l_list.COUNT LOOP

l_list (idx).salary := apply_cola (l_list (idx).salary);

END LOOP;

FORALL idx IN 1 .. l_list.COUNT

UPDATE employees SET salary = l_list (idx).salary

WHERE employee_id = l_list (idx).employee_id;

END;

ROLLBACK;