Curseur dans un curseur

Version imprimable

Bonjour,

Je cherche à faire un curseur dans un curseur.
Le but est de parcourir une table, qui passera un parametre à 2 autres tables ensuite que je parcourai ensuite.

Je ne vois pas comment m'y prendre...

Merci de votre aide.

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
DECLARE
 
-- Mes variables
MonEmploye kheops_heures_operateurs.codeemploye%TYPE;
MaDate kheops_heures_operateurs.datedemandenum%TYPE;
 
DHD_Pause kheops_heures_operateurs.dateheuredebut%TYPE;
DHF_Pause kheops_heures_operateurs.dateheurefin%TYPE;
 
-- j'ai la liste des operateurs de la journée
CURSOR MESEMPLOYES IS
select datedemandenum,codeemploye from kheops_heures_operateurs where datedemandenum = 20150630 group by datedemandenum,codeemploye;
 
BEGIN
 
  OPEN MESEMPLOYES;
 
    LOOP
 
      -- passage de parametre date et employe en lisant le curseur
     FETCH MESEMPLOYES INTO MaDate,MonEmploye;
 
     DBMS_OUTPUT.PUT_LINE(MonEmploye||'    '||MaDate);
     -- Test si je n'ai plus rien a lire
     EXIT WHEN MESEMPLOYES%NOTFOUND;
 
  -- je prends tous les postes de production sur un operateur
   select dateheuredebut,dateheurefin into DHD_Pause,DHF_Pause from kheops_heures_operateurs
   where datedemandenum = MaDate and codeemploye = MonEmploye
   and not exists (select 'f' from kheops_cdc_horsproduction where kheops_cdc_horsproduction.code_cdc=kheops_heures_operateurs.code_cdc);
 
 
 
    END LOOP;
 
  CLOSE MESEMPLOYES;
 
END;

07/07/2015, 14h51
mnitu

Faites des jointures c'est bien pour cela que les bases des données sont nées!
07/07/2015, 17h20
emmaja

Oui, merci

Mais, ce que je souhaite faire plus précisément, c'est lire la premiere requete, qui me passe un paramètre.

Puis lancer une 2eme requete à partir d'un paramètre de la première.
Et je ne veux absolument le faire en 2 requetes !!
07/07/2015, 17h28
mnitu

Et ça s'appelle faire une jointure en Pl/SQL ce qui est un mauvais façon de programmer.

Mais au delà de ces considérations sur comment faire correctement les choses je ne comprends pas votre problème: si vous voulez utiliser un deuxième curseur c'est le même type de code à écrire que sur le premier: le déclarer, l'ouvrir, ramener l'enregistrement courant, tester l'existence des autre enregistrements et le fermer à la fin. De plus un curseur accepte des paramètres quoi que le code mal écrit peut se baser juste sur une variable globale pour transmettre la valeur au curseur.

curseurs_imbriqués

voici qques changement de ton code,

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
 
DECLARE
 
-- Mes variables
MonEmploye kheops_heures_operateurs.codeemploye%TYPE;
MaDate kheops_heures_operateurs.datedemandenum%TYPE;
 
DHD_Pause kheops_heures_operateurs.dateheuredebut%TYPE;
DHF_Pause kheops_heures_operateurs.dateheurefin%TYPE;
 
-- j'ai la liste des operateurs de la journée
CURSOR MESEMPLOYES IS
select datedemandenum,codeemploye from kheops_heures_operateurs where datedemandenum = 20150630 group by datedemandenum,codeemploye;
-- le deuxième curseur correspondant  à la deuxième requête
CURSOR   C_BIS (param1, param2) is 
 select dateheuredebut,dateheurefin into DHD_Pause,DHF_Pause from kheops_heures_operateurs
   where datedemandenum = param1 and codeemploye = param2
   and not exists (select 'f' from kheops_cdc_horsproduction where kheops_cdc_horsproduction.code_cdc=kheops_heures_operateurs.code_cdc);
BEGIN
 
  OPEN MESEMPLOYES;
 
    LOOP
 
      -- passage de parametre date et employe en lisant le curseur
     FETCH MESEMPLOYES INTO MaDate,MonEmploye;
 
     DBMS_OUTPUT.PUT_LINE(MonEmploye||'    '||MaDate);
     -- Test si je n'ai plus rien a lire
     EXIT WHEN MESEMPLOYES%NOTFOUND;
 
  -- ouverture du deuxième curseur avec les param1 et param2 correspondant aux MaDate, MonEmploye
             open C_BIS (Madate,MonEmploye);
             LOOP
                  fetch C_bis into  var1, var2 ;
                  exit when c_Bis%notfound ;
                  dbms_output.put_line('affichage de resultats des var1, var2);
             end loop;
             close C_Bis ;
    END LOOP;
  CLOSE MESEMPLOYES;
 
END;

Ne pas oublier de déclarer les var1 et var2 (variables réceptrices du résultat de la requête C_BIS

Je vous conseille fortement de privilégier les FOR LOOP plutôt que les OPEN CURSOR quand c'est possible (c'est à dire quand il n'y a pas de curseur dynamique) : Plus rapide, plus fiable [gestion de fermeture de curseur automatique], plus lisible

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
BEGIN
 FOR r1 IN (SELECT datedemandenum,codeemploye FROM KHEOPS_HEURES_OPERATEURS WHERE datedemandenum = 20150630 GROUP BY datedemandenum,codeemploye)
 LOOP
   DBMS_OUTPUT.PUT_LINE(r1.codeemploye||'    '||r1.datedemandenum);
 
     FOR r2 IN (SELECT dateheuredebut,dateheurefin 
     	 FROM KHEOPS_HEURES_OPERATEURS a
         WHERE datedemandenum = r1.datedemandenum AND codeemploye = r1.codeemploye
         AND NOT EXISTS (SELECT 1 FROM KHEOPS_CDC_HORSPRODUCTION b WHERE b.code_cdc = a.code_cdc))
     LOOP
          dbms_output.put_line(r2.dateheuredebut ||' '|| r2.dateheurefin);
     END LOOP;
  END LOOP;
END;

Je suis tout à fait d'accord avec mnitu:

Citation:

Envoyé par mnitu

Faites des jointures c'est bien pour cela que les bases des données sont nées!

Je pense qu'on peut résoudre ce probème simplement avec une seule requête, comme ca:
Code:

1 2 3 4 5 6 7 8 9 10 SELECT dateheuredebut ,dateheurefin INTO dhd_pause ,dhf_pause FROM kheops_heures_operateurs WHERE datedemandenum = 20150630 AND NOT EXISTS (SELECT 1 FROM kheops_cdc_horsproduction WHERE kheops_cdc_horsproduction.code_cdc = kheops_heures_operateurs.code_cdc);
Je n'ai pas compris le 'f' dans la ligne original puisque le valeur ici n'importe rien. Peut-être que 'f' soit un valeur d'un champ de la table kheops_cdc_horsproduction

Code:

and not exists (select 'f' from kheops_cdc_horsproduction where kheops_cdc_horsproduction.code_cdc=kheops_heures_operateurs.code_cdc);

Il y a encore, je crois, d'utilisation non nécessaire de la table kheops_heures_operateurs. Elle est utilisé deux fois quand on besion seulement d'une fois.