Discussion :

[Cirtadz]

il n'affiche aucun message malgré il y a set serveroutput on
je travaille sous sql dev
il m'affiche rien , il execute la requete de suppression mais aucun message est affiché
j'ai essayé sous sql*plus , rien aussi il me dit 0 lignes supprimées

même chose soit avec if rowcount=0 then .....ou non

il y a une erreur quelque part
j'ai essayé une exemple pour assurer que le dbms_output marche bien

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
declare 
  vno number;
begin
  select empno into vno from v_emp
  where empname='imh';
  exception
  when no_data_found then
  dbms_output.put_line('erreur erreur');
end;

il affiche le message sans problème

[guizaniseifislam]

Bonjour,
voici mon trigger:

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
create or replace trigger tr_delete
instead of DELETE ON v_emp
FOR each row
Declare
  Exp Exception;
Begin
 
  If :Old.Empno > 100 Then
    Delete From Emp2 Where Empno = :Old.Empno;
  Else
    Delete From Employer Where Empno = :Old.Empno;
  End If;
  If Sql%Rowcount = 0 Then
    Dbms_Output.Put_Line('aucune ligne supprimée ' || Sql%Rowcount);
  Else
    Dbms_Output.Put_Line(Sql%Rowcount || ' lignes supprimées');
  End If;
End;

si j'utilise ces données:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
insert into EMP2 (EMPNO, EMPNAME, NO_TEL, DATE_NAISS, SALAIRE, DEPTNO)
values (120, '120', '120', to_date('19-02-2009', 'dd-mm-yyyy'), 1500, 1);
insert into EMPLOYER (EMPNO, EMPNAME, NO_TEL, DATE_NAISS, SALAIRE, DEPTNO)
values (1, '1', '1', to_date('19-02-2009', 'dd-mm-yyyy'), 1500, 1);
insert into EMPLOYER (EMPNO, EMPNAME, NO_TEL, DATE_NAISS, SALAIRE, DEPTNO)
values (120, '120', '120', to_date('19-02-2009', 'dd-mm-yyyy'), 1500, 1);
commit;

j'aurais ces lignes au niveau de v_emp:

EMPNO...EMPNAME...NO_TEL...DATE_NAISS...SALAIRE...DEPTNO
1..........1..............1............19/02/2009.....1500........1
120.......120...........120.........19/02/2009.....1500........1
120.......120...........120.........19/02/2009.....1500........1

ok j'usquà présent.

si je fais:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
SQL> delete v_emp v where v.EMPNO = 1;
 
1 lignes supprimées
 
1 row deleted

et si je fais:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
SQL> delete v_emp v where v.EMPNO = 120;
 
1 lignes supprimées
aucune ligne supprimée 0
 
2 rows deleted

bon, peut être moi aussi j'ai pas bien compris ce résultat.
A vous de jouer Mr Yerbouti, peut être tu as une explication

[Cirtadz]

et ça affiche aussi trés bien
la ligne bien sûr n'existe pas

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
declare 
  vno number;
begin
  delete from v_emp where empno=456;
  if sql%rowcount=0 then
    dbms_output.put_line('erreur erreur');
    end if;
 
end;

et

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

DELETE FROM v_emp WHERE empno=456;

n'affiche rien

[Cirtadz]

bon, peut être moi aussi j'ai pas bien compris ce résultat.

j'ai essayé ton trigger
il m'affiche

1 lignes supprimées
0 lignes supprimées

lorsque je supprime une ligne existe
mais lorsque je veux supprimer une lignes qui n'existe pas il m'affiche rien
pourquoi ???

[SheikYerbouti]

Faut avouer que votre test est tordu. Si EMP > 100 alors vous supprimez dans EMP2, sinon dans EMPLOYEUR, hors vous n'avez qu'une seule ligne à EMP=120 dans la table EMP2....

Peut-être pourriez-vous faire vos armes avec des cas plus simples....

[guizaniseifislam]

j'ai utilisé ce trigger:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
create or replace trigger tr_delete
instead of DELETE ON v_emp 
FOR each row
Begin
  Dbms_Output.Put_Line('xxxx');
End;

et si je fais:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
delete v_emp v where v.EMPNO = 1200;
 
0 rows deleted

je crois que le trigger ne se déclenche pas dans le cas où il n'y a aucune ligne à supprimer de la vue.
je ne suis pas sûr de cette information mais d'après le résultat!!!!

[Cirtadz]

je pense que la discussion est compliquée

on revient à le probème principal

pourquoi ça affiche le message

declare
vno number;
begin
DELETE FROM v_emp WHERE empno=456;
IF sql%rowcount=0 then
dbms_output.put_line('erreur erreur');
end IF;

