set serveroutput on
declare
t_count number(10);
t_str VARCHAR2(500);
cursor t_tables is select table_name from user_tables;
begin
for t_row in t_tables loop
t_str := 'select count(*) from '|| t_row.table_name;
execute immediate t_str into t_count;
dbms_output.put_line( t_row.table_name || '=' || to_char(t_count));
end loop;
end;
declare
t_count number(10);
t_str VARCHAR2(500);
cursor t_tables is select table_name from user_tables;
begin
for t_row in t_tables loop
t_str := 'select count(*) from '|| t_row.table_name;
execute immediate t_str into t_count;
dbms_output.put_line( t_row.table_name || '=' || to_char(t_count));
end loop;
end;
来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/29135257/viewspace-2152680/,如需转载,请注明出处,否则将追究法律责任。
转载于:http://blog.itpub.net/29135257/viewspace-2152680/