U
Classified in Computers
Written at on 
English with a size of 3.01 KB.
CREATE OR REPLACE TRIGGER hola
AFTER
INSERT OR UPDATE OR DELETE
ON PRODUCTS
FOR EACH ROW
IF INSERTING THEN
UPDATE SUPPLIER S SET S.N_produ = S.N_produ + 1
WHERE S.N_produ = :NEW. S.N_produ;
END IF;
IF UPDATING THEN
UPDATE supplier S SET S.N_produ = S.N_produ + 1
WHERE S.N_produ = :NEW. S.N_produ;
UPDATE supplier S SET S.N_produ = S.N_produ - 1
WHERE S.N_produ = :OLD. S.N_produ;
END IF;
IF DELETING THEN
UPDATE supplier D SET D.Id = D.Eid - 1 WHERE D.ID = :OLD.D.ID;
END IF;
END;
_______________________________________________________________________________create procedure Actualiza_2 ( )
IS
BEGIN
update supplier set N_prod = (select count (*)
from products
WHERE product.Id = supplier.Id)
_______________________________________________________________________________
create procedure Actualiza_3 (S_id )
IS
BEGIN
update supplier S1 set N_prod = (select count (*)
from products
WHERE product.Id = S1.Id)
where S1.Id= S_id