Advertisement
haikelfazzani

newSQL

Mar 21st, 2018
111
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
PL/SQL 1.16 KB | None | 0 0
  1. SET SERVEROUTPUT ON
  2. DECLARE
  3.   CURSOR C IS
  4.   SELECT art.idarticle , f.NumFournisseur , f.NomFournisseur , f.AdressFournisseur -- lézémk t9olo mnin jébthom (ism les tables) les colonne wa9t ta3mél jointure
  5.   FROM article art JOIN fournisseur f  -- léhna 3atithom des pseudo les tables article (art) et fournisseur (f)
  6.   ON art.NumFournisseur = f.NumFournisseur;
  7.  
  8.   v_id article.idarticle%TYPE;
  9.   v_num fournisseur.NumFournisseur%TYPE;
  10.   v_nom fournisseur.NomFournisseur%TYPE;
  11.   v_adres fournisseur.AdressFournisseur%TYPE;
  12. BEGIN
  13.   OPEN C;
  14.   LOOP FETCH C INTO v_id , v_num , v_nom , v_adres; -- lézém condition d arret
  15.   EXIT WHEN C%NOTFOUND; -- hedhi condition d arret
  16.   DBMS_OUTPUT.PUT_LINE('Numero Article : ' || v_id || CHR(10) || 'Num Fournisseur : ' || v_num || 'Nom Fournisseur : ' || v_nom || 'Ville Fournisseur : ' || v_adres);
  17.   END LOOP;
  18. END;
  19. /
  20.  
  21. -- chr(10) => ajouter un nouveau ligne (optional juste pour l affichage)
  22. fama une autre solution pour afficher les informations ili fil curseur , trés simple et facile
  23.  
  24. BEGIN
  25.     FOR CURS IN C LOOP
  26.         DBMS_OUTPUT.PUT_LINE(CURS.v_id || CURS.v_num || CURS.v_nom || CURS.v_adres);
  27.     END LOOP;
  28. END;
  29. /
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement