From 86c5ae592e621ada0558d3dfb0ff0ff8546d0f3d Mon Sep 17 00:00:00 2001 From: rrene Date: Wed, 17 May 2023 10:24:10 -0700 Subject: [PATCH] =?UTF-8?q?-=20filtro=20de=20contrato,=20no=20se=20estaba?= =?UTF-8?q?=20aplicando=20-=20tama=C3=B1o=20ddl=20contrato=20al=20100%?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- CxC/RepCxCDetalle.aspx | 2 +- CxC/RepCxCDetalle.aspx.vb | 9 ++------- 2 files changed, 3 insertions(+), 8 deletions(-) diff --git a/CxC/RepCxCDetalle.aspx b/CxC/RepCxCDetalle.aspx index 461834c4f..156ab3415 100644 --- a/CxC/RepCxCDetalle.aspx +++ b/CxC/RepCxCDetalle.aspx @@ -348,7 +348,7 @@ Contrato:
- +
diff --git a/CxC/RepCxCDetalle.aspx.vb b/CxC/RepCxCDetalle.aspx.vb index c598ec10f..ae3fe6366 100644 --- a/CxC/RepCxCDetalle.aspx.vb +++ b/CxC/RepCxCDetalle.aspx.vb @@ -474,7 +474,8 @@ Partial Class RepCxCDetalle RblTipoCambio.SelectedValue.ToEntero, TCEspecifico, If(DdlTipoDocto.GetSelectedValuesM = "", "-1", DdlTipoDocto.GetSelectedValuesM), FechaVI, FechaVF, FechaCorte:=txtCorteA.Text.ToDate, CveUsuarioConsulta:=UsuarioActual.CveUsuario, CveCobranzaEstatus:=DdlCobranzaEstatusFiltro.SelectedValue.ToEntero, CveClienteClasificacion:=DdlClienteClasificacion.SelectedValue.ToEntero, LimiteCredito:=LimiteCredito, TipoCliente:=DdlTipoCliente.SelectedValue.ToEntero, - CveMoneda:=CveMoneda, EstatusCliente:=DdlEstatusCliente.SelectedValue.ToEntero, AplicaAnticiposPagados:=If(ChkAnticipos.Checked, 1, 0), TieneLineaAdicional:=DdlTieneLineaAdicional.SelectedValue.ToEntero()) Then + CveMoneda:=CveMoneda, EstatusCliente:=DdlEstatusCliente.SelectedValue.ToEntero, AplicaAnticiposPagados:=If(ChkAnticipos.Checked, 1, 0), TieneLineaAdicional:=DdlTieneLineaAdicional.SelectedValue.ToEntero(), + CveContrato:=DdlContrato.SelectedValue.ToEntero) Then GvDatos.DataSource = ObjMovtos.DSResultados.Tables(0) @@ -483,16 +484,10 @@ Partial Class RepCxCDetalle DSRespuesta.Tables.Add(ObjMovtos.DSResultados.Tables(0).Copy) If UsuarioActual.Empresa.Funcionalidad(531) = "1" Then - GvCartera.DataSource = ObjMovtos.DSResultados.Tables(1) - - 'DTCartera = ObjMovtos.DSResultados.Tables(1) - 'DTCartera.TableName = "DTCartera" DSRespuesta.Tables.Add(ObjMovtos.DSResultados.Tables(1).Copy) - End If - Else GvDatos.DataSource = Nothing End If