1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23
| create or replace TRIGGER SUP_COMMANDE
before delete on ENTETE_COMMANDE
for each row
declare
result varchar2(2000);
nomFT varchar2(25);
NUM_COMMANDE varchar2(20);
four varchar2(6);
begin
declare
begin
select CODE_FOURNISSEUR into four from LIGNE_COMMANDE where NUMERO_COMMANDE=:old.NUMERO_COMMANDE;
exception
when no_data_found then
???????
/* on arrête le traitement */
end;
NUM_COMMANDE := :old.NUM_CHRONO_COMMANDE;
select replace(LIBELLE_FOURNISSEUR,'''','''''') into nomFT from FOURNISSEUR where CODE_FOURNISSEUR = FOUR;
result := 'COMMANDE( ''S'','''||NUM_COMMANDE||''','''||four||''','''||nomFT||''') ';
insert into TRACE_TRIGGER (ENTRY,COMMAND) values('COMMANDE',result);
end;
/ |