From 64fd1fb9b66b2d5c48014ac86832e2f9a4154171 Mon Sep 17 00:00:00 2001 From: rrene Date: Fri, 21 May 2021 08:12:03 -0700 Subject: [PATCH] =?UTF-8?q?--=20se=20aument=C3=B3=20el=20limite=20de=20imp?= =?UTF-8?q?resi=C3=B3n?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- Contabilidad/PolizasImpresion.aspx.vb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Contabilidad/PolizasImpresion.aspx.vb b/Contabilidad/PolizasImpresion.aspx.vb index d597518c4..567c14f2b 100644 --- a/Contabilidad/PolizasImpresion.aspx.vb +++ b/Contabilidad/PolizasImpresion.aspx.vb @@ -41,7 +41,7 @@ Partial Class Contabilidad_PolizasImpresion Dim objcont As New ClsContPAQi(UsuarioActual.Empresa) If objcont.GetPolizasMasivo(TxtFechaInicio.Text.ToDate, TxtFechaFin.Text.ToDate, foli, folf, ddlTipoPoliza.SelectedValue.ToEntero, DdlUsuarioRegistro.SelectedValue.ToEntero, DdlSegmentoNeg.SelectedValue.ToEntero, DdlCuenta.SelectedValue.ToEntero, DdlGrupoPlantilla.SelectedValue.ToEntero, DdlTipoProveedor.SelectedValue.ToEntero, UsuarioActual.CveEmpresa) Then - If objcont.DtResultados.Rows.Count < 10000 Then + If objcont.DtResultados.Rows.Count < 15000 Then If objcont.DtResultados.Rows.Count > 0 Then Dim dr As DataRow