Discussion :

[betty33]

Bonjour à tous,

Voilà mon code :

for rec in (select code, libelle from tb_marques ) loop
Textesql := 'select count(distinct code)/'||nbcli||' '||
' from ventes_marques v, clients_marque c '||
' where codemarque = '''||rec.code||''' '||
'and v.codeclient=c.codeclient ';
Execute immediate Textesql into rec.libelle
end loop;

Savez vous comment écrire ça ? (ce qui est en rouge).
en gros à chaque tour de boucle je voudrais insérer le résultat dans une nouvelle variable (donc le nom de ma variable est variable...)

Merci pour vos réponses

[SheikYerbouti]

Les variables de curseur sont en lecture seule. Vous n'avez aucune chance de pouvoir en écraser le contenu.

[McM]

Les variables de curseur sont en lecture seule. Vous n'avez aucune chance de pouvoir en écraser le contenu.

Non, on peut les réaffecter

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
DECLARE
	CURSOR c IS SELECT 1 AS a FROM dual;
BEGIN
	FOR r IN c
    LOOP
    	DBMS_OUTPUT.PUT_LINE(r.a);
        r.a := 2;
        DBMS_OUTPUT.PUT_LINE(r.a);
    END LOOP;
END;
 
1
2

[SheikYerbouti]

Ok, j'ai rien dis

[McM]

Par contre,

donc le nom de ma variable est variable

Ca ne marchera jamais.
Tu ne peux pas considérer une valeur d'une variable comme étant une variable (je ne connais aucun langage qui l'accepte)

Quel est le but ?

[fatati]

Bonjour,

Normalement pour ton code lui manque une instruction 'Fetch'
donc je pense que ça va marcher si tu mis:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
v_rec                   rec%rowtype;
for rec in (select code, libelle from tb_marques ) 
loop
    fetch rec into v_rec;
    Textesql := 'select count(distinct code)/'||nbcli||' '||
    ' from ventes_marques v, clients_marque c '||
    ' where codemarque = '''||rec.code||''' '||
    'and v.codeclient=c.codeclient '; 
Execute immediate Textesql into v_rec.libelle
end loop;

n'est ce pas?
Bonne journée

[McM]

Pas du tout
Le FETCH c'est si tu utilises le OPEN
Avec le FOR LOOP, pas de fetch, pas de close, c'est mieux.

[betty33]

Merci pour vos réponses,
voilà comment je m'en suis sortie :

Code :

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

1
2
3
4
5
6
7
8
9
for rec in (select code,libelle from tb_marques) loop
Textesql := 
Textesql||' (select count(distinct v.codeclient)/'''||nbcli||'''*100 '||
' from ventes_marques v, clients_marque c '||				' where codemarque = '''||rec.code||''' '||
'and v.codeclient=c.codeclient) '||Rec.libelle||',';
end loop;
Textesql := substr(Textesql,1,length(Textesql)-1);
Textesql := Textesql||' FROM DUAL';
execute immediate Textesql;

C'est pas exactement ce que je voulais, donc si qqn sait le faire je suis preneuse.

@+

[McM]

A quoi sert l'EXECUTE IMMEDIATE de ton premier post ?
C'est pas plus simple de faire comme ceci

Code :

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

1
2
3
4
5
6
7
8
9
FOR rec IN (
	SELECT t.libelle, COUNT(DISTINCT code) / nbcli * 100
	FROM ventes_marques v, clients_marque c, tb_marques t
	WHERE codemarque = t.code
	AND v.codeclient = c.codeclient
	GROUP BY t.libelle)
LOOP
	IF rec.libelle =  THEN ...
END LOOP;