SET SERVEROUT ON VERIFY OFF
DECLARE
TB NUMBER ;
TBY NUMBER ;
UB NUMBER;
UBY NUMBER;
LUEF NUMBER ;
LUEBI NUMBER ;
LUB NUMBER ;
BEGIN
DBMS_SPACE.UNUSED_SPACE( UPPER('&1.'), UPPER('&2.'), UPPER('&3.'), TB, TBY, UB, UBY, LUEF, LUEBI, LUB );
DBMS_OUTPUT.PUT_LINE( CHR(10) || UPPER('&2.') || CHR(10) || CHR(10) || 'TOTAL BLOCKS = ' || to_char( TB, '9999999' ) );
DBMS_OUTPUT.PUT_LINE( 'EMPTY BLOCKS = ' || to_char( UB, '9999999' ) );
DBMS_OUTPUT.PUT_LINE( 'USED BLOCKS = ' || to_char( TB-UB, '9999999' ) );
END;
/
SET SERVEROUT OFF VERIFY ON