Oracle: 删除当前用户的所有对象(表、视图、触发器、存储过程、函数)

时间:2020-12-09 13:53:58
Oracle: 删除当前用户的所有对象(表、视图、触发器、存储过程、函数)DECLARE
Oracle: 删除当前用户的所有对象(表、视图、触发器、存储过程、函数)TYPE name_list 
IS   TABLE   OF   VARCHAR2 ( 40 );
Oracle: 删除当前用户的所有对象(表、视图、触发器、存储过程、函数)TYPE type_list 
IS   TABLE   OF   VARCHAR2 ( 20 );
Oracle: 删除当前用户的所有对象(表、视图、触发器、存储过程、函数)
Oracle: 删除当前用户的所有对象(表、视图、触发器、存储过程、函数)Tab_name name_list:
= name_list();
Oracle: 删除当前用户的所有对象(表、视图、触发器、存储过程、函数)Tab_type type_list:
= type_list();
Oracle: 删除当前用户的所有对象(表、视图、触发器、存储过程、函数)
Oracle: 删除当前用户的所有对象(表、视图、触发器、存储过程、函数)sql_str 
VARCHAR2 ( 500 );
Oracle: 删除当前用户的所有对象(表、视图、触发器、存储过程、函数)
BEGIN
Oracle: 删除当前用户的所有对象(表、视图、触发器、存储过程、函数)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 ' ;
Oracle: 删除当前用户的所有对象(表、视图、触发器、存储过程、函数)
EXECUTE  IMMEDIATE sql_str  BULK  COLLECT  INTO  tab_name,tab_type;
Oracle: 删除当前用户的所有对象(表、视图、触发器、存储过程、函数)
Oracle: 删除当前用户的所有对象(表、视图、触发器、存储过程、函数)
FOR  i  IN  Tab_name.FIRST.. Tab_name.LAST LOOP
Oracle: 删除当前用户的所有对象(表、视图、触发器、存储过程、函数)sql_str :
=   ' DROP  '   ||  Tab_type(i)  ||   '   '   ||  Tab_name(i);
Oracle: 删除当前用户的所有对象(表、视图、触发器、存储过程、函数)
EXECUTE  IMMEDIATE sql_str;
Oracle: 删除当前用户的所有对象(表、视图、触发器、存储过程、函数)
END  LOOP;
Oracle: 删除当前用户的所有对象(表、视图、触发器、存储过程、函数)
END ;