insert into DESTINO(CODIGO,
                       DESCRICAO,
                       NUMERO)
      Select
         O.COD_ORIGEM,
         O_DESC_ORIGEM,
         0
      from Origem O
      where
         O.TIPO='R' ;