This commit is contained in:
2023-12-18 14:40:51 -07:00
parent 15a0644b68
commit 1307e373a5
2 changed files with 4 additions and 16 deletions

View File

@@ -386,10 +386,8 @@
<ContentTemplate>
<div class="row">
<div class="col-md-12" style="text-align: right">
<input type="text" id="TxtBusqueda" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvDatos.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
<a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvDatos.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
</div>
<div class="col-md-offset-8" style="width: 300px;">
<div class="portlet light bordered xspadding" id="DivCobranza" runat="server" visible="false">
@@ -477,9 +475,7 @@
</div>
</ContentTemplate>
</asp:UpdatePanel>
<br />
<asp:UpdatePanel ID="UPDatos" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False" Width="100%"

View File

@@ -255,11 +255,9 @@ Partial Class RepCxCDetalle
Else
DdlClientesWS.setEsWebService(False)
CargaClientes()
End If
'DdlClientes.DataSource = GlobalDTCliente(UsuarioActual.CveEmpresa, -1)
'DdlClientes.DataBind()
'CargaSubProyectos
End If
'CargaSubProyectos
DdlSubProyecto.DataSource = GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa, -1, 1)
DdlSubProyecto.DataBind()
@@ -909,7 +907,6 @@ Partial Class RepCxCDetalle
#End Region
#Region "SELECTED INDEX CHANGE"
Protected Sub DdlClienteClasificacion_SelectedIndexChanged(sender As Object, e As EventArgs)
CargaClientes()
@@ -931,15 +928,11 @@ Partial Class RepCxCDetalle
End If
End If
End Sub
#End Region
Public Overrides Sub VerifyRenderingInServerForm(ByVal control As Control)
End Sub
Public Sub ExportToExcelGembox(GridView As GridView, NombreArchivoXLSx As String, Usuario As Usuario, Titulo As String, Optional DatoTituloExtra As String = "", Optional DatosFiltros As String = "", Optional AnchoImagen As Integer = 100, Optional AlturaImagen As Integer = 100, Optional DTExtra As DataTable = Nothing)
Dim sw1 As New StringWriter()
@@ -1145,5 +1138,4 @@ Partial Class RepCxCDetalle
End Sub
End Class