Oracle刪除當前用戶的所有對象(表、視圖、觸發器、存儲過程、函數)

1.

DECLARE

TYPE name_list IS TABLE OF VARCHAR2(40);

TYPE type_list IS TABLE OF VARCHAR2(20);

Tab_name name_list:=name_list();

Tab_type type_list:=type_list();

sql_str VARCHAR2(500);

BEGIN

sql_str := 'select uo.object_name,uo.object_type from user_objects uo where uo.object_type not in(''INDEX'',''LOB'') order by uo.object_type desc';

EXECUTE IMMEDIATE sql_str BULK COLLECT INTO tab_name,tab_type;

FOR i IN Tab_name.FIRST.. Tab_name.LAST LOOP

--if Tab_type(i)='TABLE' then 刪除條件 truncate快速刪除記錄

sql_str := 'DROP ' || Tab_type(i) || ' ' || Tab_name(i);

end if;

EXECUTE IMMEDIATE sql_str;

END LOOP;

END;

2.

cascade 參數表示級聯刪除這個用戶的所有對象

drop user username cascade

CREATE OR REPLACE PROCEDURE AutoBackupOracle4Day_bak_bak

as

TYPE name_list IS TABLE OF VARCHAR2(40);

TYPE type_list IS TABLE OF VARCHAR2(20);

Tab_name name_list:=name_list();

Tab_type type_list:=type_list();

sql_str VARCHAR2(500);

sql_a VARCHAR2(500);

sql_b VARCHAR2(500);

BEGIN

--獲取用戶下的所有對象 包括表，視圖，存儲過程 等等

--sql_str := 'select uo.object_name,uo.object_type from user_objects@GZEPBMOTOR43.US.ORACLE.COM uo where uo.object_type not in(''INDEX'',''LOB'') order by uo.object_type desc';

--獲取用戶下的表

sql_str :='select a.table_name,a.tablespace_name from user_tables@GZEPBMOTOR43.US.ORACLE.COM a';

EXECUTE IMMEDIATE sql_str BULK COLLECT INTO tab_name,tab_type;

FOR i IN Tab_name.FIRST.. Tab_name.LAST LOOP

--if Tab_name(i)='T_BDM_ENVIROMENTSTANDARD' then

sql_a := 'truncate ' || Tab_type(i) || ' ' || Tab_name(i);

sql_b:= 'insert into ' || Tab_name(i) || ' select * from "' ||Tab_name(i)||'"@GZEPBMOTOR43.US.ORACLE.COM';

--dbms_output.put_line( sql_str);

--dbms_output.put_line( sql_a);

--設置打印的最大限值

dbms_output.enable(50000);

dbms_output.put_line('EXECUTE IMMEDIATE ''truncate table ' ||Tab_name(i)||''';');

dbms_output.put_line('insert into ' || Tab_name(i) || ' select * from ' ||Tab_name(i)||'@GZEPBMOTOR43.US.ORACLE.COM;');

--declare

--bad_credit exception;

--begin

--刪除數據

--EXECUTE IMMEDIATE 'truncate table'|| ' ' || Tab_name(i);

--執行加入

--EXECUTE IMMEDIATE 'insert into ' || Tab_name(i) || ' select * from ' ||Tab_name(i)||'@GZEPBMOTOR43.US.ORACLE.COM';

--raise bad_credit;

--end if;

--exception

-- when bad_credit then

--end;

--EXECUTE IMMEDIATE sql_b;

END LOOP;

commit;

END;

總結

如果覺得編程之家網站內容還不錯，歡迎將編程之家網站推薦給程序員好友。

本圖文內容來源于網友網絡收集整理提供，作為學習參考使用，版權屬于原作者。

總結

以上是生活随笔為你收集整理的oracle删除所有触发器的命令,Oracle删除当前用户的所有对象(表、视图、触发器、存储过程、函数)...的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。