Merge branch 'master' of http://192.168.10.111:8383/SIG

Compras/Compras.aspx.vb

@@ -8045,6 +8045,15 @@ Partial Class Compras_Compras
                                         End If
                                     End If
 
+
+                                    If Not ErrorPrepoliza AndAlso ObjConta.ValidacionPrePolizaCuadre(CvePrePoliza, 4) Then
+                                        If ObjConta.ValorPolizaDescuadre > 0 Then
+                                            GuardaLogAD($"Compras/Compras-Guardar | Error{ObjConta.MensajePolizaDescuadre} Diferencia{ObjConta.ValorDiferencia} | CvePrePoliza:{CvePrePoliza}", "LogPrePolizas")
+                                            ErrorPrepolizaDescuadre = True
+                                        End If
+                                    End If
+
+
                                     'ACTUALIZA CVEFACTURA
                                     If Request("CveFactura") IsNot Nothing Then