INSERT INTO OPERSEMCUSTOROP
   (CDTIPOOPER, IDENTRSAID, NRORG, IDATIVO, DTINCLUSAO, DTULTATU, NRORGINCLUSAO, CDOPERINCLUSAO, NRORGULTATU, CDOPERULTATU, CDFILIAL)
 SELECT O.CDTIPOOPER, O.IDENTRSAID, O.NRORG, O.IDATIVO, O.DTINCLUSAO, O.DTULTATU, O.NRORGINCLUSAO, O.CDOPERINCLUSAO, O.NRORGULTATU, O.CDOPERULTATU, P.CDFILIAL
   FROM PARFILIALROP P CROSS JOIN OPERSEMCUSTOROP O
  WHERE P.CDFILIAL <> 'P'
    AND O.CDFILIAL = 'P'
/
COMMIT