From 8aac3d345174cf541620c6730ca3ef846e4936cb Mon Sep 17 00:00:00 2001 From: rrene Date: Fri, 17 May 2024 15:25:13 -0700 Subject: [PATCH] -- mejora en recorrido de excel --- Ventas/ActualizarPrecios.aspx.vb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Ventas/ActualizarPrecios.aspx.vb b/Ventas/ActualizarPrecios.aspx.vb index aa0f0018d..9432e3601 100644 --- a/Ventas/ActualizarPrecios.aspx.vb +++ b/Ventas/ActualizarPrecios.aspx.vb @@ -590,7 +590,7 @@ Partial Class Ventas_ActualizarPrecios 'ObjPS.IniciaTransacSQL() Try Dim DtPS As DataTable = GlobalDTPSSimplificado(UsuarioActual.CveEmpresa) - For Each row As DataRow In dt.Rows + For Each row As DataRow In dt.FiltraParametros("Código <> ''").Rows Dim Correcto As Boolean = False Dim TieneError As Boolean = False Dim CvePS As Integer = DtPS.FiltroPrimeroValor("CvePS", String.Format("Codigo='{0}'", row(0).ToString())).ToEntero