diff --git a/Compras/RepRembolsoComprobaciones.aspx.vb b/Compras/RepRembolsoComprobaciones.aspx.vb index f0681b57d..0b499174b 100644 --- a/Compras/RepRembolsoComprobaciones.aspx.vb +++ b/Compras/RepRembolsoComprobaciones.aspx.vb @@ -161,7 +161,7 @@ Partial Class Compras_RepRembolsoComprobaciones Dim ObjComp As New ClsCompras() Dim ObjMov As New ClsContabilidad(ObjComp.IniciaTransacSQL) Dim ObjAC As ClsContPAQi = Nothing - If UsuarioActual.Empresa.UsaAC Then + If UsuarioActual.Empresa.UsaContabilidad Then ObjAC = New ClsContPAQi(UsuarioActual.Empresa) ObjAC.IniciaTransacSQL() End If @@ -198,7 +198,7 @@ Partial Class Compras_RepRembolsoComprobaciones Msg.AppendFormat("Se unificaron todas las compras con éxito") End If - If UsuarioActual.Empresa.UsaAC AndAlso Not TieneError Then + If UsuarioActual.Empresa.UsaContabilidad AndAlso Not TieneError Then If ObjAC Is Nothing Then TieneError = True End If