INSERT INTO PARTFILI(CDFILIAL, CDPRODUTO, CDTIPPART, NRSEQPART, CDMARCA, CDFORNECED)
SELECT
  PARTFILI.CDFILIAL,
  PRODUTO.CDPRODUTO,
  PARTFILI.CDTIPPART,
  PARTFILI.NRSEQPART,
  PARTFILI.CDMARCA,
  PARTFILI.CDFORNECED
FROM
  PARTFILI,
  PRODUTO
WHERE
  PRODUTO.CDPRODESTO = PARTFILI.CDPRODUTO   AND
  PRODUTO.CDPRODUTO <> PRODUTO.CDPRODESTO   AND
  NOT EXISTS
   (SELECT
      CDFILIAL
    FROM
      PARTFILI AUX
    WHERE
      AUX.CDFILIAL  = PARTFILI.CDFILIAL  AND
      AUX.CDPRODUTO = PRODUTO.CDPRODUTO  AND
      AUX.CDTIPPART = PARTFILI.CDTIPPART AND
      AUX.NRSEQPART = PARTFILI.NRSEQPART)
/
DELETE FROM PARTFILI
WHERE
 EXISTS
  (SELECT
     CDPRODUTO
   FROM
     PRODUTO
   WHERE
     PRODUTO.CDPRODUTO = PARTFILI.CDPRODUTO AND
     PRODUTO.CDARVPROD LIKE '11108581%%'AND
     PRODUTO.CDARVPROD <> '1110858101' AND
     PARTFILI.CDFORNECED = 'J03853896000140')
/
