1.
--空表導(dǎo)出語句? 運(yùn)行之后空表也能夠?qū)С?/p>
declare str varchar2(400);
begin
? for r in
? ? ( select table_name from user_tables where num_rows=0 )
? ? loop
? ? ? str:='alter table '||r.table_name||' allocate extent' ;
? ? ? execute immediate str;
? ? ? end loop;
end;
--第二個(gè)空表導(dǎo)出語句
declare str varchar2(400);
begin
? for r in
? ? ( select table_name from user_tables where segment_created='NO' )
? ? loop
? ? ? str:='alter table '||r.table_name||' move' ;
? ? ? execute immediate str;
? ? ? end loop;
end;
