set serverout onset serveroutput on size 1000000declarev_tab_name varchar2(100);cursor empCur is select table_name from user_tables;n_lows number;v_sql varchar2(1000);begin open empCur; loop fetch empCur into v_tab_name; v_sql:='select cou
set serverout on
set serveroutput on size 1000000
declare
v_tab_name varchar2(100);
cursor empCur is select table_name from user_tables;
n_lows number;
v_sql varchar2(1000);
begin
open empCur;
loop
fetch empCur into v_tab_name;
v_sql:='select count(1) from '||v_tab_name;
execute immediate v_sql into n_lows;
exit when empCur%notfound;
DBMS_OUTPUT.PUT_LINE(v_tab_name||','||n_lows);
end loop;
commit;
close empCur;
end;
