Script de geração de relatório csv

[thrrent]

Bom dia !
Estou com dúvidas, pois já vi que há várias maneiras de se fazer isso.
Tenho uma query, mas preciso executá-la através de script..
Sendo que o resultado dessa query tem que sair em um diretório pré-definido e em csv.

Se alguém puder me ajudar.

Abraço!

[thrrent]

Completando:

No caso seria uma estrutura

Declare

Begin

End;

para realizar essa tarefa e gravar o resultado da query em um diretório pré-definido e no formato .csv

[DanielNN]

Para criação de arquivos a partir de plsql existem as funções da Oracle "UTL_FILE".
Dá uma olhada lá que você consegue criar seu almejado .csv.

[thrrent]

--FIZ A SEGUINTE ESTRUTURA, MAS NÃO SEI SE ESTÁ CERTO, ALGUÉM PODERIA DAR UMA OLHADA?
/*A QUERY QUE EU VOU EXECUTAR DENTRO DESSE CURSOR RETORNA + OU - 37000 LINHAS, COM ESSA ESTRUTURA SERÁ QUE ATENDE AO QUE EU QUERO*/

Selecionar tudo

DECLARE
    arquivo_saida UTL_File.File_Type;

    Cursor Cur_Linha is SELECT **************
                                  from *************
                                  where **********
				  
BEGIN
    arquivo_saida := UTL_File.Fopen('p:\diretoria','relatorio_da_base.csv', 'w');
    For Reg_Linha in Cur_linha Loop
        UTL_File.Put_Line(arquivo_saida, Reg_linha.linha);
    End Loop;
    UTL_File.Fclose(arquivo_saida);
    Dbms_Output.Put_Line('Arquivo gerado com sucesso.');

	
	EXCEPTION
      WHEN UTL_FILE.INVALID_OPERATION THEN
               Dbms_Output.Put_Line('Operação inválida no arquivo.');
               UTL_File.Fclose(arquivo_saida);
      WHEN UTL_FILE.WRITE_ERROR THEN
               Dbms_Output.Put_Line('Erro de gravação no arquivo.');
               UTL_File.Fclose(arquivo_saida);
      WHEN UTL_FILE.INVALID_PATH THEN
               Dbms_Output.Put_Line('Diretório inválido.');
               UTL_File.Fclose(arquivo_saida);
      WHEN UTL_FILE.INVALID_MODE THEN
               Dbms_Output.Put_Line('Modo de acesso inválido.');
               UTL_File.Fclose(arquivo_saida);
      WHEN Others THEN
               Dbms_Output.Put_Line('Problemas na geração do arquivo.');
               UTL_File.Fclose(arquivo_saida);
END;

[Trevisolli]

Só uma dica brother,

Não esquece de, no teu processo, apesar do arquivo ser denominado .csv, de colocar o delimitador dentro dele, no caso, uma vírgula entre os campos.

[arthae]

No caso eu coloco ';' entre os campos.
exemplo

Selecionar tudo

v_Registro := cursor1.campo1||';'||cursor1.campo2;					  
TEXT_IO.PUT_LINE(V_ARQ, V_REGISTRO);