[PL SQL] Mešanje podatkov

Imam tabelo z atributi Person_ID, First_Name, Maiden_Name, Last_Name (150.000 zapisov)
Rad bi zmesal podatke: First_Name, Maiden_Name, Last_Name tako da najprej zmesamo First_Name, nato Maiden_Name in na koncu Last_Name
Se pravi nekako takole:

Zacetna tabela:
ID First_Name Maiden_name Last_Name
1. Miran Grozni Mlakar
2. Peter Kosmati Pogačar
3. Jacman Uhati Raka

Dobimo tabelo:
ID First_Name Maiden_name Last_Name
1. Jacman Grozni Pogacar
2. Miran Uhati Raka
3. Peter Kosmati Mlakar


Delam pa na tak način:

1. Najprej z enim kurzorjem naredim selekcijo katere zapise bom mešal:

CURSOR zenske is
SELECT p.Person_Id
FROM person p, party pa
WHERE p.Person_ID = pa.Party_ID
AND pa.Party_Type_ID = 1
ORDER by p.Person_Id desc;

2. Nato odprem se en kurzor v katerem so atributi, ki jih bom mesal - v temle primeru First_Name:

OPEN z_ime FOR
SELECT p.First_Name
FROM person p, party pa
WHERE p.Person_ID = pa.Party_ID
AND pa.Party_Type_ID = 1
ORDER BY p.First_Name ASC;

sCounter := 0;

3. Sprehajam se cez prvi kurzor in iz drugega kurzorja jemljem First_Name ter ga update-am v tabelo, pri tem naredi COMMIT na vsakih 1000 zapisov:

FOR r IN zenske LOOP
FETCH z_ime
INTO sFirst_Name;

sCounter := sCounter + 1;

UPDATE person p
SET p.First_Name = sFirst_Name
WHERE p.Person_ID = r.Person_ID;

IF ( mod(sCounter, 1000)= 0 ) THEN
COMMIT;
--Dbms_Output.put_line (sCounter || ', ');
END IF;

END LOOP;

4. Na enak način naredim še za Maiden_Name in Last_Name


Ampak to dela zelo zelo počasi. Mi lahko kdo napiše proceduro, ki bi to hitreje opravila?