Relatorio vizualidado no EBS imprime diferente

[ceess_1]

Olá amigos, estou com um problema e gostaria da ajuda de vocês, criei um relatório e a saida dele no concurrent está como .txt ao ser visualizado no EBS ele está ok, mas quando o usuário seleciona aopção copiar ele perde toda a formatação de colunas e linhas, alguém já passou por isso e tem uma idéia de como posso resolver esse problema.

Agradeço desde já.

[madmax]

Olá Ceess_1

Os Relatorios aqui a maioria são em TXT por serem mais rapidos e facil a exportação para o Excel.

Bem vamos lá aqui nos exportamos da seguinte maneira:


1 - O Usuário deve clicar com o botão direito do mouse e salvar como

2 - Salvar o arquivo em um local como TXT

3 - Abrir o Excel e localizar o arquivo txt
Aparecerá o assistente de importação do Excel, informar DELIMITADO e avançar.

4 - Escolher Outros e colocar como separador de colunas (;) ponto e virgula clicar em avançar

5 - Selecionar todas as colunas e escolher formato Texto, clicar em concluir.

Pronto esta importado para Excel.

Espero ter ajudado.

[ceess_1]

Então Douglas nesse caso é depois de gerado o relatório, aqui não habilita essa opção, no seu caso o concurrent está como reports ou como procedimento pl/sql? você tem um e-mail para eu te enviar o print das telas acho que fica mais facil de você entender...

[alexrsilva]

Por que não utiliza xml publisher?
Você vai poder escolher a forma de saida do seu relatório. XML, PDF, html ou rtf.

Dê uma pesquisada sobre.

Atenciosamente,

[ceess_1]

mas ai eu vou ter isso default no EBS?? ou tenho que ter uma ferramenta de desenvolvimento a parte?

[alexrsilva]

adiciona a responsabilidade "administrador xml publisher"

[madmax]

Então ceess_1 os Reports que tenho em TXT são procedimento pl/sql.

Eu crio uma package e coloque a procedure dentro das packages separado por modulos e um padrão Oracle que usamos aqui.

Existe o xml publisher como o Alex informou, mas esse usa o Report e eu acho muito complexo e pessado para geração de Relatorios complexos no EBS, principalmente para dar manutenção.


Abs.[/code]

[ceess_1]

beleza, dessa forma que você falou eu acho melhor tb.. cara por acaso você não teria uma pra me enviar por e-mail para eu poder utilizar como exemplo? meu e-mail é ceess_1@hotmail.com

Valeu

[madmax]

Ceess_1.

Segue um exemplo para seguir como Template.

Selecionar tudo

CREATE OR REPLACE PACKAGE XX_OM_ACOMP_PKG AS

Procedure XX_REL_ACOMP (ERRBUF  OUT VARCHAR2
                                       ,RETCODE    OUT NUMBER
                                       .
.
.
.
.

                                      );
End XX_OM_ACOMP_FISIC_FINANC_PKG;



CREATE OR REPLACE PACKAGE BODY XX_OM_ACOMP_FISIC_FINANC_PKG AS
PROCEDURE XX_REL_ACOMP_FISIC_FINANC (ERRBUF  OUT VARCHAR2
                                     ,RETCODE    OUT NUMBER
                                     .
.
.
.
.
.
                                     ) AS


--- Variaveis:
  v_linha                          VARCHAR2(2000);
  v_valor_tot_linha                VARCHAR2(50);
  v_SITUACAO                       VARCHAR2(50);
.
.
.
.
.
  
 


--> CURSOR SELECT PRINCIPAL 
cursor c_nf is

SELECT ……………………;

