代码如下:
declare
//定义临时变量用于保存每一条删除sql
tmp_sql varchar2(4000);
//定义游标变量用于保存所有的删除sql
cursor drop_sql is
//查询拼接出所有删除sql
select 'drop table ' | table_name from user_tables where regexp_instr(table_name,'ac|bd') > 0;
begin
//打开游标变量
open drop_sql;
//开始循环
loop
//将游标变量现在的sql赋值到临时变量
fetch drop_sql into tmp_sql;
//如果游标变量为空,那么推出循环
exit when drop_sql%notfound;
//执行表删除sql
execute immediate tmp_sql;
//循环结束
end loop;
//关闭游标变量
close drop_sql;
//结束
end;