diff --git a/Compras/ReembolsosComprobaciones.aspx.vb b/Compras/ReembolsosComprobaciones.aspx.vb
index 3c9bf20ce..0b6f58bdc 100644
--- a/Compras/ReembolsosComprobaciones.aspx.vb
+++ b/Compras/ReembolsosComprobaciones.aspx.vb
@@ -529,7 +529,7 @@ Partial Class Compras_ReembolsosComprobaciones
                         CvePrePolizaIERegistrado = ObjMov.AddPrePolizas("Compras/Comprobaciones2", 9, TxtImporteVinculado.Text.ToDecimal, TxtImporteVinculado.Text.ToDecimal, CveMoneda, TxtFechaPrePoliza.Text.ToDate, If(TxtObservaciones.Text.Trim = "", concepto, TxtObservaciones.Text.Trim), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa)
                         IdPoliza = drp("IdPoliza").ToString.ToEntero
                     Else
-                        If UsuarioActual.CveEmpresa = 141 Then
+                        If UsuarioActual.CveEmpresa = 141 AndAlso CvePrePolizaComprobacion > 0 Then
                             CvePrePolizaIERegistrado = CvePrePolizaComprobacion
                         Else
                             CvePrePolizaIERegistrado = drp("CvePrePoliza").ToString.ToEntero
@@ -1197,21 +1197,20 @@ Partial Class Compras_ReembolsosComprobaciones
                         MsgError = "No se pudo simplificar los movimientos"
                         Alert("No se pudo simplificar los movimientos", TipoMensaje.MsgError)
                     End If
-                    If Not ObjMov.PrePolizaSimplificacion(CvePrePolizaExcedente, UsuarioActual.CveEmpresa) Then
+                    If MsgError = "" AndAlso CvePrePolizaExcedente > 0 AndAlso Not ObjMov.PrePolizaSimplificacion(CvePrePolizaExcedente, UsuarioActual.CveEmpresa) Then
                         MsgError = "No se pudo simplificar los movimientos"
                         Alert("No se pudo simplificar los movimientos", TipoMensaje.MsgError)
                     End If
                 End If
 
-
-                If ObjMov.ValidacionPrePolizaCuadre(CvePrePolizaPago, 1) Then
+                If MsgError = "" AndAlso ObjMov.ValidacionPrePolizaCuadre(CvePrePolizaPago, 1) Then
                     If ObjMov.ValorPolizaDescuadre > 0 Then
                         GuardaLogAD($"Compras/ReembolsosComprobaciones | Error:{ObjMov.MensajePolizaDescuadre} Diferencia:{ObjMov.ValorDiferencia} | CvePrePoliza:{CvePrePolizaPago}", "LogPrePolizas")
                         MsgError = ObjMov.MensajePolizaDescuadre
                     End If
                 End If
 
-                If ObjMov.ValidacionPrePolizaCuadre(CvePrePolizaExcedente, 1) Then
+                If MsgError = "" AndAlso CvePrePolizaExcedente > 0 AndAlso ObjMov.ValidacionPrePolizaCuadre(CvePrePolizaExcedente, 1) Then
                     If ObjMov.ValorPolizaDescuadre > 0 Then
                         GuardaLogAD($"Compras/ReembolsosComprobaciones | Error:{ObjMov.MensajePolizaDescuadre} Diferencia:{ObjMov.ValorDiferencia} | CvePrePoliza:{CvePrePolizaExcedente}", "LogPrePolizas")
                         MsgError = ObjMov.MensajePolizaDescuadre