Changing an specific numeric error in a given variable

I want to change all the zeros (0) and 36.1 in a given variable to another number.

To give you a better picture, this is what i tried to do:

transacciones_diarias$TIPO_CAMBIO_POOL <- ifelse(transacciones_diarias$TIPO_CAMBIO_POOL %in% c(0,36.1) & transacciones_diarias$COD_TIPOMOV == "VENTA",
                                                 transacciones_diarias$MONTO_TIPOCAMBIOCOL-0.01,
                                                    ifelse(transacciones_diarias$TIPO_CAMBIO_POOL %in% c(0,36.1) & transacciones_diarias$COD_TIPOMOV == "COMPRA",
                                                           transacciones_diarias$MONTO_TIPOCAMBIOCOL+0.01,
                                                           transacciones_diarias$TIPO_CAMBIO_POOL),
                                                 transacciones_diarias$TIPO_CAMBIO_POOL)

The error is:

Error in ifelse(transacciones_diarias$TIPO_CAMBIO_POOL %in% c(0, 36.1) &  : 
  unused argument (transacciones_diarias$TIPO_CAMBIO_POOL)

Here is some sample data:

Expected result: