diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb index 20cdcef53..9e760f432 100644 --- a/Ventas/Ventas.aspx.vb +++ b/Ventas/Ventas.aspx.vb @@ -32677,8 +32677,12 @@ Partial Class Ventas DrRemision(0)("Aplicado") = "True" End If DTRemisiones.AcceptChanges() - RemisionesLista.Add(CveVenta) - CargaConceptosRemisionPorFacturar(CveVenta.ToString(), 1) + + If RemisionesLista IsNot Nothing Then + RemisionesLista.Clear() + RemisionesLista.Add(CveVenta) + CargaConceptosRemisionPorFacturar(CveVenta.ToString(), 1) + End If If TmpDT.Rows.Count = 0 Then Alert("No hay conceptos por facturar de esta remisión. Por favor verifique y vuelva a intentar.", TipoMensaje.MsgAdvertencia)