set serveroutput on; declare xSQL varchar2(75); cursor cRel is select TABLE_NAME from ALL_TABLES where OWNER = 'DPITSTEST' -- Specify schema order by TABLE_NAME; xTable varchar2(35); type rRowRec is record (TableName varchar2(35), RowCount varchar2(15)); rRow rRowRec; begin xSQL := ''; open cRel; loop fetch cRel into xTable; exit when cRel%notfound; xSQL := 'select ''' || xTable || ''' TableName, count(*) RowCount from ' || xTable; execute immediate xSQL into rRow; dbms_output.put_line(rpad(rRow.TableName, 35, ' ') || rRow.RowCount); end loop; close cRel; end; /