Advertisement
Guest User

Untitled

a guest
Jul 21st, 2017
62
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
PL/SQL 1.70 KB | None | 0 0
  1. // CREACIÓN DE TABLA.
  2.  
  3.  
  4. CREATE TABLE auditoria (
  5.  
  6. nombre_usuario VARCHAR2(18),
  7.  
  8. modificacion VARCHAR2(50),
  9.  
  10. hora VARCHAR2(10),
  11.  
  12. fecha DATE,
  13.  
  14. clave_primaria_calle VARCHAR2(30) DEFAULT NULL,
  15.  
  16. clave_primera_numero NUMBER(3) DEFAULT NULL
  17.  
  18. );
  19.  
  20. // TRIGGER CREADO CORRECTAMENTE.
  21.  
  22. CREATE OR REPLACE TRIGGER ejer_auditoria
  23.  
  24.  
  25.  
  26. after INSERT OR DELETE OR UPDATE ON vivienda
  27.  
  28.  
  29.  
  30. FOR each ROW
  31.  
  32.  
  33.  
  34. DECLARE
  35.  
  36.  
  37.  
  38.     v_hora auditoria.hora%TYPE;
  39.  
  40.  
  41.  
  42. BEGIN
  43.  
  44.  
  45.  
  46.  
  47.  
  48.     IF inserting THEN
  49.  
  50.  
  51.  
  52.         INSERT INTO auditoria VALUES (USER, 'Insercion / Insert', TO_CHAR(SYSDATE, 'HH24:MI:SS'), SYSDATE, :NEW.calle, :NEW.numero);
  53.  
  54.  
  55.  
  56.     END IF;
  57.  
  58.  
  59.  
  60.     IF deleting THEN
  61.  
  62.  
  63.  
  64.         INSERT INTO auditoria VALUES (USER, 'Borrado / Delete', TO_CHAR(SYSDATE, 'HH24:MI:SS'), SYSDATE, :old.calle, :old.numero);
  65.  
  66.  
  67.  
  68.     END IF;
  69.  
  70.  
  71.  
  72.     IF updating THEN
  73.  
  74.  
  75.  
  76.         INSERT INTO auditoria VALUES (USER, 'Actualizacion / Update', TO_CHAR(SYSDATE, 'HH24:MI:SS'), SYSDATE, :NEW.calle, :NEW.numero);
  77.  
  78.  
  79.  
  80.     END IF;
  81.  
  82.  
  83.  
  84. END;
  85.  
  86. /
  87.  
  88. // TRIGGER CREADO CORRECTAMENTE 2.
  89.  
  90. CREATE OR REPLACE TRIGGER ejer_auditoria_2
  91.  
  92.  
  93.  
  94. after INSERT OR DELETE OR UPDATE ON bloquecasas
  95.  
  96.  
  97.  
  98. DECLARE
  99.  
  100.  
  101.  
  102.     v_hora auditoria.hora%TYPE;
  103.  
  104.  
  105.  
  106. BEGIN
  107.  
  108.  
  109.  
  110.  
  111.  
  112.     IF inserting THEN
  113.  
  114.  
  115.  
  116.         INSERT INTO auditoria VALUES (USER, 'Insercion / Insert', TO_CHAR(SYSDATE, 'HH24:MI:SS'), SYSDATE, NULL, NULL);
  117.  
  118.  
  119.  
  120.     END IF;
  121.  
  122.  
  123.  
  124.     IF deleting THEN
  125.  
  126.  
  127.  
  128.         INSERT INTO auditoria VALUES (USER, 'Borrado / Delete', TO_CHAR(SYSDATE, 'HH24:MI:SS'), SYSDATE, NULL, NULL);
  129.  
  130.  
  131.  
  132.     END IF;
  133.  
  134.  
  135.  
  136.     IF updating THEN
  137.  
  138.  
  139.  
  140.         INSERT INTO auditoria VALUES (USER, 'Actualizacion / Update', TO_CHAR(SYSDATE, 'HH24:MI:SS'), SYSDATE, NULL, NULL);
  141.  
  142.  
  143.  
  144.     END IF;
  145.  
  146.  
  147.  
  148. END;
  149.  
  150. /
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement