[PL SQL] Problème avec 'case' dans une fonction

Version imprimable

Je réalise une fonction en pl/sql sous Oracle et j'utilise un "case...when".
Voici la partie de mon code:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
 
FUNCTION GET_LIBELLE_ATTRIBUT
(
 ID_ATTRIBUT IN NUMBER
) RETURN VARCHAR2
IS
  LIBELLE_ATTRIBUT VARCHAR2;
BEGIN
	 CASE ID_ATTRIBUT
	 	  when 1 LIBELLE_ATTRIBUT = 'libelle_1';
		  when 2 LIBELLE_ATTRIBUT = 'libelle_2';
	 end case;
RETURN(LIBELLE_ATTRIBUT);
END;

J'obtiens l'erreur suivante a cause du 'case':

Code:

1
2
3
4
5
 
 
PLS-00103: Symbole "CASE" rencontré à la place d'un des symboles suivants :
 
   begin declare exit for goto if loop mod null pragma raise...

D'avance merci.

13/03/2006, 10h47
Yorglaa
Salut,
à mon avis il manque les THEN
Code:

1 2 3 4 5 6 Case ... When ... THEN ... When ... THEN ... End Case ;
au fait, attention, l'attribution de valeurs à une variable se fait avec := et pas juste =
13/03/2006, 10h53
McM

On peut faire un CASE hors d'un SELECT ?
Après vérif : OUI.

Pourquoi ne pas faire un IF ?

J'ai modifié ma fonction mais j'ai toujours l'erreur...
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 FUNCTION GET_LIBELLE_ATTRIBUT ( ID_ATTRIBUT IN NUMBER ) RETURN VARCHAR2 IS LIBELLE_ATTRIBUT VARCHAR2(100); BEGIN CASE ID_ATTRIBUT when 1 then LIBELLE_ATTRIBUT := 'libelle_1'; when 2 then LIBELLE_ATTRIBUT := 'libelle_2'; end case; RETURN(LIBELLE_ATTRIBUT); END;
Par ailleurs, j'aimerais utiliser un case plutot qu'un if puisque j'aurais pas mal de valeurs disctinctes et que je trouve cela plus propre.

13/03/2006, 11h25
pifor

Il faut une clause ELSE obligatoire. Et il faut aussi avoir Oracle 9i.
Est-ce le cas ?

et si tu essayes comme ceci :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
FUNCTION GET_LIBELLE_ATTRIBUT 
( 
 ID_ATTRIBUT IN NUMBER 
) RETURN VARCHAR2 
IS 
  LIBELLE_ATTRIBUT VARCHAR2(100); 
BEGIN 
    CASE 
        when ID_ATTRIBUT  = 1 
            then LIBELLE_ATTRIBUT := 'libelle_1'; 
        when ID_ATTRIBUT  = 2 
            then LIBELLE_ATTRIBUT := 'libelle_2'; 
    end case; 
RETURN LIBELLE_ATTRIBUT; 
END;

@pifor
NON, pas besoin de ELSE ! :nono:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
create or replace function test ( val in number) return varchar2
AS
    RetVal  Varchar2(10) ;
Begin
    Case
        When val = 1
            Then RetVal := 'un' ;
        When val = 2
            Then RetVal := 'deux' ;
    End Case ;
 
    Return RetVal ;
End ;

Fonctionne très bien (9.2.0.6)...

Citation:

SQL> select test(2) from dual ;

TEST(2)
--------------------------------
deux

Ecoulé : 00 :00 :00.00

13/03/2006, 11h34
divail

Ma version d'oracle est la 8.1.7.4. Le 'case' ne marche pas avec cette version?
13/03/2006, 11h40
Yorglaa

Hélas non, pas en PL/SQL

tu peux l'utiliser dans du SQL standard, mais l'intégration au PL/SQL n'est possible que depuis la 9i.

Il va falloir alors passer par le If.

désolé ! :cry:
13/03/2006, 11h43
divail

Ok merci pour ces réponses. Je vais utiliser le if.

Citation:

Envoyé par Yorglaa

@pifor
NON, pas besoin de ELSE ! :nono:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
create or replace function test ( val in number) return varchar2
AS
    RetVal  Varchar2(10) ;
Begin
    Case
        When val = 1
            Then RetVal := 'un' ;
        When val = 2
            Then RetVal := 'deux' ;
    End Case ;
 
    Return RetVal ;
End ;

Fonctionne très bien (9.2.0.6)...

Citation:

SQL> select test(2) from dual ;

TEST(2)
--------------------------------
deux

Ecoulé : 00 :00 :00.00

Code:

1
2
SQL> select test(3) from dual ;
ORA-06592: CASE not found while executing CASE statement

Code:

1
2
3
4
5
6
7
CASE
        WHEN val = 1
            THEN RetVal := 'un' ;
        WHEN val = 2
            THEN RetVal := 'deux' ;
		ELSE RetVal := 'pas trouvé' ;
    END CASE ;

13/03/2006, 14h41
Yorglaa

OK...
mais là tu parle de gestion des exception, et pas de la fonctionnalité CASE elle-même. Qui, elle, fonctionne très bien sans le ELSE !

Pas de ELSE...

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
create or replace function test ( val in number) return varchar2 
AS 
    RetVal  Varchar2(10) ; 
Begin 
    Case 
        When val = 1 
            Then RetVal := 'un' ; 
        When val = 2 
            Then RetVal := 'deux' ; 
    End Case ; 
 
    Exception
    When others
        Then RetVal := 'Rien' ;
 
    Return RetVal ; 
End ;

Citation:

SQL> select test(3) from dual;

TEST(3)
--------------------------------------
Rien

13/03/2006, 15h25
McM

Il y a quand même une différence entre un else et une exception qui catche tout, même les autres erreurs ORA.
13/03/2006, 15h50
Yorglaa

bien sûr !!

mais je te rappelle qu'ici c'est un EXEMPLE...
donc le when Others est en effet un peu large... tu pourrais aussi faire ta propre exception qui catche uniquement la ORA-06592 (avec un pragma init_exception), ou encore "faire planter" l'appli avec une erreur spécifiquement dédié à ça avec un raise_application_error, ou encore envoyer un mail avec utl_smtp, ou encore... mais les options ne manquent pas !

Mais par contre tu peux aussi VOULOIR que ta fonction plante si tu ne donne pas une des valeurs voulues en paramètre.

j'en reviens à ce que je disais précédement, rien n'empêche TECHNIQUEMENT le Case de fonctionner sans clause else !!!

alors ne mélangeons pas tout. Les problèmes de conception, d'algo ou gestion des exceptions n'ont strictement rien à voir avec une éventuelle limitation technique d'une ou l'autre syntaxe !