CREATE OR REPLACE TRIGGER USR_ATU_MARCA_NGD
BEFORE UPDATE OF NMMARCA
ON MARCA  FOR EACH ROW
BEGIN
   FOR C_PRODUTOS IN
      (SELECT MARCPRODCOMP.CDPRMARCOMPL
         FROM RELACPRODOL, MARCPRODCOMP, PRODUTO
        WHERE ((NVL(PRODUTO.IDPRODATIVPR, 'N') = 'S') OR (INSTR(PRODUTO.NMPRODUTO, 'INATIVO') = 0))
          AND PRODUTO.CDPRODESTO IS NOT NULL
          AND PRODUTO.CDPRODUTO      = RELACPRODOL.CDPRARVORIG
          AND PRODUTO.CDPRODUTO      = MARCPRODCOMP.CDPRMARCOMPL
          AND RELACPRODOL.CDMARCA    = :NEW.CDMARCA
          AND MARCPRODCOMP.CDMARCA   = :NEW.CDMARCA
        GROUP BY MARCPRODCOMP.CDPRMARCOMPL)
   LOOP
      UPDATE PRODUTO
         SET PRODUTO.USR_NGD_INTEGRADO = 'N'
       WHERE PRODUTO.CDPRODUTO = C_PRODUTOS.CDPRMARCOMPL;
   END LOOP;
END;
/

-- VERSAO --
BEGIN ATUVEROBJ('USR_ATU_PRODUTO_NGD','6.37.015'); END;
/
