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

nuevo filtro que considera el producto servicio para traer los movimientos detalle

Browse Source
This commit is contained in:
Antonio Gonzalez
2020-07-30 12:06:44 -07:00
parent 79f075ae1e
commit 17c9554670
3 changed files with 17 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

17
Inventarios/AjustesSeccionAlmacen.aspx
View File

@@ -37,18 +37,23 @@
<div class="titlefiltros caption ">
<label class="col-md-1 truncate" style="text-align: right;">Almacen:</label>
<div class="col-md-3">
<asp:DropDownList ID="DdlAlmacen" runat="server" DataValueField="CveAlmacen" DataTextField="Almacen" class="select2me" Width="300px"></asp:DropDownList>
<div class="col-md-1">
<asp:DropDownList ID="DdlAlmacen" runat="server" DataValueField="CveAlmacen" DataTextField="Almacen" class="select2me" Width="170px"></asp:DropDownList>
</div>
<label class="col-md-1 truncate" style="text-align: right;">Clasificacion:</label>
<div class="col-md-3">
<asp:DropDownList ID="DdlClasificaciones" runat="server" DataValueField="CveClasificacion" DataTextField="Clasificacion" class="select2me" Width="300px"></asp:DropDownList>
<div class="col-md-1">
<asp:DropDownList ID="DdlClasificaciones" runat="server" DataValueField="CveClasificacion" DataTextField="Clasificacion" class="select2me" Width="170px"></asp:DropDownList>
</div>
<label class="col-md-1 truncate" style="text-align:right;">Folio:</label>
<div class="col-md-3">
<asp:TextBox runat="server" ID="TxtFolioFiltro" Width="100px"/>
<div class="col-md-1">
<asp:TextBox runat="server" ID="TxtFolioFiltro" Width="170px"/>
</div>
<label class="col-md-1 truncate" style="text-align:right;">Producto:</label>
<div class="col-md-1">
<ADS:Dropdownlost runat="server" ID="DdlPS" CssStyle="width: 170px;" CssClass="DdlPS " CssClassDdl="select2me" data-metodo="getps" UsaWebService="true" IncluyeTodos="false" DataTextField="PSCodigo" DataValueField="CvePS" />
</div>
</div>
</div>

7
Inventarios/AjustesSeccionAlmacen.aspx.vb
View File

@@ -24,6 +24,7 @@ Partial Class Inventarios_AjustesSeccionAlmacen
DdlClasificaciones.DataSource = GlobalDTClasificaciones(UsuarioActual.CveEmpresa)
DdlClasificaciones.DataBind()
DdlClasificaciones.Items.Insert(0, New ListItem("Todos", "-1"))
End Sub
Private Sub BtnConsultar_Click(sender As Object, e As EventArgs) Handles BtnConsultar.Click
@@ -32,9 +33,9 @@ Partial Class Inventarios_AjustesSeccionAlmacen
Private Sub CargaDatos()
Dim ObjInv As New ClsInventarios
Dim CvePS As String = If(DdlPS.SelectedValue = "", "-1", DdlPS.SelectedValue)
Dim FolioAux As String = If(TxtFolioFiltro.Text.Length > 0, TxtFolioFiltro.Text, "-1")
If ObjInv.GetMovimientosDetalleSeccionesAlmacen(DdlAlmacen.SelectedValue.ToEntero, DdlClasificaciones.SelectedValue.ToEntero, UsuarioActual.CveEmpresa, FolioAux) Then
If ObjInv.GetMovimientosDetalleSeccionesAlmacen(DdlAlmacen.SelectedValue.ToEntero, DdlClasificaciones.SelectedValue.ToEntero, UsuarioActual.CveEmpresa, FolioAux, CvePS.ToEntero) Then
GvD.DataSource = ObjInv.DtResultados
End If
@@ -298,7 +299,7 @@ Partial Class Inventarios_AjustesSeccionAlmacen
Try
Dim DtExistenciasSecciones As DataTable = Nothing
If ObjInventario.GetMovimientosDetalleSeccionesAlmacen(DdlAlmacenExcel.SelectedValue.ToEntero, -1, UsuarioActual.CveEmpresa, "-1") Then
If ObjInventario.GetMovimientosDetalleSeccionesAlmacen(DdlAlmacenExcel.SelectedValue.ToEntero, -1, UsuarioActual.CveEmpresa, "-1", -1) Then
DtExistenciasSecciones = ObjInventario.DtResultados.Copy()
End If