得到对表操作的脚本（可作为参考）

得到对表操作的脚本（可作为参考）[@more@]

--使约束失效的脚本
set feedback off
set pagesize 0
spool d:disableconstraint.sql
select 'alter table ' || table_name || chr(10) || ' disable constraint ' ||
constraint_name || ';' obj
from user_constraints
where constraint_type in ('R');
spool off
--启用约束的脚本
spool d:enableconstraint.sql
select 'alter table ' || table_name || chr(10) || ' enable constraint ' ||
constraint_name || ';' obj
from user_constraints
where constraint_type in ('R');
spool off
--清空表的脚本
spool d:truncatetable.sql
select 'truncate table ' || table_name || ';' obj
from user_tables;
spool off
set feedback on
set pagesize 14

create or replace procedure sp_getdefaultvalue is
/*
得到修改表的列的默认值语句.
*/
begin
for rec in (select * from user_tab_columns where data_default is not null)
loop
dbms_output.put_line('alter table '||rec.table_name||' modify '||rec.column_name||' default '||rec.data_default||';');
end loop ;
end sp_getdefaultvalue;
/

来自 “ ITPUB博客 ” ，链接：http://blog.itpub.net/802415/viewspace-823072/，如需转载，请注明出处，否则将追究法律责任。

转载于:http://blog.itpub.net/802415/viewspace-823072/