F�rum tabela de referencia cruzada #482204

11/06/2014

Ol�, tenho buscado nos f�rum uma solu��o para minha necessidade. Tenho uma base de dados Oracle 10g preciso listar uma determinada tabela de forma diferente

Tabela1
numeros | hora | data |
5|13:00|22/01/2014|
5|13:25|22/01/2014|
5| 09:35|23/03/2014|
2|12:00|21/02/2014|
6|10:50|18/03/2014|
1|15:00|05/04/2014

preciso lista-l�s da seguinte forma:
listar todos com numero 5
| 22/01/2014|23/03/2014|
| 13:00 | 09:35 |
| 13:25 |

ou listar todos com numero 1
|05/04/2014|
| 15:00 |

etc...
transformar linha em coluna.

Agrade�o.

Centro Guanabara

Curtir t�pico

+ 0

Responder

Posts

11/06/2014

Joel Rodrigues

Tente pesquisar por PIVOT e UNPIVOT no Oracle, creio que seja a solu��o para sua necessidade.

Responder

Gostei + 0

11/06/2014

Centro Guanabara

pelo que li o PIVOT OU UNPIVOT somente funciona a partir da 11g minha vers�o � a 10g

Responder

Gostei + 0

11/06/2014

Lourival Queiroz

Vc pode usar uma rotina assim: (Observar que a primeira coluna de cada linha deve ter "|'

begin
while true
  loop
   ler_registro(linha);
   if (Fim_arquivo) then
      goto Fim;
   end if;
   -- Formata a registro em n linhas
   for r in (select Rownum Numero,
                    SUBSTR(A.Str||'|',
                     INSTR(A.Str||'|' , '|', 1, Rownum )  + 1,
                     INSTR(A.Str||'|' , '|', 1, Rownum+1) -
                     INSTR(A.Str||'|' , '|', 1, Rownum )  - 1) Campo
                from (select '|5|13:00|22/01/2014|' Str
                        from dual) A,
                     all_objects B
               where rownum < length(A.Str) - length(REPLACE(A.Str,'|')) + 1)
     loop 
      -- Testa se Primeira Coluna est� nos parametros pretendidos     
      if ((Numero = 1) and (Campo in ('1','5')) then 
         Guarda_Registro(linha); -- Guarda o registro
      end if;
     end loop;
<<Fim>>
fechar_arquivo;
end;
/

Responder

Gostei + 0

11/06/2014

Lourival Queiroz

Observar que nesse select

(select '|5|13:00|22/01/2014|' Str
                        from dual) A

Vc substitui o "'|5|13:00|22/01/2014|'" por linha(registro lido)

Responder

Gostei + 0

11/06/2014

Lourival Queiroz

Vers�o completa: (Observar que a forma de armazenar vc tem de criar de acordo com a coluna lida (1,2,3) e os testes efetuados)

-- Linha = '|5|13:00|22/01/2014|'
begin
while true
  loop
   ler_registro(linha);
   if (Fim_arquivo) then
      goto Fim;
   end if;
   -- Formata a registro em n linhas
   for r in (select Rownum Numero,
                    SUBSTR(A.Str||'|',
                     INSTR(A.Str||'|' , '|', 1, Rownum )  + 1,
                     INSTR(A.Str||'|' , '|', 1, Rownum+1) -
                     INSTR(A.Str||'|' , '|', 1, Rownum )  - 1) Campo
                from (select Linha Str
                        from dual) A,
                     all_objects B
               where rownum < length(A.Str) - length(REPLACE(A.Str,'|')) + 1)
     loop 
      -- Testa se Primeira Coluna est� nos parametros pretendidos     
      if ((Numero = 1) and (Campo in ('1','5')) then 
         Guarda_Registro(linha); -- Guarda o registro
      end if;
      -- Ler a Hora
      if (Numero =2) then
          pega_hora(Campo);
      end if;
      -- Ler a Data
      if (Numero = 3) then
         Pega_Data(Campo);
         Finaliza(Linha) ; -- Passa para o pr�ximo registro
      end if;
     end loop;
  end loop;
<<Fim>>
fechar_arquivo;
end;
/

Responder

Gostei + 0