Criar arquivo a partir de select

Precisei criar um arquivo texto de um select no Oracle. Nesse exemplo gero o cabeçalho e os datalhes do arquivo separados por ';' .Achei interessante postar, segue abaixo:

/*Cria o arquivo e habilita o spool*/
spool select_file.txt;
/*Cabeçalho*/
select 'owner;table_name;tablespace_name;status;'
from dual;
/*Detalhes*/
select owner||';'||table_name||';'||tablespace_name||';'||status||';'
from all_tables
order by 1;
/*Desabilita o spool*/
spool off;