Jump to content
alextdssouza

Otimização de Cursores para exportação de arquivos em texto.

Recommended Posts

Estou com o seguinte problema fiz alguns cursores para exportar algumas informações para texto, porém está demorando mais de 2 horas para exportar 4 mil linhas, o problema aconteceu 

depois de ter incluído os registros de nível 3 e 4 algumas dessas tabelas estão sem informação não sei se seria esse o problema, todas as minhas tabelas estão indexadas. 

Gostaria de saber se alguém pode me ajudar a otimizar esse tempo ou me informar qual seria a melhor maneira de fazer isso, sem o nível 3 e 4 levava 5 min para gerar o mesmo resultado, agora leva mais de 2hs. Abaixo Segue o Cursor. Obrigado!

 

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

SET SERVEROUTPUT ON;
DECLARE
  MEU_ARQUIVO UTL_FILE.FILE_TYPE;
  
    CURSOR CR_0000 IS SELECT * FROM TBL_EFD_ICMS_0000;     
    CURSOR CR_C100 IS SELECT * FROM TBL_EFD_ICMS_C100;
    CURSOR CR_C110 IS SELECT * FROM TBL_EFD_ICMS_C110;
    CURSOR CR_C111 IS SELECT * FROM TBL_EFD_ICMS_C111;
    
    REG_0000 CR_0000%ROWTYPE; 
    REG_C100 CR_C100%ROWTYPE; 
    REG_C110 CR_C110%ROWTYPE; 
    REG_C111 CR_C111%ROWTYPE; 

--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- 
BEGIN
    MEU_ARQUIVO := UTL_FILE.FOPEN('DIRETORIO', 'SAIDAS_NEW.txt', 'w');
        
    OPEN CR_0000; -- nivel 1
        LOOP
            FETCH CR_0000 INTO REG_0000;
            EXIT WHEN CR_0000%NOTFOUND;
            UTL_FILE.PUT_LINE(MEU_ARQUIVO,'|'||REG_0000.REG 
            ||'|'||REG_0000.COD_VER 
            ||'|'||REG_0000.DT_INI 
            ||'|'||REG_0000.DT_FIN 
            ||'|'||REG_0000.CNPJ 
            ||'|'||REG_0000.IND_ATIV ||'|');
            
            OPEN CR_C100; -- nivel 2
                LOOP
                    FETCH CR_C100 INTO REG_C100;
                    EXIT WHEN CR_C100%NOTFOUND;
                    IF  REG_C100.ID_0000 = REG_0000.ID_0000 THEN
                        UTL_FILE.PUT_LINE(MEU_ARQUIVO,'|'||REG_C100.REG 
                        ||'|'||REG_C100.SER
                        ||'|'||REG_C100.NUM_DOC
                        ||'|'||REG_C100.CHV_NFE
                        ||'|'||REG_C100.DT_DOC
                        ||'|'||REG_C100.DT_E_S
                        ||'|'||REG_C100.VL_DOC
                        ||'|'||REG_C100.VL_COFINS_ST ||'|');
                    END IF;
                    
                    OPEN CR_C110; -- nivel 3
                        LOOP
                            FETCH CR_C110 INTO REG_C110;
                            EXIT WHEN CR_C110%NOTFOUND;
                            IF  REG_C110.ID_0000 = REG_0000.ID_0000 AND
                                REG_C110.ID_C100 = REG_C100.ID_C100 THEN
                                UTL_FILE.PUT_LINE(MEU_ARQUIVO,'|'||REG_C110.REG 
                                ||'|'||REG_C110.COD_INF
                                ||'|'||REG_C110.TXT_COMPL ||'|');
                            END IF; 
                    
                            OPEN CR_C111; -- nivel 4
                                LOOP
                                    FETCH CR_C111 INTO REG_C111;
                                    EXIT WHEN CR_C111%NOTFOUND;
                                    IF  REG_C111.ID_0000 = REG_0000.ID_0000 AND
                                        REG_C111.ID_C100 = REG_C100.ID_C100 AND 
                                        REG_C111.ID_C110 = REG_C110.ID_C110 THEN
                                        UTL_FILE.PUT_LINE(MEU_ARQUIVO,'|'||REG_C111.REG 
                                        ||'|'||REG_C111.COD_INF
                                        ||'|'||REG_C111.TXT_COMPL ||'|');
                                    END IF;
                                END LOOP;
                            CLOSE CR_C111;
                            
                        END LOOP;
                    CLOSE CR_C110;
                    
                END LOOP;
            CLOSE CR_C100;
            
        END LOOP;
    CLOSE CR_0000;

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(MEU_ARQUIVO);
WHEN UTL_FILE.WRITE_ERROR THEN
Dbms_Output.Put_Line('Erro de gravação no arquivo.');
UTL_FILE.FCLOSE(MEU_ARQUIVO);
WHEN UTL_FILE.INVALID_PATH THEN
Dbms_Output.Put_Line('Diretório inválido.');
UTL_FILE.FCLOSE(MEU_ARQUIVO);
WHEN Others THEN
Dbms_Output.Put_Line('Problemas na gravação do arquivo.');
UTL_FILE.FCLOSE(MEU_ARQUIVO);
END;
/

Share this post


Link to post
Share on other sites

Os cursores tem uma hierarquia ?

Os sqls 100,110 e 111 não deveriam ter uma condição where ?

Share this post


