File indexing completed on 2024-04-06 12:03:11
0001 set serveroutput on;
0002
0003 CREATE OR REPLACE PROCEDURE poll_db
0004 AS
0005
0006 tbl varchar2(32);
0007 ts timestamp;
0008 cnt number(10);
0009
0010 BEGIN
0011 SELECT systimestamp INTO ts FROM dual;
0012 dbms_output.put_line('Time: ' || ts);
0013 FOR result IN (SELECT table_name FROM user_tables ORDER BY table_name)
0014 LOOP
0015 EXECUTE IMMEDIATE 'SELECT ''' || result.table_name || ''', count(*) FROM ' || result.table_name INTO tbl, cnt;
0016 dbms_output.put_line(tbl || ' ' || cnt || ' rows');
0017 END LOOP;
0018 END;
0019 /
0020 show errors;