----------------------------------------------------------------------
    

    Begin
       -- Abre o Aquivo para Gravação
       DBMS_OUTPUT.ENABLE(9000000000);
      fnd_file.put_line(fnd_file.log,'========================================================================================');
      fnd_file.put_line(fnd_file.log,'Abre Arquivo para Gravação ' || to_char(sysdate, 'dd-mon-yy HH:mi:ss'));
      fnd_file.put_line(fnd_file.log,'Valores dos parametros inseridos: ');
      fnd_file.put_line(fnd_file.log,'Data da Ordem = ' || to_char(P_DT_INI) || ' FINAL = ' || to_char(P_DT_FIM));
      fnd_file.put_line(fnd_file.log,'Cliente Inicial = ' || to_char(P_CLIENTE_INI) || ' FINAL = ' || to_char(P_CLIENTE_FIM));
.
.
.
.
.
.
fnd_file.put_line(fnd_file.log,'========================================================================================');
    Exception
      When Others Then
        raise_application_error(-20080,sqlerrm || ' Problemas na abertura do arquivo ');
    End;

 
  -- Monta o Titulo do Relatorio
   v_linha :=        ''    ||';'
                 || '' || ';'
                 || '' || ';'
                 || '' || ';'
                 || 'Relatório XXXXXXXXXXXXXXXXXXX' || ';'
                 || '' || ';'
                 || '' ;


    Begin
     Fnd_File.Put_Line(Fnd_File.Output, v_linha);
    Exception
      When Others Then
        fnd_file.put_line(fnd_file.output,'Problemas na gravacao do arquivo');
        raise_application_error(-20030,sqlerrm ||' Problemas na gravacao do arquivo ');
    End;



  -- Monta os Campos Do Cabeçalho 

  v_linha :=        'Número'    ||';'              --1
                 || 'Data' || ';'                  --2
                 || 'Transação' || ';'             --3
                 || 'OC Cliente' || ';'            --4
                 || 'Nota Fiscal' || ';'           --5
                 || 'Código' || ';'                --6
                 || 'Local' || ';'                 --7
                 .
.
.
.
.
.
.
.
.
.
.
.
.
                 || 'Total' || ';'                 --20
                 || 'Recebido' || ';'              --21
                 || 'Cancelado' || ';'             --22
                 || 'Saldo' || ';'                 --23
                 || 'Valor Total OV' || ';'          --23                          
                 || 'Pagamento ' || ';'            --24
                 || 'Vencimento ' || ';'           --25
                 || 'Pagamento ' || ';'            --26
                 || 'Situacao' ;                   --27


    Begin
     Fnd_File.Put_Line(Fnd_File.Output, v_linha);
    Exception
      When Others Then
        fnd_file.put_line(fnd_file.output,'Problemas na gravacao do arquivo');
        raise_application_error(-20030,sqlerrm ||' Problemas na gravacao do arquivo ');
    End;


 
  
    --- Processa os registros do cursor ---
      For v_nf in c_nf loop

        Exit When c_nf%NotFound;
        
        

       --- Formata o layout do CSV ---
        v_linha :=  v_nf.Numero   ||';'                --1
                  || v_nf.Date_Ordem ||';'             --2
                  || v_nf.Transacao ||';'              --3
                  || v_nf.OC_CLIENTE ||';'             --4
                  || v_nf.Nota_Fiscal||';'             --5
.
.
.
.
.
.
.
.
.
.
.
.
.

                  || v_nf.Condicao_Pagamento ||';'     --24 
                  || V_DATA_VENCTO ||';'             --25
                  || v_nf.ULTIMO_PAGAMENTO ||';'       --26 
                  || v_nf.SITUACAO ;                   --27
  
        --- Grava o registr

        begin
            Fnd_File.Put_Line(Fnd_File.Output, v_linha);
        Exception
          When Others Then
            dbms_output.put_line('Problemas na gravacao do arquivo header ');
            fnd_file.put_line(fnd_file.output,'Problemas na gravacao do arquivo' );
            raise_application_error(-20030, sqlerrm || ' Problemas na gravacao do arquivo ');
        End;

      --- Fecha o Loop CURSOR 1
        End Loop;
        

 END XX_REL_ACOMP_FISIC_FINANC;

End XX_REL_ACOMP;

Qualquer coisa estamos aí.

Abs.