Archive table -Procedure

Question

Hello Experts,
I have developed a store procedure to archive of old data for a huge table. Before deleting a row from the table, inserts the same row in another table. I need to schedule the same through dbms_job for daily execution.
CREATE OR REPLACE PROCEDURE Proc1 AS
BEGIN
DECLARE
success_flag varchar2(1);
total1 NUMBER := 0;
CURSOR c1 IS SELECT rowid,col1,col2 from table1 WHERE CREATE_DATE < sysdate -120;
BEGIN
FOR z IN c1
LOOP
INSERT INTO table2 values(z.val1,val2 …);
success_flag :='T';
if success_flag ='T' then
COMMIT;
DELETE FROM table1
WHERE rowid = z.rowid;
COMMIT;
ELSE
ROLLBACK;
END IF;
END LOOP;
EXCEPTION
WHEN OTHERS THEN
success_flag:= 'F';
END;
END;
Please help me to handle the space related issues through this procedure. Please let me know any better approach to achieve the same.
Thanks in Advance,
Bala

Answer 1

Don't know what FileNet is. Why can't you partition it?
Anyway, if you must use insert/delete technique then why not
insert into table2
select <whatever>
from table1
where create_date < sysdate -120;
delete from table1
where create_date < sysdate -120;Also, do NOT commit between those two statements. If your procedure aborts during the delete
it would roll back the delete but not the insert. When you restart the procedure it will insert again.
Get rid of useless success flag as well.
Also, remove the exception section: it adds nothing useful and hides the real error.