cursor desafio parte I

[Profa. Simone Cristina Aléssio]

create or replace procedure p_insere_dados is

cursor c_insere is

select * from N3_FUNC_INTERM n3

order by n3.cod_func;

aux_insere_dados   c_insere%rowtype;

begin

      for aux_insere_dados in c_insere loop

          insert into N3_FUNC_FINAL F (F.COD_FUNC,

                                  F.NOM_FUNC,

                                  F.QTD_ANOS_SERV,

                                  F.VAL_SAL)

                               VALUES

                                  (aux_insere_dados.cod_func,

                                   aux_insere_dados.nom_func,

                                   aux_insere_dados.qtd_anos_serv,

                                   aux_insere_dados.val_sal);

      commit;                                   

      end loop;                                   

     

end p_insere_dados;

______________________________________

Profa: Simone Cristina Aléssio

Administração - Sistemas de Informação

http://lattes.cnpq.br/0168854341778196
(047) 9213-6607