This commit is contained in:
2025-03-20 18:03:24 -07:00
parent 506f714b09
commit 5b6e36fde1
2 changed files with 41 additions and 29 deletions

View File

@@ -80,6 +80,10 @@
border: none; border: none;
outline: 0; outline: 0;
} }
.grid-column250 {
width: 250px; /* Define el ancho en píxeles */
}
</style> </style>
</asp:Content> </asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="HB" runat="Server"> <asp:Content ID="Content3" ContentPlaceHolderID="HB" runat="Server">
@@ -89,27 +93,20 @@
</li> </li>
</asp:Content> </asp:Content>
<asp:Content ID="Content4" ContentPlaceHolderID="E" runat="Server"> <asp:Content ID="Content4" ContentPlaceHolderID="E" runat="Server">
<asp:Label ID="LblTitulo" runat="server" Text="Gastos Acumulados"></asp:Label> <asp:Label ID="LblTitulo" runat="server" Text="Reporte de Gastos"></asp:Label>
</asp:Content> </asp:Content>
<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server"> <asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
</asp:Content> </asp:Content>
<asp:Content ID="Content8" ContentPlaceHolderID="HA" runat="Server"> <asp:Content ID="Content8" ContentPlaceHolderID="HA" runat="Server">
<%-- <asp:UpdatePanel ID="UpdatePanel1" runat="server" RenderMode="Inline" UpdateMode="Conditional">
<ContentTemplate>
<div class="btn-group pull-right btn-separete">
</div>
</ContentTemplate>
</asp:UpdatePanel>--%>
</asp:Content> </asp:Content>
<asp:Content ID="Content6" ContentPlaceHolderID="C" runat="Server" defaultbutton="BtnConsultar"> <asp:Content ID="Content6" ContentPlaceHolderID="C" runat="Server" defaultbutton="BtnConsultar">
<asp:UpdatePanel ID="UPFiltros" runat="server" UpdateMode="Conditional"> <asp:UpdatePanel ID="UPFiltros" runat="server" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
<div class="portlet solid grey-cascade portlet-filter" style=""> <div class="portlet solid grey-cascade portlet-filter" style="">
<div class="portlet-title portlet-filterT smalltitle" style="min-height: 49px; position: relative;"> <div class="portlet-title portlet-filterT smalltitle" style="min-height: 42px; position: relative;">
<div class="tools"> <div class="tools">
<asp:Button ID="BtnConsultar" runat="server" Text="Consultar" class="btn btn-primary" /> <asp:Button ID="BtnConsultar" runat="server" Text="Consultar" class="btn btn-primary" />
<a href="javascript:;" data-idchekbox="<%= chkexpand.ClientID%>" class=" <%= IIf(chkexpand.Checked = True, "collapse", "expand")%>"></a> <a href="javascript:;" data-idchekbox="<%= chkexpand.ClientID%>" class=" <%= IIf(chkexpand.Checked = True, "collapse", "expand")%>"></a>
@@ -151,12 +148,24 @@
</div> </div>
</div> </div>
</div> </div>
<div class="portlet-body" <%= IIf(chkexpand.Checked = True, "", "style=""display:none;""")%>>
<div class="row">
<div class="col-md-1 truncate">
Tipo Movto
</div>
<div class="col-md-2 truncate">
<asp:DropDownList ID="DdlOpcionCuenta" runat="server" CssClass="form-control input-sm select2me" Width="100%">
<asp:ListItem Text="Todos" Value="-1" ></asp:ListItem>
<asp:ListItem Text="Sin Importes" Value="1"></asp:ListItem>
<asp:ListItem Text="Con Importes" Value="2" Selected="True"></asp:ListItem>
</asp:DropDownList>
</div>
</div>
</div> </div>
</div>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
<br />
<div class="row"> <div class="row">
<div align="right"> <div align="right">
<input type="text" id="TxtBusqueda" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvDatos.ClientID) %>" style="display: inline-block; width: 150px;" /> <input type="text" id="TxtBusqueda" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvDatos.ClientID) %>" style="display: inline-block; width: 150px;" />
@@ -165,14 +174,15 @@
</div> </div>
<asp:UpdatePanel ID="UPDatos" runat="server" UpdateMode="Conditional"> <asp:UpdatePanel ID="UPDatos" runat="server" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
<asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="True" EmptyDataText="" <div class="row">
CssClass="table table-striped table-advance table-hover Widthall ScrollAD" <div class="col-md-12">
data-sort="true" GridLines="None"> <asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="True" EmptyDataText=""
CssClass="table table-striped table-advance table-hover Widthall ScrollAD" data-cols="1" data-sort="true" GridLines="None">
<HeaderStyle CssClass="Titulos" /> <RowStyle CssClass="Texto" />
<RowStyle CssClass="Texto" /> <AlternatingRowStyle CssClass="TextoAlterno" />
<AlternatingRowStyle CssClass="TextoAlterno" /> </asp:GridView>
</asp:GridView> </div>
</div>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>

View File

@@ -35,13 +35,17 @@ Partial Class RepGastosCC
Dim Obj As New ClsContabilidad Dim Obj As New ClsContabilidad
If Obj.GetGastosRepCC(txtFechaI.Text.Trim.ToDate, txtFechaF.Text.Trim().ToDate, UsuarioActual.CveEmpresa) Then If Obj.GetGastosRepCC(txtFechaI.Text.Trim.ToDate, txtFechaF.Text.Trim().ToDate, UsuarioActual.CveEmpresa) Then
GvDatos.DataSource = Obj.DtResultados Dim dt As DataTable = Obj.DtResultados
If DdlOpcionCuenta.SelectedValue = "2" Then
dt = dt.FiltraParametros("Total > 0")
ElseIf DdlOpcionCuenta.SelectedValue = "1" Then
dt = dt.FiltraParametros("isnull(Total,0) = 0")
End If
GvDatos.DataSource = dt
End If End If
Obj.Dispose() Obj.Dispose()
GvDatos.DataBind() GvDatos.DataBind()
UPDatos.Update() UPDatos.Update()
End Sub End Sub
#End Region #End Region
@@ -68,7 +72,7 @@ Partial Class RepGastosCC
' e.Row.Cells(5).Text = e.Row.Cells(5).Text + "%" ' e.Row.Cells(5).Text = e.Row.Cells(5).Text + "%"
e.Row.Cells(1).Width = 250 e.Row.Cells(1).Width = 300
e.Row.Cells(0).Visible = False e.Row.Cells(0).Visible = False
For Each Cells As TableCell In e.Row.Cells For Each Cells As TableCell In e.Row.Cells
@@ -92,14 +96,12 @@ Partial Class RepGastosCC
End If End If
ElseIf e.Row.RowType = DataControlRowType.Header Then ElseIf e.Row.RowType = DataControlRowType.Header Then
e.Row.Cells(0).Visible = False e.Row.Cells(0).Visible = False
e.Row.Cells(1).CssClass = "grid-column250"
End If End If
End Sub End Sub
#End Region #End Region
#Region "PDF" #Region "PDF"
'Private Sub LnkPdf_Click(sender As Object, e As EventArgs) Handles LnkPdf.Click 'Private Sub LnkPdf_Click(sender As Object, e As EventArgs) Handles LnkPdf.Click
' If DtVentas IsNot Nothing Then ' If DtVentas IsNot Nothing Then