-activación para citroagro

This commit is contained in:
2024-12-18 07:27:59 -07:00
parent 43fcafa735
commit c485cfed6e

View File

@@ -643,7 +643,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) Then Return True
If Not UsuarioActual.CveEmpresa.Contiene(119, 172, 174) Then Return True
Dim ErrorRegistrar As Boolean = False
Dim tdt As DataTable = VerificacionFluctuacion(TipoFluctuacion, FechaUltimoDiaMes)