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

-- nuevo filtro de folio

Browse Source
This commit is contained in:
rrene
2024-06-18 15:16:48 -07:00
parent 0278dc2466
commit 028e5956d8
4 changed files with 14 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
Contabilidad/FiltraPolizas.aspx
View File

@@ -38,12 +38,12 @@
<div class="titlefiltros caption ">
<div class="row">
<label class="col-md-1">Ejercicio: </label>
<div class="col-md-2">
<div class="col-md-1">
<asp:DropDownList ID="DdlEjercicio" runat="server" CssClass="form-control input-sm" DataTextField="Ejercicio" DataValueField="Ejercicio" AutoPostBack="false"></asp:DropDownList>
</div>
<label class="col-md-1">Periodo: </label>
<div class="col-md-2">
<div class="col-md-1">
<asp:DropDownList ID="DdlPeriodo" runat="server" CssClass="form-control input-sm" AutoPostBack="false">
<asp:ListItem Text="Enero" Value="1"></asp:ListItem>
<asp:ListItem Text="Febrero" Value="2"></asp:ListItem>
@@ -70,6 +70,10 @@
<asp:ListItem Text="Orden" Value="4"></asp:ListItem>
</asp:DropDownList>
</div>
<label class="col-md-1">Folio: </label>
<div class="col-md-1">
<asp:TextBox ID="TxtFolio" runat="server" CssClass="form-control input-sm" ></asp:TextBox>
</div>
<label class="col-md-1">Centro Costo: </label>
<div class="col-md-1">
<asp:DropDownList ID="DdlSegmentoNeg" DataTextField="Nombre" DataValueField="Id" CssClass="form-control input-sm select2me" runat="server"></asp:DropDownList>

4
Contabilidad/FiltraPolizas.aspx.vb
View File

@@ -75,7 +75,7 @@ Partial Class Contabilidad_FiltraPolizas
Dim ObjConta As New ClsContabilidad
If ObjConta.GetPolizas(Ejercicio, Periodo, DdlTipoPoliza.SelectedValue.ToEntero(), DdlSegmentoNeg.SelectedValue.ToEntero(), UsuarioActual.CveEmpresa) Then
If ObjConta.GetPolizas(Ejercicio, Periodo, DdlTipoPoliza.SelectedValue.ToEntero(), DdlSegmentoNeg.SelectedValue.ToEntero(), TxtFolio.Text.ToEntero, UsuarioActual.CveEmpresa) Then
DtDatos = ObjConta.DtResultados
Gv.DataSource = ObjConta.DtResultados
Else
@@ -87,7 +87,7 @@ Partial Class Contabilidad_FiltraPolizas
Else
Dim ObjConta As New ClsContPAQi(UsuarioActual.Empresa)
If ObjConta.GetPolizas(Ejercicio, Periodo, DdlTipoPoliza.SelectedValue.ToEntero(), DdlSegmentoNeg.SelectedValue.ToEntero(), UsuarioActual.CveEmpresa) Then
If ObjConta.GetPolizas(Ejercicio, Periodo, DdlTipoPoliza.SelectedValue.ToEntero(), DdlSegmentoNeg.SelectedValue.ToEntero(), TxtFolio.Text.ToEntero, UsuarioActual.CveEmpresa) Then
DtDatos = ObjConta.DtResultados
Gv.DataSource = ObjConta.DtResultados
'If DdlTipoPoliza.SelectedValue.ToEntero > 0 Then