From 7f4c83a75c5843d5ae15075f76eb0daad4fc3e37 Mon Sep 17 00:00:00 2001 From: rrene Date: Mon, 6 Nov 2023 12:17:16 -0700 Subject: [PATCH] -- mejora --- Ventas/FacturacionAcarreos.aspx.vb | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/Ventas/FacturacionAcarreos.aspx.vb b/Ventas/FacturacionAcarreos.aspx.vb index 3df8f1fc9..70830fe5e 100644 --- a/Ventas/FacturacionAcarreos.aspx.vb +++ b/Ventas/FacturacionAcarreos.aspx.vb @@ -125,7 +125,7 @@ Partial Class Ventas_FacturacionAcarreos RowsNoCargados += 1 End If - For Each row As DataRow In dt.Rows + For Each row As DataRow In dt.FiltraParametros("Sucursal <> ''").Rows Dim FechaSalida As DateTime = MinFecha Dim FechaLlegada As DateTime = MinFecha @@ -158,7 +158,7 @@ Partial Class Ventas_FacturacionAcarreos RowsCargados += 1 Else TieneError = True - MsgFacturacionAcarreos.AppendFormat("Ocurrió un error al procesar la fila: {0}
{1}", row("NoExcel"), msg) + MsgFacturacionAcarreos.AppendFormat("Ocurrió un error al procesar la fila: Hoja Servicio: {0}
{1}", FolioAdicional, msg) RowsNoCargados += 1 Exit For End If