用SQLPLUS調試oracle獲取數據庫表空間總大小、剩餘大小的存儲過程

必須以SYSDBA的身份登錄，否則創建時會報錯

sqlplus system/wangkong@orcl as SYSDBA

存儲過程的代碼如下：

-- 對普通用戶進行授權

GRANT SELECT ON SYS.DBA_DATA_FILES TO PUBLIC;

GRANT SELECT ON SYS.DBA_FREE_SPACE TO PUBLIC;


CREATE OR REPLACE PROCEDURE GET_GNCDB5_SIZE(db_name IN VARCHAR2, db_size OUT NUMBER, db_free OUT NUMBER)
AS    
  BEGIN
    BEGIN
      SELECT ROUND(SUM(BYTES)/(1024 * 1024), 0) total INTO db_size FROM SYS.DBA_DATA_FILES WHERE TABLESPACE_NAME=db_name GROUP BY TABLESPACE_NAME;
      SELECT ROUND(SUM(BYTES)/(1024 * 1024), 0) free INTO db_free FROM SYS.DBA_FREE_SPACE WHERE TABLESPACE_NAME=db_name GROUP BY TABLESPACE_NAME;
    EXCEPTION    
      WHEN OTHERS THEN
        db_size := 0;
        db_free := 0;
    END;
    -- dbms_output.put_line('db_size='||db_size||', db_free='||db_free);  
  END;  
/

-- 對存儲過程進行授權
GRANT EXECUTE ON GET_GNCDB5_SIZE TO PUBLIC;

-- 爲其他用戶創建同名，注意這個存儲過程的所有者是SYS，而不是SYSTEM
CREATE OR REPLACE PUBLIC SYNONYM GET_GNCDB5_SIZE FOR GET_GNCDB5_SIZE;
GRANT ALL ON GET_GNCDB5_SIZE to PUBLIC;


退出sqlplus，以普通用戶的身份重新登錄SQLPLUS，進行測試：

SQL> VAR DB_SIZE NUMBER;
SQL> VAR DB_FREE NUMBER;
SQL> exec get_gncdb5_size('GNCDB5', :DB_SIZE, :DB_FREE);

PL/SQL 過程已成功完成。

SQL> PRINT :DB_SIZE

   DB_SIZE
----------
       100

SQL> PRINT :DB_FREE

   DB_FREE
----------
        93

SQL>