From c9f42f0941e2d26b826dadfa7bb0058e84730e5a Mon Sep 17 00:00:00 2001 From: rrene Date: Tue, 31 Jan 2023 09:16:42 -0700 Subject: [PATCH] -- ocultado de filtro de contratos --- CxC/RepCxC.aspx | 2 +- CxC/RepCxC.aspx.vb | 9 +++++---- CxC/RepCxCDetalle.aspx | 2 +- CxC/RepCxCDetalle.aspx.vb | 2 +- 4 files changed, 8 insertions(+), 7 deletions(-) diff --git a/CxC/RepCxC.aspx b/CxC/RepCxC.aspx index e66c3446e..8b9913fba 100644 --- a/CxC/RepCxC.aspx +++ b/CxC/RepCxC.aspx @@ -365,7 +365,7 @@
Contrato:
-
+
diff --git a/CxC/RepCxC.aspx.vb b/CxC/RepCxC.aspx.vb index 4b47b850e..02e642962 100644 --- a/CxC/RepCxC.aspx.vb +++ b/CxC/RepCxC.aspx.vb @@ -4,7 +4,8 @@ Option Strict On Imports System.Data Imports System.IO Imports Extensiones -Imports Microsoft.Reporting.WebForms +Imports Microsoft.Reporting.WebForms + Partial Class RepCxC Inherits ClsPaginas @@ -181,9 +182,9 @@ Partial Class RepCxC Private Sub CargaContratos() Dim ObjContratos As New ClsContratos If ObjContratos.GetContratos(-1, UsuarioActual.CveEmpresa, CveCliente:=-1) Then - DdlContrato.DataSource = ObjContratos.DtResultados - End If - + DdlContrato.DataSource = ObjContratos.DtResultados + End If + divContrato.Visible = True ObjContratos.Dispose() DdlContrato.DataBind() diff --git a/CxC/RepCxCDetalle.aspx b/CxC/RepCxCDetalle.aspx index e13c957ac..694f59a17 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 98befc41c..4edcd7ef5 100644 --- a/CxC/RepCxCDetalle.aspx.vb +++ b/CxC/RepCxCDetalle.aspx.vb @@ -439,7 +439,7 @@ Partial Class RepCxCDetalle If ObjContratos.GetContratos(-1, UsuarioActual.CveEmpresa, CveCliente:=-1) Then DdlContrato.DataSource = ObjContratos.DtResultados End If - + divContrato.Visible = True ObjContratos.Dispose() DdlContrato.DataBind()