andrescarrero/DWH-PL-SQL — pull request #12 by marian09 (2013-03-19 03:30:06+00:00)
Title: Dimensión Edificios

create or replace procedure llena_edif as cursor edifc is
(select distinct(edo_codigo) ide, edo_nombre nom from edificio);

v_edifcc edifc%rowtype;

begin

open edifc;
loop
fetch edifc into v_edifcc;
exit when edifc%NOTFOUND;
dbms_output.put_line('IDE: '||v_edifcc.ide||' NOM:'||v_edifcc.nom);
insert into edificios(ed_id_viejo, nombre)values(v_edifcc.ide, v_edifcc.nom);
end loop;
close edifc;
end llena_edif;