--Cambios PVCobranza

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