Procedure of oracle (proc_count_recd)

CREATE OR REPLACE PROCEDURE proc_count_recd
is
  tablename varchar2(30);
  rownum number := 0;
  sql_str varchar2(200);
  cursor cur_tablename is
    select table_name from user_tables;
begin
  delete from row_num_inTable;
  open cur_tablename;
    loop
      fetch cur_tablename into tablename;
      exit when cur_tablename%notfound;
      sql_str := 'select count(*) from '||tablename;
      execute immediate sql_str into rownum;
      dbms_output.put_line(tablename||','||rownum);
      insert into row_num_inTable(table_name,row_num,dbname) values
        (tablename,rownum,'NEWMES');
      sql_str := '';
    end loop;
    commit;
  close cur_tablename;
end proc_count_recd;