CREATE OR REPLACE TRIGGER trig1
   AFTER INSERT
   ON emp
   FOR EACH ROW
DECLARE
   l_dname   dept.dname%TYPE;

   CURSOR c1
   IS
      SELECT dname
        FROM dept;
BEGIN
   OPEN c1;

   LOOP
      FETCH c1
       INTO l_dname;

      EXIT WHEN c1%NOTFOUND;

      INSERT INTO dept_dname
                  (dname
                  )
           VALUES (l_dname
                  );
   END LOOP;
END;