/* Get the name of the table with migrated rows */

accept table_name prompt ’Enter the name of the table with migrated rows: ’

/* Clean up from last execution */

set echo off

drop table migrated_rows;

drop table chained_rows;

/* Create the CHAINED_ROWS table */

@?/rdbms/admin/utlchain

set echo on

spool fix_mig

/* List the chained & migrated rows */

analyze table &table_name list chained rows;

/* Copy the chained/migrated rows to another table */

create table migrated_rows as

select orig.* from &table_name orig, chained_rows cr

where orig.rowid = cr.head_rowid

and cr.table_name = upper(’&table_name’);

/* Delete the chained/migrated rows from the original table */

delete from &table_name

where rowid in ( select head_rowid from chained_rows );

/* Copy the chained/migrated rows back into the original table */

insert into &table_name select * from migrated_rows;

spool off