--=====================================================================
-- Sistemas Integrados TECNISA
--
--=====================================================================
-- @H:\SISTEMAS\DBA\SQL\ORACLE\1250_COCTRG_LOGPRODUTO.SQL
--=====================================================================

CREATE OR REPLACE TRIGGER GRAVA_LOGPRECO
AFTER UPDATE
ON PRODUTOAP FOR EACH ROW
DECLARE
	V_NRSEQLOG NUMBER;

BEGIN
  SELECT NVL(MAX(TO_NUMBER(NRSEQLOG)),0)+1
  INTO V_NRSEQLOG
  FROM LOGPRODUTOAP;

  INSERT INTO LOGPRODUTOAP
    (NRSEQLOG,CDFILIAL1,CDPRODUTO1,DTCUSTOAP1,VRMEDLIQAP1,VRMEDBRUAP1,
     VRULTCLIQAP1,VRULTCBRUAP1,VRMEDLIQAP1A,VRMEDBRUAP1A,VRULTCLIQAP1A,
     VRULTCBRUAP1A,DTHRIMPCUST1,CDOPIMPCUST1,DTHRALTCUST1,CDOPALTCUST1)
  VALUES
    (V_NRSEQLOG,:OLD.CDFILIAL,:OLD.CDPRODUTO,:OLD.DTCUSTOAP,:OLD.VRMEDLIQAP,:OLD.VRMEDBRUAP,
     :OLD.VRULTCLIQAP,:OLD.VRULTCBRUAP,:NEW.VRMEDLIQAP,:NEW.VRMEDBRUAP,:NEW.VRULTCLIQAP,
     :NEW.VRULTCBRUAP,:OLD.DTHRIMPCUSTO,:OLD.CDOPIMPCUSTO,SYSDATE,:NEW.CDOPALTCUSTO);
END;
/

