归档数据库选择 在数据库日渐庞大时进行归档的解决思路[2]

在数据库日渐庞大时进行归档的解决思路[2]  

　　 procedure:

　　CREATE OR REPLACE PROCEDURE archive_emp　　(maxarchiverow number) IS 　　v_crowid archive_rows crowid%type; 　　intLoop number; 　　v_primarykey archive_rows PRIMARYKEY%type;　　CURSOR C_ARCH_EMP IS　　SELECT * FROM ARCHIVE_ROWS; 　　BEGIN　　DELETE FROM ARCHIVE_ROWS; 　　MIT;　　INSERT INTO ARCHIVE_ROWS　　SELECT ROWID FROM EMP_B WHERE ROWNUM < MAXARCHIVEROW;　　MIT; 　　INTLOOP:= ;　　OPEN C_ARCH_EMP;　　LOOP FETCH C_ARCH_EMP INTO V_CROWID V_PRIMARYKEY;　　INTLOOP:=INTLOOP+ ;　　EXIT WHEN C_ARCH_EMP%NOTFOUND;　　INSERT INTO EMP_ARCHIVE SELECT * FROM EMP_B WHERE ROWID=V_CROWID;　　　　MIT;　　DELETE FROM EMP_B WHERE ROWID=V_CROWID; 　　MIT;　　IF MOD(INTLOOP )= 　　THEN　　INSERT INTO ARCHIVE_LOG VALUES( EMP_B INTLOOP SYSDATE);　　MIT;　　END IF;　　END LOOP;　　END ARCHIVE_EMP;　　/