Oracle
 sql >> Base de Dados >  >> RDS >> Oracle

Oracle:Inserir dados de tipo de linha em outra tabela


Para inserir uma linha-
DECLARE
   v_record event%rowtype;
BEGIN 
   SELECT * INTO v_record from event where rownum=1; --or whatever where clause
   Insert into tmp_event values v_record;
END;

Ou uma versão mais elaborada para inserir todas as linhas do event -
DECLARE
  TYPE t_bulk_collect_test_tab IS TABLE OF event%ROWTYPE;

  l_tab t_bulk_collect_test_tab;

  CURSOR c_data IS
    SELECT *
    FROM event;
BEGIN
  OPEN c_data;
  LOOP
    FETCH c_data
    BULK COLLECT INTO l_tab LIMIT 10000;
    EXIT WHEN l_tab.count = 0;

    -- Process contents of collection here.
    Insert into tmp_event values v_record;
  END LOOP;
  CLOSE c_data;
END;
/

Em um gatilho, sim, é possível, mas é como a galinha ou o ovo. Você precisa inicializar todos os campos do rowtype com o :new valores de coluna como-
v_record.col1 := :new.col1;
v_record.col2 := :new.col2;
v_record.col3 := :new.col3;
....

Aparentemente, os exemplos de PLSQL acima não podem ser usados ​​em um gatilho, pois lançariam um erro de gatilho mutante. E não há outra maneira de você obter a linha inteira no gatilho além de acessar cada coluna separadamente, como explico acima, então, se você fizer tudo isso, por que não usar diretamente :new.col no INSERT into temp_event em si, vai poupar-lhe muito trabalho.

Além disso, como você diz que é muito trabalhoso mencionar todas as colunas, (no Oracle 11gR2 ) aqui está uma maneira rápida de fazer isso gerando o INSERT declaração e executá-lo dinamicamente (embora não testado para desempenho).
CREATE OR REPLACE TRIGGER event_air --air stands for "after insert of row"
AFTER INSERT ON EVENT
FOR EACH ROW
   L_query varchar2(2000);   --size it appropriately
BEGIN

   SELECT 'INSERT INTO tmp_event VALUES ('|| listagg (':new.'||column_name, ',') 
                                           WITHIN GROUP (ORDER BY column_name) ||')' 
     INTO l_query
     FROM all_tab_columns
    WHERE table_name='EVENT';

   EXECUTE IMMEDIATE l_query;

EXCEPTION
    WHEN OTHERS THEN
        --Meaningful exception handling here
END;