SET serveroutput ON
DECLARE
cursor c_fartdare IS SELECT b.pnr AS pnr,b.fnamn AS fnamn ,b.enamn AS enamn,fo.regnr AS regnr,fo.tillverkare AS tillverkare, fo.modell AS modell
FROM fordon fo, bilägare b
WHERE b.pnr = fo.pnr
AND fo.hk > 200;

v_rec c_fartdare%rowtype;

BEGIN
IF NOT c_fartdare%isopen THEN
OPEN c_fartdare;
END IF;

loop
fetch c_fartdare
INTO v_rec;
exit WHEN c_fartdare%notfound;
INSERT INTO fartdare(pnr,fnamn,enamn,regnr,tillverkare, modell) VALUES(v_rec.pnr,v_rec.fnamn,v_rec.enamn,v_rec.regnr,v_rec.tillverkare,v_rec.modell);
END loop;
close c_fartdare;
commit;
dbms_output.put_line('Nu har du samlat in alla fartdårar! ');
END;