Ejercicios resueltos : Disparador de actualizacion

Problema:

Una librería almacena los datos de sus libros en una tabla denominada "libros" y controla las actualizaciones de los precios de los libros almacenando en la tabla "controlprecios", la fecha, el código del libro, el antiguo y nuevo precio. También controla cualquier otra actualización almacenando en "control" el nombre del usuario, la fecha y el código del libro.

Elimine las tablas:

 drop table controlprecios;
 drop table libros;
 drop table control;

Cree las tablas con las siguientes estructuras:

 create table libros(
  codigo number(6),
  titulo varchar2(40),
  autor varchar2(30),
  editorial varchar2(20),
  precio number(6,2),
  stock number(4)
 );

 create table control(
  usuario varchar2(30),
  fecha date,
  codigo number(6)
 );

 create table controlprecios(
  fecha date,
  codigo number(6),
  precioanterior number(6,2),
  precionuevo number(6,2)
 );

Ingrese algunos registros en "libros":

 insert into libros values(100,'Uno','Richard Bach','Planeta',25,100);
 insert into libros values(103,'El aleph','Borges','Emece',28,0);
 insert into libros values(105,'Matematica estas ahi','Paenza','Nuevo siglo',12,50);
 insert into libros values(120,'Aprenda PHP','Molina Mario','Nuevo siglo',55,200);
 insert into libros values(145,'Alicia en el pais de las maravillas','Carroll','Planeta',35,10);

Cree un trigger a nivel de fila que se dispare "antes" que se ejecute un "update" sobre la tabla "libros".

En el cuerpo del trigger se debe averiguar el campo que ha sido modificado; en caso de modificarse el "precio", se ingresa en la tabla "controlPrecios" la fecha, el código del libro y el antiguo y nuevo precio; en caso de actualizarse cualquier otro campo, se almacena en la tabla "control" el nombre del usuario que realizó la modificación, la fecha y el código del libro modificado.

 create or replace trigger tr_actualizar_libros
 before update
 on libros
 for each row
 begin
  if updating ('precio') then
   insert into controlprecios values(sysdate,:old.codigo,:old.precio,:new.precio);
  else
   insert into control values(user,sysdate,:old.codigo);
  end if;
 end tr_actualizar_libros;
 /

Actualice el precio de un libro:

 update libros set precio=35 where codigo=100;

Verifique que el trigger se ha disparado consultando la tabla "controlprecios":

 select *from controlprecios;

Se ha insertado una fila.

Verifique que la tabla "control" no tiene registros.

 select *from control;

Actualice un campo diferente de precio:

 update libros set stock=0 where codigo=145;

Verifique que el trigger se ha disparado consultando la tabla "control":

 select *from control;

Se ha insertado una fila.

Verifique que la tabla "controlprecios" no tiene nuevos registros:

 select *from controlprecios;

114 - Disparador de actualizacion - campos (updating)

Retornar