Erreur introuvable dans le code

Salut,

Quelqu'un peut il m'aider a retrouver ou se cache l'erreur dans ce petit bout de code :

Code:

---

1 2 3 4 5 6 7 8 9 10 11

ACCEPT s_numero PROMPT 'entrez le numero'; declare begin if substr(&s_numero,1,3)='089' then dbms_output.put_line('vous utilisez tigo') elseif substr(&s_numero,1,3)='081' then dbms_output.put_line('vous utilisez vodacom') else dbms_output.put_line('vous utilisez airtel') end if end;

---

Merci pour vos reponses

S'il y a une erreur, il y a certainement un message d'erreur qui l'accompagne...
Quel est-il ?

Bonjour,

Après un examen sommaire, voici ce que j'ai relevé :
* il faut des point-virgules après chaque appel de dbms_output.put_line
* il faut aussi un point virgule après END IF
* il faut écrire elsif au lieu de elseif

Plus lisible avec des 'CASE'

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

/* Formatted on 15/11/2013 09:48:59 (QP5 v5.256.13226.35510) */ DECLARE BEGIN CASE substr( :s_numero, 1, 3) WHEN '089' THEN DBMS_OUTPUT.put_line ('vous utilisez tigo'); WHEN '081' THEN DBMS_OUTPUT.put_line ('vous utilisez vodacom'); ELSE DBMS_OUTPUT.put_line ('vous utilisez airtel'); END CASE; END;

---