Bonjour ,

j'ai l'erreur suivante :
Error at line 1
ORA-06550: Ligne 20, colonne 13 :
PLS-00103: Symbole "LOOP" rencontré à la place d'un des symboles suivants :

if
pour le code suivant
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
 
BEGIN                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                   
DECLARE 
numclipot NUMBER;
codetypeppr NUMBER;                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                        
CURSOR c IS SELECT NUMCLIPO, DATEDEMA, NUMELIGN, CODEOPER, CODTYPPR, CODEPROV, CODECOMM, CODEREGI, CODECENT, CAPAFINA, MODEPAIE, DATLIMAC, CODNATVE, NUMEDOSS, DATECREA, CREE_PAR, DATEMODI, MODI_PAR                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                              
FROM V_PROSJERADA_COM_DET_DEM_ATTR ;                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                             
BEGIN
numclipot := 51000209;                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                             
FOR c1 IN c LOOP 
numclipot := numclipot+1; 
IF c1.CODTYPPR = 160 THEN codetypeppr := 164 ;
	ELSE IF c1.CODTYPPR = 1531 THEN codetypeppr := 164 ;
	ELSE IF c1.CODTYPPR = 143 THEN codetypeppr := 142 ;
	ELSE IF c1.CODTYPPR = 1534 THEN codetypeppr := 1533 ;
	ELSE IF c1.CODTYPPR = 1535 THEN codetypeppr := 1521;
END IF;                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                    
INSERT INTO COM_DET_DEMAND_ATTR@DBL_VM VALUES(numclipot, c1.DATEDEMA, c1.NUMELIGN, 13111, codetypeppr, c1.CODEPROV, c1.CODECOMM, c1.CODEREGI, c1.CODECENT, c1.CAPAFINA, c1.MODEPAIE, c1.DATLIMAC, c1.CODNATVE, NULL, '04/08/2010', 'OMRANE', c1.DATEMODI, c1.MODI_PAR );
DBMS_OUTPUT.PUT_LINE  ('NUMECLIPP ' || numclipot || ' -++- ' || c1.DATEDEMA || ' -++-' ||  c1.CODTYPPR);                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                       
END LOOP;                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                               
END; 
END;
je crois que toute les instructions sont à leurs place mais bon , l'erreur vient.