Link to post
Share on other sites
27 minutos atrás, Motta disse:

Os cursores tem uma hierarquia ?

Os sqls 100,110 e 111 não deveriam ter uma condição where ?

Sim os cursores tem uma hierarquia, as condições estão nos IF's estão vinculados pelos índices  "id" dos pais

ex: 

ID_0000 para o nível 1 bisavo, 

ID_0000 , ID_C100 para o nível 2 avo,

ID_0000 , ID_C100 , ID_C110 para o nivel 3 pai

ID_0000 , ID_C100 , ID_C110 para o filho

Share this post


Link to post
Share on other sites

Share this post


Link to post
Share on other sites
7 minutos atrás, Motta disse:

Dei uma olhada más como isso pode me ajudar?

Share this post


Link to post
Share on other sites

Amanhã se tiver tempo melhoro a resposta.

Estou no tablet , ruim de editar códigos.

Share this post


Link to post
Share on other sites
Em 08/09/2019 at 15:59, Motta disse:

Dei uma olhada más como isso pode me ajudar?

Share this post


Link to post
Share on other sites

Eu pessoalmente ando sem tempo , mas foruns tem isto mesmo.

 

Basicamente seus curdores estão lendo tudo e o filtro fica num filtro fora dele , um parametro e jm filtro no WHERE pode resolver.

 

As vezes temos de perguntar pois faltam dados ba pergunta para um reposta.

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

  • Similar Content

    • By juliosertori
      Olá tudo bem?
       
      Tenho uma tabela onde registro os produtos que vendeu, com o ID do Pedido, e preciso listar os mais vendidos por período.
       
      Tenho o SQL:
      SELECT SUM(quantidade) AS quantidade, id_produto, nome_produto FROM pedidos_produtos WHERE id_empresa = '".$_CPD['CompanyId']."' GROUP BY id_produto order by quantidade desc limit 0,10 Lista perfeitamente, mas o problema é que a DATA está na tabela PEDIDOS, como linkar?
       
      Obrigado!
    • By Motta
      Google e Oracle decidem na Suprema Corte briga judicial sobre Android
    • By Augusto Developer
      Olá, eu gostaria de uma ajuda, a qual eu não estou conseguindo repetir o laço do PHP para o meu script atual.
       
      Bom, eu tenho u script que gera 25 números aleatórios para assim, gerar o jogo desejado e também eu tenho um campo(input) que é minha $qtd['qtd_cartela']; a qual essa é responsável por gerar a quantidade de números desejados.
       
      Bom, o que eu preciso é quando alguém escolher mais de 1 jogo(cartela), irão gerar 25 números, aleatórios, pois não estou conseguindo gerar mais de um jogo, e mostrar isso através de um foreach ou outro laços do php.
       
      Enfim, quando eu coloco mais de 1 valor, para gerar a combinação, eu  dou um var_dump na minha variável $qtd eu consigo ver que esta mostrando a quantidade desejada, mais nao consigo fazer isso aparecer após escolher o valor desejado.
       
      Resumindo, eu preciso colocar um valor que eu quiser, e mostrar varios números apos submeter meu fomulário.
       
      Obrigado e aguardo ajuda.
       
       
      Meu script:
       
       <?php                 $bingo = filter_input_array(INPUT_POST, FILTER_DEFAULT);                 if(isset($bingo['gerar'])){                     unset($bingo['gerar']);                       if(!empty($bingo['qtd_cartela'] == '')){                         dialog('<b>Ops... preencha o campo cartela!</b>', 'warning');                     }elseif($bingo['qtd_cartela'] == 0 ){                         dialog('<b>Ops... preencha com um valor válido!</b>', 'warning');                     }else{                           $totalNumber = 25;                         $total = '';                          $qtd = $bingo['qtd_cartela'];                                                  for($i = 0; $i < $totalNumber; $i++){                             $numberGenerator = rand(1, 90);                             $total .= $numberGenerator;                         }
                              var_dump($total);                                              //dialog('Sucesso...', 'success');                        }                   }                   ?>                   <form action="" enctype="multipart/form-data" method="post">                     <div class="row">                         <div class="col-md-3">                             <div class="form-group">                                 <label class="form-control-label">NOME DO CONCURSO</label>                                 <input type="text" class="form-control is-invalid" placeholder="" disabled>                             </div>                         </div>                           <div class="col-md-3">                             <div class="form-group">                                 <label class="form-control-label">DATA DO PRÓXIMO CONCURSO</label>                                 <input type="text" class="form-control is-invalid" placeholder="" disabled>                             </div>                         </div>                           <div class="col-md-3">                             <div class="form-group">                                 <label class="form-control-label">PRÊMIO DO CURSO</label>                                 <input type="text" class="form-control is-invalid" placeholder="" disabled>                             </div>                         </div>                           <div class="col-md-3">                             <div class="form-group">                                 <label class="form-control-label">QUANTIDADE DE JOGO</label>                                 <input type="text" name="qtd_cartela" class="form-control" placeholder="Escolha a quantidades de cartelas">                             </div>                         </div>                           <div class="col-md-12 text-right">                             <input type="submit" class="btn btn-success btn-sm" name="gerar" value="Gerar Cartela">                         </div>                     </div>                 </form>  
    • By Motta
      Oracle lança programa educacional para capacitar jovens na área de TI
×

Important Information

Ao usar o fórum, você concorda com nossos Terms of Use.