From d0c6bedb5bc25a9312b3ea5cd38e35d23b5a9214 Mon Sep 17 00:00:00 2001
From: Jonathan Alexis Perez Morales <jonathan.perez@adssistemas.mx>
Date: Wed, 30 Apr 2025 15:41:56 -0700
Subject: [PATCH] --Cambios PVCobranza

---
 Ventas/PVCobranza.aspx.vb | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/Ventas/PVCobranza.aspx.vb b/Ventas/PVCobranza.aspx.vb
index cc878b939..881be80e9 100644
--- a/Ventas/PVCobranza.aspx.vb
+++ b/Ventas/PVCobranza.aspx.vb
@@ -963,6 +963,13 @@ Partial Class Ventas_PVCobranza
                     Else
                         'SI NO TIENE SALDO PENDIENTE NO GENERAR POLIZA PARA EL PAGO
                         RegistrarPago = False
+
+                        If DebeTenerCorteCaja Then
+                            If MsgError = "" AndAlso Not ObjVentas2.UpdateVentaCorte(CveVenta, UsuarioActual.CveEmpresa, tCveCorte) Then
+                                MsgError = "Error al aplicar el corte"
+                            End If
+                        End If
+
                     End If
                 End If
             Catch ex As Exception
@@ -1452,7 +1459,7 @@ Partial Class Ventas_PVCobranza
             ObjFactura.CveVendedor = CveVendedor
 
             ObjFactura.ObservacionesAlmacen = ObservacionesAlmacen
-            ObjFactura.Observaciones = Observaciones
+            ObjFactura.Observaciones = $"Remisión: {VentaRemision.SerieFolio} {Observaciones}"
             ObjFactura.PedidoContrato = PedidoContrato
             ObjFactura.OrdenCompra = OrdenCompra