Script Listar Datafiles

Bom dia a todos,

Hoje precisei listar os Datafiles para verificar o tamanho,uso e espaço livre,e me deparei com esse script bem legal. e achei interessante dividir com vocês.


 ========= Script Completo DATAFILES =========================

set lin 120 pages 60 feed off heading on
ttitle skip center "Relatorio de utilizacao de Espaco por Datafile" skip 2
col tablespace for a15
col file format a55
set numformat 99999999.9

accept tbsn prompt "Digite o nome da Tablespace [enter=todas]...:"

clear breaks
clear computes
break on Tablespace skip 1 on report skip 2

compute sum of Total(M) on Tablespace
compute sum of Used(M)  on Tablespace
compute sum of Free(M)  on Tablespace
compute avg of %Free    on Tablespace
compute sum of Total(M) on report
compute sum of Used(M)  on report
compute sum of Free(M)  on report


select b.file_name "File",
       b.tablespace_name "Tablespace",
       b.bytes/(1024*1024) "Total(M)",
       round((b.bytes-sum(nvl(a.bytes,0)))/(1024*1024),1) "Used(M)",
       round(sum(nvl(a.bytes,0))/(1024*1024),1) "Free(M)",
       round((sum(nvl(a.bytes,0))/(b.bytes))*100,1) "%_Free"
from   dba_free_space a,
       dba_data_files b
where  a.file_id(+) = b.file_id
and    b.tablespace_name like (upper(nvl('&tbsn',b.TABLESPACE_NAME)))
group by b.tablespace_name,b.file_name,b.bytes
order by b.file_name asc;

ttitle off

============================================================