Discussion :

[SimFaridas]

Bonjour,

Je travail sur un projet et je dois détecter si une erreur à lieu sur ce script
voici un exemple du code

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
 
--SET HEADING OFF FEEDBACK OFF ECHO OFF PAGESIZE 400
--spool "backup_specifique_enviro.log"; 
 
DROP TABLE sys.param_machine_tempo;
DROP TABLE sys.parametres_tempo;
DROP TABLE sys.directories_tempo ;
 
CREATE TABLE sys.param_machine_tempo as (select * from arthus.param_machine);
 
CREATE TABLE sys.parametres_tempo as (select * from arthus.parametres);
 
CREATE TABLE sys.directories_tempo as 
(select trim('CREATE OR REPLACE DIRECTORY '||DIRECTORY_NAME ||' AS '''|| DIRECTORY_PATH|| '''') as script 
  from ALL_directories);
 
spool off;
 
exit;

Où puis-je placer une détection d'erreur étant donné que je n'est pas de begin end

Merci d'avance

[Ikebukuro]

Et si tu crées un .sql de ce genre? Je te laisse voir où tu dois mettre ton code

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
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
SET serveroutput ON
SET verify OFF
SET feedback OFF
 
DECLARE
v_n_nb  NUMBER(5);
v_n_salaire_saisi NUMBER(8);
 
excep_nb_zero EXCEPTION;
excep_nb_multi EXCEPTION;
 
BEGIN
v_n_salaire_saisi := '&Salaire'; --L'utilisateur saisi un salaire.
 
 
/* Début script applicatif */
SELECT count(*) INTO v_n_nb FROM employees WHERE salary=v_n_salaire_saisi;
 
if v_n_nb = 0 then
        RAISE excep_nb_zero;
elsif v_n_nb = 1 then
        INSERT INTO messages SELECT first_name || ' ' || last_name || ' ' || v_n_salaire_saisi || '.' from EMP WHERE salary = v_n_salaire_saisi;
elsif v_n_nb > 1 then
        RAISE excep_nb_multi;
end if;
 
/* Fin script applicatif */
 
EXCEPTION
WHEN excep_nb_zero THEN
        INSERT INTO messages VALUES('Pas d''employee avec le salaire ' || v_n_salaire_saisi || '.');
WHEN excep_nb_multi THEN
        INSERT INTO messages VALUES('Plus d''un employee avec le salaire ' || v_n_salaire_saisi || '.');
WHEN OTHERS THEN
        INSERT INTO messages VALUES('Une erreur est survenue.'); --A tester en saisissant des lettres au lieu d'un nombre pour le salaire.
END;
/

[skuatamad]

Qu'est ce que vous souhaitez faire exactement ? Quel comportement ?
C'est une très mauvaise idée que de créer des objets dans SYS.

[Ikebukuro]

C'est une très mauvaise idée que de créer des objets dans SYS.

Ah oui, je plussoie, c'est vertement déconseillé par Oracle

[pachot]

Bonjour,
Sous SQL*Plus, WHENEVER SQLERROR EXIT FAILURE va stopper à la première erreur. Il y a moyen de préciser différents codes retour.
Cordialement,
Franck.

[Ikebukuro]

Et de façon plus précise, qu'est-ce que tu entends par "détection d'erreur" et qu'est-ce que tu veux faire de cette erreur une fois détectée : affichage de l'erreur, arrêt du programme, traitement spécifique à cette erreur...?

[SimFaridas]

Merci pour vos réponse.

Ce que je veux dire c'est que en mettant begin et end une erreur ce crée :

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
23
24
25
 
begin
--SET HEADING OFF FEEDBACK OFF ECHO OFF PAGESIZE 400
--spool "backup_specifique_enviro.log"; 
 
DROP TABLE sys.param_machine_tempo;
DROP TABLE sys.parametres_tempo;
DROP TABLE sys.directories_tempo;
 
CREATE TABLE sys.param_machine_tempo as (select * from arthus.param_machine);
 
CREATE TABLE sys.parametres_tempo as (select * from arthus.parametres);
 
CREATE TABLE sys.directories_tempo as 
(select trim('CREATE OR REPLACE DIRECTORY '||DIRECTORY_NAME ||' AS '''|| DIRECTORY_PATH|| '''') as script 
  from ALL_directories);
 
exception
when other then
insert_hib('Etape backup_s_e',5,'');
 
--spool off;
end;
/
exit;

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
 
Rapport d'erreur -
ORA-06550: Ligne 5, colonne 1 :
PLS-00103: Symbole "DROP" rencontré à la place d'un des symboles suivants :
 
   begin case declare exit for goto if loop mod null pragma
   raise return select update while with <identificateur>
   <identificateur entre guillemets> <variable bind> << close
   current delete fetch lock insert open rollback savepoint set
   sql execute commit forall merge pipe
Symbole "lock inséré avant "DROP" pour continuer.
ORA-06550: Ligne 5, colonne 35 :
PLS-00103: Symbole ";" rencontré à la place d'un des symboles suivants :
 
   . , @ in <identificateur> <identificateur entre guillemets>
   partition subpartition
06550. 00000 -  "line %s, column %s:\n%s"
*Cause:    Usually a PL/SQL compilation error.
*Action: