SET SERVEROUTPUT ON
SET VERIFY OFF
DECLARE
CURSOR cu_tables IS
SELECT a.owner,
a.table_name
FROM all_tables a
WHEREa.table_name = Decode(Upper('&&1'),'ALL',a.table_name,Upper('&&1'))
ANDa.owner= Upper('&&2');
op1NUMBER;
op2NUMBER;
op3NUMBER;
op4NUMBER;
op5NUMBER;
op6NUMBER;
op7NUMBER;
BEGIN
Dbms_Output.Disable;
Dbms_Output.Enable(1000000);
Dbms_Output.Put_Line('TABLE
UNUSED BLOCKS TOTAL BLOCKSHIGH WATER MARK');
Dbms_Output.Put_Line('---------------------------------------------------------------------------');
FOR cur_rec IN cu_tables LOOP
Dbms_Space.Unused_Space(cur_rec.owner,cur_rec.table_name,'TABLE',op1,op2,op3,op4,op5,op6,op7);
Dbms_Output.Put_Line(RPad(cur_rec.table_name,30,' ') ||
LPad(op3,15,' ')
||
LPad(op1,15,' ')
||
LPad(Trunc(op1-op3-1),15,' '));
END LOOP;
END;
/
SET VERIFY ON
|