Advertisement
Guest User

Untitled

a guest
Mar 21st, 2019
73
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
PL/SQL 0.64 KB | None | 0 0
  1. SET SERVEROUTPUT ON;
  2. DECLARE
  3. CURSOR c1 IS SELECT id_departament, denumire_departament FROM departamente WHERE id_departament IN(SELECT id_departament FROM angajati);
  4. CURSOR c2 (id departamente.id_departament%TYPE) IS SELECT nume, salariul FROM angajati WHERE id_departament=id;
  5. v1 c1%ROWTYPE;
  6. v2 c2%ROWTYPE;
  7. BEGIN
  8. OPEN c1;
  9. LOOP
  10.     FETCH c1 INTO v1;
  11.     EXIT WHEN c1%notfound;
  12.     DBMS_OUTPUT.PUT_LINE(v1.denumire_departament);
  13.     OPEN c2(v1.id_departament);
  14.     LOOP
  15.         FETCH c2 INTO v2;
  16.         EXIT WHEN c2%notfound;
  17.         DBMS_OUTPUT.PUT_LINE(v2.nume||' '||v2.salariul);
  18.     END LOOP;
  19.     CLOSE c2;
  20. END LOOP;
  21. CLOSE c1;
  22. END;
  23. /
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement