--Cambios cobranza, ventas

This commit is contained in:
2025-03-27 14:06:53 -07:00
parent fa583a9693
commit 7818c56469
3 changed files with 14 additions and 12 deletions

View File

@@ -15919,9 +15919,8 @@ Partial Class Ventas
Pago.Referencia = row2.DataKey("Folio").ToString()
Pago.CveVentaAmortizacion = row2.DataKey("CveVenta").ToString().ToEntero()
Pago.TipoPago = "NC"
Pago.CveClientePago = ObjFactura.CveCliente
Pago.CveClientePago = row2.DataKey("CveCliente").ToString().ToEntero()
Pago.Referencia = Referencia
Pago.CveClienteNC = row2.DataKey("CveCliente").ToString().ToEntero()
ErrorPrepoliza = ClsPaginas.AplicaPrePolizaPagoVenta(VentaRef, Pago, ObjFactura.CvePrePoliza, ObjConta, AplicarConceptoAplicacion:=True)
@@ -27159,7 +27158,7 @@ Partial Class Ventas
Using ObjVentas As New ClsVentas
If ObjVentas.GetMovimientosDepositoCaja(Me.CveVenta, UsuarioActual.CveEmpresa) Then
If ObjVentas.DtResultados.Rows.Count > 0 Then
SbCondiciones.Append("<br><br><span style='color: red;font-size: medium;'><b>*No se puede cancelar debido a que tiene un deposito.</b></span>")
SbCondiciones.Append("<br><br><span style='color: red;font-size: medium;'><b>*No se puede cancelar la factura, debido a que tiene el pago ya depositado.</b></span>")
BtnCancelarDocumento.Visible = False
End If
Else