一个drop 所有表的 pl/sql， 不知道那里错了-----求助
declare
cursor drop_cur is
select table_name from user_tables;
v_tname user_tables.table_name%type;
begin
open drop_cur;
fetch drop_cur into v_tname;
while drop_cur%found loop
drop table v_tname cascade constraint;
fetch drop_cur into v_tname;
end loop;
close drop_cur;
end;
/
--帮改改
问题点数：88、回复次数：1Top
1 楼welyngj（无爱）回复于 2004-10-03 20:32:30 得分 88
declare
cursor drop_cur is
select table_name from user_tables;
v_tname user_tables.table_name%type;
begin
open drop_cur;
fetch drop_cur into v_tname;
while drop_cur%found loop
execute immediate 'drop table ' || v_tname || ' cascade constraint';
fetch drop_cur into v_tname;
end loop;
close drop_cur;
end;
/
Top
