AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

-

Browse Source
This commit is contained in:
rrene
2025-03-20 18:03:24 -07:00
parent 506f714b09
commit 5b6e36fde1
2 changed files with 41 additions and 29 deletions
Download Patch File Download Diff File Expand all files Collapse all files

54
Contabilidad/RepGastosCC.aspx
View File

@@ -80,6 +80,10 @@
border: none;
outline: 0;
}
.grid-column250 {
width: 250px; /* Define el ancho en píxeles */
}
</style>
</asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="HB" runat="Server">
@@ -89,27 +93,20 @@
</li>
</asp:Content>
<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 ID="Content5" ContentPlaceHolderID="H" runat="Server">
</asp:Content>
<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 ID="Content6" ContentPlaceHolderID="C" runat="Server" defaultbutton="BtnConsultar">
<asp:UpdatePanel ID="UPFiltros" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<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">
<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>
@@ -150,13 +147,25 @@
</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>
</ContentTemplate>
</asp:UpdatePanel>
<br />
</asp:UpdatePanel>
<div class="row">
<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;" />
@@ -165,14 +174,15 @@
</div>
<asp:UpdatePanel ID="UPDatos" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="True" EmptyDataText=""
CssClass="table table-striped table-advance table-hover Widthall ScrollAD"
data-sort="true" GridLines="None">
<HeaderStyle CssClass="Titulos" />
<RowStyle CssClass="Texto" />
<AlternatingRowStyle CssClass="TextoAlterno" />
</asp:GridView>
<div class="row">
<div class="col-md-12">
<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">
<RowStyle CssClass="Texto" />
<AlternatingRowStyle CssClass="TextoAlterno" />
</asp:GridView>
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>

16
Contabilidad/RepGastosCC.aspx.vb
View File

@@ -35,13 +35,17 @@ Partial Class RepGastosCC
Dim Obj As New ClsContabilidad
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
Obj.Dispose()
GvDatos.DataBind()
UPDatos.Update()
End Sub
#End Region
@@ -68,7 +72,7 @@ Partial Class RepGastosCC
' 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
For Each Cells As TableCell In e.Row.Cells
@@ -92,14 +96,12 @@ Partial Class RepGastosCC
End If
ElseIf e.Row.RowType = DataControlRowType.Header Then
e.Row.Cells(0).Visible = False
e.Row.Cells(1).CssClass = "grid-column250"
End If
End Sub
#End Region
#Region "PDF"
'Private Sub LnkPdf_Click(sender As Object, e As EventArgs) Handles LnkPdf.Click
' If DtVentas IsNot Nothing Then