procedure pl/sql, traitement des exceptions

[felosa]

bonsoir a tous ,
j'ai un petit probleme au niveau d'une procedure, je precise que je suis débutante
j'essaye en fait de chercher une personne a partir d'une procedure
voila mon 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
 
(champ IN VARCHAR2 DEFAULT  NULL)
 
 AS
 
cursor c_Recherche IS SELECT nom_per FROM Table_Personne; 
nbpers NUMBER(3);
aucun_personne EXCEPTION;
c1 c_Recherche%rowtype;
 
begin
 
--compte les personnes
SELECT COUNT(*) INTO nbpers FROM Table_Personne;
--si pas de personne, exception
IF nbpers = 0 then
RAISE aucun_personne;
end IF;
--Acces sequentiel a la table Table_Personne 
FOR c1 IN c_Recherche loop
htp.prn('NOM :'||c1.nom_per ||'</br>' 
);
end loop;
 
exception
when aucun_personne then
    htp.prn('ya pas d'enregistrement' 
);
 
end;

malhereusement ca me genere un message d'erreur
surement une erreur de syntaxe ! mais je vois pas ce que c'est si y'a quelqu'un qui peut m'aider svp
merci d'avance.

[7gyY9w1ZY6ySRgPeaefZ]

Code :

1
2
3
4
exception
when aucun_personne then
    htp.prn('ya pas d''enregistrement' 
);

Pour mettre un apostrophe dans une chaine, il faut mettre deux quotes.

[7gyY9w1ZY6ySRgPeaefZ]

Je ne vois pas l'intérêt de tester si tu as des personnes puisque s'il n'y en a pas, ton curseur ne fera rien de toute façon...

J'imagine que c'est pour tester des choses, parce que sinon, ta procédure est bien complexe pour pas grand chose.

[felosa]

non si y'a pas denregistrement j'ai juste un message d'erreur et pas une page vide !

[plaineR]

Envoyé par felosa

j'ai juste un message d'erreur

Et je suppose qu'il faut qu'on le devine ?

[orafrance]

ouais encore un jeu où faut lire dans les pensées du noyau Oracle à distance

[McM]

Dangereux le NUMBER(3) s'il y a plus de 999 lignes

Code :

1
2
nbpers NUMBER(3);
SELECT COUNT(*) INTO nbpers FROM Table_Personne;

Pour tester moi je préfère un

Code :

1
2
3
4
v NUMBER;
BEGIN
SELECT 1 INTO v FROM Table_Personne WHERE ROWNUM=1;
EXCEPTION WHEN NO_DATA_FOUND THEN RAISE aucun_personne; END;

[McM]

Et puis simplifions un peu toutes ces déclarations inutiles

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
CREATE OR REPLACE PROCEDURE AFFICHE_PERSONNE(champ IN VARCHAR2 DEFAULT  NULL)
IS
   nbpers NUMBER := 0;
BEGIN 
	--Acces sequentiel a la table Table_Personne 
	FOR c1 IN (SELECT nom_per FROM Table_Personne)
	LOOP
	   nbpers := nbpers + 1;
	   htp.prn('NOM :'|| c1.nom_per ||'</br>');
	END LOOP;
 
	IF nbpers = 0
	THEN
	    htp.prn('ya pas d''enregistrement');
 	END IF;
END;