Find *OP items in TPM Branches but not in Interlagos

SELECT *
  FROM PRODDTA.F4102 T1, PRODDTA.F4101 T3
 WHERE T1.IBITM = T3.IMITM
   AND T1.IBMCU LIKE '     310%4' --TPM Branch Plants end with a 4
   AND T1.IBLITM LIKE '%*OP%' -- *OP Items
   AND NOT EXISTS (SELECT *
          FROM PRODDTA.F4102 T2
         WHERE T2.IBMCU = '     3100011'
           AND T2.IBLITM LIKE '%*OP%'
           AND T1.IBITM = T2.IBITM)
 ORDER BY IBUPMJ ASC