Discussion :

[mederik]

Bonjour,

voici un petit script simple mais dans lequel j'ai trouvé moyen de faire (manifestement) des erreurs puisque j'ai les messages suivants en sortie :

Error starting at line 1 in command:
Error report:
ORA-06550: Ligne 9, colonne 34 :
PL/SQL: ORA-00933: la commande SQL ne se termine pas correctement
ORA-06550: Ligne 4, colonne 1 :
PL/SQL: SQL Statement ignored
ORA-06550: Ligne 11, colonne 4 :
PLS-00103: Symbole ";" rencontré à la place d'un des symboles suivants :

loop
06550. 00000 - "line %s, column %s:\n%s"
*Cause: Usually a PL/SQL compilation error.
*Action:

Voici mon script :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
BEGIN
FOR record_temp IN (SELECT DISTINCT CONNUM, CORLFI ,COACMN,COETBT ,COIPTE FROM tmsmdc2 where cerdge=2000000)
LOOP 
update tmsmdc2 c2 set c2.cerdge= 1101010
where c2.CONNUM=record_temp.CONNUM
and c2.CORLFI=record_temp.CORLFI
and c2.COACMN=record_temp.COACMN
and c2.COETBT=record_temp.COETBT
and c2.COIPTE=record_temp.COIPTE
END LOOP;
END;

Quelqu'un pour un peu d'aide encore ?

Merci d'avance

Mederik

[Waldar]

Chaque instruction doit se terminer par un point virgule.

Le tout premier message d'erreur vous indique un emplacement clef :

ORA-06550: Ligne 9, colonne 34 :
PL/SQL: ORA-00933: la commande SQL ne se termine pas correctement

[McM]

Pour l'erreur Waldar a répondu, mais normalement, le loop ne sert à rien, un simple update suffit.

Code :

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

1
2
3
4
5
UPDATE tmsmdc2
SET cerdge= 1101010
WHERE (CONNUM, CORLFI, COACMN, COETBT, COIPTE) 
IN (SELECT DISTINCT CONNUM, CORLFI ,COACMN, COETBT, COIPTE 
		FROM tmsmdc2 WHERE cerdge=2000000);

ou

Code :

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

1
2
3
4
5
6
7
8
9
UPDATE tmsmdc2 a
SET cerdge= 1101010
WHERE EXISTS (SELECT 1 FROM tmsmdc2 b
	WHERE b.CONNUM=a.CONNUM
	AND b.CORLFI=a.CORLFI
	AND b.COACMN=a.COACMN
	AND b.COETBT=a.COETBT
	AND b.COIPTE=a.COIPTE
	AND b.cerdge=200000);

[mnitu]

...

Code :

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

1
2
3
4
5
UPDATE tmsmdc2
SET cerdge= 1101010
WHERE (CONNUM, CORLFI, COACMN, COETBT, COIPTE) 
IN (SELECT DISTINCT CONNUM, CORLFI ,COACMN, COETBT, COIPTE 
		FROM tmsmdc2 WHERE cerdge=2000000);

...

Pas besoin de distinct.

Plus simple

Code :

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

1
2
3
4
 
UPDATE tmsmdc2
SET cerdge= 1101010
WHERE cerdge=2000000

[McM]

Plus simple

Code :

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

1
2
3
4
 
UPDATE tmsmdc2
SET cerdge= 1101010
WHERE cerdge=2000000

Euh .. Non, tu peux très bien avoir ce cas :

Code :

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

1
2
3
CONNUM	CORLFI	COACMN	COETBT	COIPTE	cerdge
1	1	1	1	1	200000
1	1	1	1	1	0

[mnitu]

Euh .. Non, tu peux très bien avoir ce cas :
...

C’est un cas qui visiblement m’a échappé.