diff --git a/Bancos/FluctuacionCambiaria.aspx.vb b/Bancos/FluctuacionCambiaria.aspx.vb
index b5664eab5..f98cd4fd3 100644
--- a/Bancos/FluctuacionCambiaria.aspx.vb
+++ b/Bancos/FluctuacionCambiaria.aspx.vb
@@ -641,7 +641,7 @@ Partial Class Bancos_FluctuacionCambiaria
     End Sub
 
     Private Function AjusteFluctuacion(CvePrePoliza As Integer, TipoFluctuacion As Integer, CveConcepto As Integer, FechaUltimoDaMes As Date, ByRef ObjConta As ClsContabilidad, Optional CveVenta As Integer = -1, Optional CveCliente As Integer = -1, Optional CveCompra As Integer = -1, Optional CveProveedor As Integer = -1) As Boolean
-        If Not UsuarioActual.CveEmpresa.Contiene(119, 172, 174) Then Return True
+        If Not UsuarioActual.CveEmpresa.Contiene(119, 172, 174, 189) Then Return True
 
         Dim ErrorRegistrar As Boolean = False
         Dim tdt As DataTable = VerificacionFluctuacion(TipoFluctuacion, FechaUltimoDiaMes)