ANDREQUIEREPACKS

-- PROCEDIMIENTO DEVOLUCION PRODUCTO
CREATE OR REPLACE PROCEDURE devolucionProducto
(IDPRODUCTOIN IN NUMBER, ID_DET IN NUMBER, MOTIV IN VARCHAR2, CANT IN NUMBER) IS
AUX NUMBER;
BEGIN
--actualizar tabla almacen
UPDATE ALMACEN
SET CANTIDAD = CANTIDAD + 1
WHERE IDPRODUCTO = 1001;

--obtener siguiente idnotadecredito
SELECT NVL(MAX(ID_NOTA_CRED) + 1, 1) INTO AUX
FROM NOTA_DE_CREDITO;

INSERT INTO NOTA_DE_CREDITO
VALUES (AUX,CANT,ID_DET,MOTIV,SYSDATE);

END;

--
CREATE OR REPLACE TRIGGER T1
AFTER UPDATE OF CANTIDAD ON ALMACEN
DECLARE
siguienteCodigo NUMBER;
BEGIN
--obtener siguiente idAuditoria
SELECT NVL(MAX(IDAUDITORIA) + 1, 1) INTO siguienteCodigo
  FROM AUDITORIA;
INSERT INTO AUDITORIA (IDAUDITORIA,FECHA,OBSERVACION,IDPEDIDO,IDPRODUCTO)
VALUES (siguienteCodigo,SYSDATE, 'Se hizo la devolucion del producto',NULL,NULL);
END;