From 17624cebe01aacbfcbca645f9e543762cfc5c90e Mon Sep 17 00:00:00 2001 From: rrene Date: Tue, 12 Dec 2023 11:17:52 -0700 Subject: [PATCH] - --- Ventas/RepEntregasEcommerce.aspx.vb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Ventas/RepEntregasEcommerce.aspx.vb b/Ventas/RepEntregasEcommerce.aspx.vb index 69b071605..9c38e88de 100644 --- a/Ventas/RepEntregasEcommerce.aspx.vb +++ b/Ventas/RepEntregasEcommerce.aspx.vb @@ -25,7 +25,7 @@ Partial Class Ventas_RepEntregasEcommerce If txtFechaI.Text <> "" Then FechaI = txtFechaI.Text.Trim.ToDate Else FechaI = MinFecha If txtFechaF.Text <> "" Then FechaF = txtFechaF.Text.Trim.ToDate Else FechaF = MaxFecha Dim Obj As New ClsVentas - If Obj.GetEntregasEcommerce(FechaI, FechaF, UsuarioActual.CveEmpresa) Then + If Obj.GetEntregasEcommerce(FechaI, FechaF, 1, UsuarioActual.CveEmpresa) Then GvD.DataSource = Obj.DtResultados End If Obj.Dispose()