Redefinição online de tabelas com DBMS_REDEFINITION

	sqlplus data/data  
	  
	-- Criar tabela alvo  
	  
	CREATE TABLE TESTE(   
	   id NUMBER PRIMARY KEY,  
	   name VARCHAR2(10),  
	   obs CLOB,  
	   data DATE)  
	ORGANIZATION INDEX;  
	  
	-- Tablespace diferente para alocar nova tabela  
	CREATE TABLESPACE ts_teste    
	  DATAFILE '/u01/oradata/ORCL/ts_teste01.dbf' SIZE 500M   EXTENT MANAGEMENT LOCAL AUTOALLOCATE   
	  SEGMENT SPACE MANAGEMENT AUTO;  
	    
	-- Objeto indice relacionado a tabela teste  
	CREATE INDEX idx_teste ON teste(name);  
	  
	-- Sequence   
	CREATE SEQUENCE seq_teste;  
	  
	-- Trigger relacionada   
	CREATE OR REPLACE TRIGGER trg_teset  
	BEFORE INSERT ON TESTE  
	FOR EACH ROW  
	WHEN (new.id IS NULL)  
	BEGIN  
	  SELECT seq_teste.NEXTVAL  
	  INTO   :new.id  
	  FROM   dual;  
	END;  
	/  
	    
	-- Listar objetos dependentes  
	  
	SQL> COLUMN object_name FORMAT A25  
	SQL> SELECT object_name, object_type, status FROM dba_objects WHERE owner = 'DATA';  
	  
	OBJECT_NAME               OBJECT_TYPE             STATUS  
	------------------------- ----------------------- -------  
	TESTE                     TABLE                   VALID  
	SYS_IOT_TOP_74166         INDEX                   VALID  
	SYS_IL0000074166C00003$$  INDEX                   VALID  
	SYS_LOB0000074166C00003$$ LOB                     VALID  
	IDX_TESTE                 INDEX                   VALID  
	SEQ_TESTE                 SEQUENCE                VALID  
	TRG_TESET                 TRIGGER                 VALID  
	  
	  
	-- Simulando a fragmentação na tabela    
	DECLARE  
	  V_CLOB CLOB;  
	BEGIN  
	   FOR I IN 0..999 LOOP  
	      V_CLOB := NULL;  
	      FOR J IN 1..1000 LOOP  
	         V_CLOB := V_CLOB||TO_CHAR(I,'0000');  
	      END LOOP;  
	      INSERT INTO data.teste VALUES(I,TO_CHAR(I),V_CLOB,TRUNC(SYSDATE));  
	      COMMIT;  
	   END LOOP;  
	   COMMIT;  
	END;  
	/  
	  
	-- delete para fragmentação  
	  
	DELETE FROM TESTE WHERE (ID/3) <> TRUNC(ID/3);  
	  
	-- Para confirmar a fragmentação você pode utilizar DBMS_SPACE.SPACE_USAGE.  
	  
	COLUMN object_name FORMAT A40  
	SELECT object_name, object_type, status FROM user_objects;  
	  
	-- Passos para redefinição.  
	-- Verifica se a tabela poderá ser redefinida  
	  
	EXEC DBMS_REDEFINITION.can_redef_table('DATA', 'TESTE');  
	  
	-- Tabela temporária para o processo  
	  
	CREATE TABLE TEMP(   
	    id NUMBER,  
	    data TIMESTAMP,  
	    obs CLOB,  
	    obs2 VARCHAR2(3))  
	    LOB(obs) STORE AS SECUREFILE (NOCACHE FILESYSTEM_LIKE_LOGGING)  
	    PARTITION BY RANGE (id) (  
	       PARTITION par1 VALUES LESS THAN (333),  
	       PARTITION par2 VALUES LESS THAN (666),  
	       PARTITION par3 VALUES LESS THAN (MAXVALUE))  
	   TABLESPACE ts_teste  
	   ROW STORE COMPRESS ADVANCED;  
	  
	-- Ínicio na processo de redefinição   
	  
	BEGIN  
	  DBMS_REDEFINITION.START_REDEF_TABLE(  
	     uname        => 'DATA',  
	     orig_table   => 'TESTE',  
	     int_table    => 'TEMP',  
	     col_mapping  => 'id id, TO_TIMESTAMP(data) data, obs obs');
	END;  
	/  
	-- Abort caso ocorra algum erro será necessário abortar antes de redefinir.  
	  
	EXEC DBMS_REDEFINITION.ABORT_REDEF_TABLE(uname=>'DATA',orig_table=>'TESTE',int_table=>'TEMP');  
	  
	-- Nesse momento é criada uma view materializada  
	SQL> SELECT object_name, object_type, status FROM user_objects;  
	  
	OBJECT_NAME                              OBJECT_TYPE             STATUS  
	---------------------------------------- ----------------------- -------  
	SYS_IL0000074206C00003$$                 INDEX PARTITION         VALID  
	SYS_IL0000074206C00003$$                 INDEX PARTITION         VALID  
	SYS_IL0000074206C00003$$                 INDEX PARTITION         VALID  
	SYS_IL0000074206C00003$$                 INDEX                   VALID  
	SYS_LOB0000074206C00003$$                LOB PARTITION           VALID  
	SYS_LOB0000074206C00003$$                LOB PARTITION           VALID  
	SYS_LOB0000074206C00003$$                LOB PARTITION           VALID  
	SYS_LOB0000074206C00003$$                LOB                     VALID  
	RUPD$_TESTE                              TABLE                   VALID  
	I_MLOG$_TESTE                            INDEX                   VALID  
	MLOG$_TESTE                              TABLE                   VALID  
	  
	-- Simulação de transações durante processo de redefinição.  
	  
	INSERT INTO TESTE (ID,NAME,OBS,DATA) VALUES(22,'DATAUNIQUE','DATAUNIQUE OBS','');  
	  
	select * from MLOG$_TESTE;  
	  
	-- Copiar objetos dependentes  
	  
	DECLARE  
	num_errors PLS_INTEGER;  
	BEGIN  
	  DBMS_REDEFINITION.COPY_TABLE_DEPENDENTS(  
	    uname            => 'DATA',   
	    orig_table       => 'TESTE',  
	    int_table        => 'TEMP',  
	    copy_indexes     => 1,   
	    copy_triggers    => TRUE,   
	    copy_constraints => TRUE,   
	    copy_privileges  => TRUE,   
	    ignore_errors    => TRUE,   
	    num_errors       => num_errors);  
	END;  
	/  
	  
	-- Sincronimo das alterações.  
	  
	BEGIN   
	  DBMS_REDEFINITION.SYNC_INTERIM_TABLE(  
	    uname       => 'DATA',   
	    orig_table  => 'TESTE',  
	    int_table   => 'TEMP');  
	END;  
	/  
	  
	-- Existe alterações a serem aplicadas?  
	  
	SQL> select * from MLOG$_TESTE;  
	  
	-- Finalização da redefinição  
	  
	BEGIN  
	  DBMS_REDEFINITION.FINISH_REDEF_TABLE(  
	    uname       => 'DATA',   
	    orig_table  => 'TESTE',  
	    int_table   => 'TEMP');  
	END;  
	/  
	  
	-- Recompilar trigger (Caso não tivessemos utilizada "COPY_TABLE_DEPENDENTS" a trigger dropada)  
	SQL> ALTER TRIGGER TRG_TESET  COMPILE;