end;

et ça non

DELETE FROM v_emp WHERE empno=456;

il y a le trigger de suppression contient

IF sql%rowcount=0 then
dbms_output.put_line('erreur erreur');
end IF;

[Cirtadz]

0 rows deleted affiche soit il y a un trigger ou non

je pense que oui , c'est pourquoi il m'affiche pas le message si je veux supprimer une ligne qui n'existe pas non ??

[guizaniseifislam]

"0 rows deleted" c'est ORACLE qui l'affiche mais ton message ne s'affiche pas car il n'y a aucune ligne à supprimer de la vue qui va obliger ton trigger à se déclencher.
ok?

[GoLDoZ]

je pense que la discussion est compliquée

on revient à le probème principal

pourquoi ça affiche le message



et ça non



il y a le trigger de suppression contient

Pourquoi voulez-vous mettre un dbms_output dans un trigger?

[SheikYerbouti]

La discussion est effectivement compliquée car à chaque fois, vous introduisez une partie de code différente. Désolé, mais je me retire ...

[Cirtadz]

"0 rows deleted" c'est ORACLE qui l'affiche mais ton message ne s'affiche pas car il n'y a aucune ligne à supprimer de la vue qui va obliger ton trigger à se déclencher.
ok?

c'est que je cherche , le trigger ne déclenche pas s'il y a pas une ligne
delete from v_emp where empno= 456 , 456 n'existe pas donc aucun utilité de mettre une exception qui va traiter ce cas

Pourquoi voulez-vous mettre un dbms_output dans un trigger?

pour traiter mon exception

[Cirtadz]

La discussion est effectivement compliquée car à chaque fois, vous introduisez une partie de code différente. Désolé, mais je me retire ...

Why ?

je veux seulement que si la ligne à supprimer n'existe pas , il m'affiche un message perso

[GoLDoZ]

Mettre un dbms_output dans un trigger n'est pas très propre. Et je ne suis pas sûr que la sortie dbms d'un trigger se situe au niveau de la procédure.

La vraie question est de savoir si un trigger INSTEAD OF DELETE se déclenche s'il n'y a aucune ligne à supprimer. Un rapide test permettrait de le savoir.


EDIT: je viens de faire le test avec trigger AFTER DELETE. Le dbms s'affiche bien dans le cas où il y a une ligne à supprimer. Rien dans le cas de 0 ligne.
Idem pour un BEFORE DELETE.

Il semblerait donc qu'avant de déclencher un trigger, Oracle vérifie s'il y a vraiment une insertion/suppression/mise à jour à faire.
Je ne peux tester avec un INSTEAD OF, mais je ne vois pas de raison pour que cela fonctionne différemment.

[SheikYerbouti]

Vu qu'il s'agit d'une trigger FOR EACH ROW, il se déclenchera sur toute ligne pouvant être supprimée. Il est donc évident qu'il ne se déclenchera pas si aucune ligne ne peut être supprimée.

[Cirtadz]

Mettre un dbms_output dans un trigger n'est pas très propre. Et je ne suis pas sûr que la sortie dbms d'un trigger se situe au niveau de la procédure.

La vraie question est de savoir si un trigger INSTEAD OF DELETE se déclenche s'il n'y a aucune ligne à supprimer. Un rapide test permettrait de le savoir.

je doute sur ça, je pense qu'il ne déclenche pas, donc pas besoin de traiter une exception

pour l'insertion je vais essayer

[Cirtadz]

Vu qu'il s'agit d'une trigger FOR EACH ROW, il se déclenchera sur toute ligne pouvant être supprimée. Il est donc évident qu'il ne se déclenchera pas si aucune ligne ne peut être supprimée.

même sans for each roc ne déclenchera pas

[GoLDoZ]

Conclusion: vous devez traiter cette exception dans votre procédure principale et non dans le trigger.

[guizaniseifislam]

je crois que le problème est résolu mainant.

[Cirtadz]

oui merci mais j'ajoute autre problème
le trigger update ne fonctionne pas
je ne trouve aucune erreur

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
create or replace
trigger tr_update
instead of update on v_emp
for each row
begin
  if :old.empno > 100 then
    update emp2 set empname=:new.empname,no_tel=:new.no_tel, date_naiss=:new.date_naiss,
            salaire=:new.salaire, deptno=:new.deptno
            where empno=:old.empno;
    else
    update employer set empname=:new.empname,no_tel=:new.no_tel, date_naiss=:new.date_naiss,
            salaire=:new.salaire, deptno=:new.deptno
            where empno=:old.empno;
    end if;
end;