用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>