Discussion :

[Prismadeath]

Tout d'abord bonjour à vous

Je vais tenter de vous expliquer au mieux mon problèmes. J'ai créé deux requêtes SQL, l'une depend de l'autre. La requête sera lancé par un script shell sous unix.

Je situe le contexte :

1) premièrement on liste les codes des company qui nous interessent

select code from amcompany where code in(select barcode from amempldept where slvl=0);


2) deuxiemement, pour chacun de ses codes on fait la requete suivante (exemple) :

update amempldept set lcompanyid=(select lcompanyid from amcompany where code='SB') where lcompanyid=0 and substr(fullname,2,instr(substr(fullname,2),'/')-1)='SB'


Ma question :
Est il possible de faire une boucle ou quelque chose de ce genre (pointeur je crois) pour faire ce type de traitement en un seul script ?

Si oui, pourriez vous m'aiguiller vers une solution, ou me fournir des sources permettant de m'enrichir vers cette voie ?

Merci à ceux qui ont pris le temps de me lire ! ^^
a+

[Xo]

Non, ce n'est pas possible en SQL, il faut utiliser le langage procédural de ton SGBD, en l'occurence le PL/SQL, et utiliser des curseurs.

Plus d'infos ici :
- Tous les cours Oracle : http://oracle.developpez.com/cours/
- Cours sur le PL/SQL : http://sheikyerbouti.developpez.com/pl_sql/
(cf le 1.2.22 en particulier)

[Prismadeath]

Tout d'abord grand merci.

Donc voilà ce que j'ai concocté, ça à l'air de fonctionner correctement.

Par contre, si vous voyez une abération n'hésitez pas à me le signaler ^^

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Declare
-- déclaration du curseur
CURSOR C_COMP IS
select code from amcompany where code in(select barcode from amempldept where slvl=0);
-- variables d'accueil 
LC$Code amcompany.code%Type;
 
Begin
Open C_COMP; -- ouverture du curseur
Loop -- boucle sur les lignes
Fetch C_COMP Into LC$Code; -- Lecture d'une ligne
update amempldept set lcompanyid=(select lcpyid from amcompany where code=LC$Code) where lcompanyid=0 and substr(fullname,2,instr(substr(fullname,2),'/')-1)=LC$Code; -- update
Exit When C_COMP%NOTFOUND; -- sortie lorsque le curseur ne ramène plus de ligne 
End loop;
Close C_COMP; -- fermeture du curseur
End;
/

[Magnus]

Par contre, si vous voyez une abération n'hésitez pas à me le signaler ^^

Je pense qu'il faut intervertir la ligne EXIT WHEN... et celle qui réalise l'UPDATE car lorsque C_COMP%NOTFOUND retourne True tu effectues quand même un UPDATE avant de quitter ta boucle.

D'ailleurs j'imagine que ton code doit te générer une erreur Oracle non ?

[Prismadeath]

Non je n'ai aucune bizarrement aucune erreur :/

Mais bon tu as raison, vaudrait mieux peut etre inverser ces deux lignes !

[dyvim]

Je te conseille d'utiliser une boucle FOR pour ton curseur cela devrait améliorer la lisibilité et te dispenser de ton EXIT...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
 Declare
 
CURSOR C_COMP IS
select code 
from amcompany 
where code in(select barcode 
                   from amempldept 
                   where slvl=0);
 
Begin
FOR C IN  C_COMP 
Loop
 
update amempldept 
set lcompanyid=(select lcpyid 
                      from amcompany 
                      where code=C.Code) 
where lcompanyid=0 
and   substr(fullname,2,instr(substr(fullname,2),'/')-1)=C.Code; 
 
End loop;
 
End;
/

Ceci dit un curseur pour des update peut représenter des problèmes de perf. Utiliser le SQL uniquement pourrait te faire gagner du temps.
De plus utiliser la fonction substr dans ta clause where (dans la partie gauche de ta clause) t'empêche d'utiliser les index...

[Yorglaa]

...De plus utiliser la fonction substr dans ta clause where (dans la partie gauche de ta clause) t'empêche d'utiliser les index...

... à moins de créer un index qui contient déjà la fonction !