1 – Adicionar o tipo de saída Microsoft Excel

Na responsabilidade Administrador de Sistema você deve acessar o caminho abaixo:
Instalar -> Idiomas
Insira um registro com estes valores:
Formato do Arquivo = Text
Tipo de Mime = application/vnd.ms-excel
Descrição = Microsoft Excel

2 – Criar um procedimento PL/SQL

A saída deve ter os campos separados pelo caractere TAB.

CREATE OR REPLACE PACKAGE PKG_REP_EXCEL IS

  PROCEDURE BUILD (ERRBUF OUT VARCHAR2,
                   RETCODE OUT NUMBER);
END PKG_REP_EXCEL;
/

CREATE OR REPLACE PACKAGE BODY PKG_REP_EXCEL IS
  PROCEDURE BUILD (ERRBUF OUT VARCHAR2,
                   RETCODE OUT NUMBER) IS
    CURSOR CUR IS
      SELECT '1' A, '2' B, '3' C FROM DUAL
      UNION
      SELECT '4' A, '5' B, '6' C FROM DUAL
      UNION SELECT '7' A, '8' B, '9' C FROM DUAL;

    REG CUR%ROWTYPE;

    V_DIV VARCHAR2(1) := CHR(9); -- TAB
    V_OUT VARCHAR2(4000);

  BEGIN

    -- HEADER
    V_OUT := 'A' || V_DIV || 'B' || V_DIV || 'C';
    FND_FILE.PUT_LINE(FND_FILE.OUTPUT, V_OUT);

    -- LINES
    FOR REG IN CUR LOOP
      V_OUT := REG.A || V_DIV || REG.B ||   V_DIV || REG.C;
      FND_FILE.PUT_LINE(FND_FILE.OUTPUT, V_OUT);
    END LOOP;

  END BUILD;

END PKG_REP_EXCEL;
/

3 – Criar o Concorrente

O executável é criado normalmente como Procedimento Armazenado do PL/SQL e o programa com formato de saída Texto.

4 – Execução

Após a visualização da saída, utilize o menu Ferramentas e a opção Copiar Arquivo. Nesse momento aparecerá uma LOV para você escolher o tipo de saída.

5 – Arquivo Microsoft Excel

Selecionado o tipo de arquivo Microsoft Excel, basta salvar ou abrir e temos o nosso relatório.
Observação: Tome cuidado ao salvar o arquivo para não deixar a extensão TXT. Caso o arquivo seja gravado com essa extensão, altere para XLS.

Texto criado por Ricardo Rauber – Tutorial disponível para download AQUI
Comentários aqui

Por que isso é importante para um desenvoledor Oracle ? Se você está criando um documento em PL/SQL que será aberto no Excel, a data ficará incorreta a não ser que você converta antes para o padrão do Excel.

Felizmente, a formula de conversão de datas é muito simples. A seguinte função fará a conversão de uma data no Oracle para o padrão do Excel:

CREATE OR REPLACE FUNCTION convertOracleToSerialDate(p_date DATE) RETURN NUMBER
IS
BEGIN
RETURN (p_date – TO_DATE(’01-JAN-1900?))+2;
END;
/

Veja:

SQL*Plus: Release 10.2.0.4.0 – Production on Mon Nov 23 22:31:54 2009

Copyright (c) 1982, 2007, Oracle.  All Rights Reserved.

Connected to:
Oracle Database 10g Express Edition Release 10.2.0.1.0 – Production

SQL> select convertOracleToSerialDate(’05-MAY-1968?) from dual;

CONVERTORACLETOSERIALDATE(’05-MAY-1968?)
—————————————-
24963

Se passarmos o valor “05-MAY-1968″ para a função acima, teremos como resopsta 24963. Agora, se colocarmos esse valor numa planilha excel e mudar o tipo da celula para DATA, teremos esse número convertido para “05/05/1968″, ou qualquer outro formato que você escolher.

O reverso também é possível. Caso desejamos converter do formato excel para oracle, usamos essa simples função:

CREATE OR REPLACE FUNCTION convertSerialToOracleDate(p_serial_date NUMBER) RETURN DATE
IS
BEGIN
  RETURN (TO_DATE(’01-JAN-1900?) + p_serial_date)-2;
END;
/

Exemplo:

SQL*Plus: Release 10.2.0.4.0 – Production on Mon Nov 23 22:45:44 2009

Copyright (c) 1982, 2007, Oracle.  All Rights Reserved.

Connected to:
Oracle Database 10g Express Edition Release 10.2.0.1.0 – Production

SQL> select convertSerialToOracleDate(24963) from dual;

CONVERTSE
———
05-MAY-68

SQL>

Agradecimentos a Jason Bennett pelas dicas acima.