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

seleccionar multiples marcas

Browse Source
This commit is contained in:
Jonathan Alexis Perez Morales
2020-03-10 19:50:00 -07:00
parent 16dc8cc966
commit 6444292d6c
3 changed files with 271 additions and 275 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
App_Code/ClsInventarios.vb
View File

@@ -1472,7 +1472,7 @@ Public Class ClsInventarios
Return Retorno Return Retorno
End Function End Function
Public Function GetKardexAlmacenHorizontal(CvePS As Integer, FechaFin As Date, CveAlmacen As Integer, CveUnidadMedida As Integer, CveProveedor As Integer, CveTipoAlmacen As Integer, IncluyeTransitorios As Integer, CveClasificacion As Integer, CveUsuario As Integer, CveEmpresa As Integer, Optional CondicionExistencias As Integer = 0, Optional Orden As Integer = -1, Optional CveMarca As Integer = -1) As Boolean Public Function GetKardexAlmacenHorizontal(CvePS As Integer, FechaFin As Date, CveAlmacen As Integer, CveUnidadMedida As Integer, CveProveedor As Integer, CveTipoAlmacen As Integer, IncluyeTransitorios As Integer, CveClasificacion As Integer, CveUsuario As Integer, CveEmpresa As Integer, Optional CondicionExistencias As Integer = 0, Optional Orden As Integer = -1, Optional Marcas As String = "-1") As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
DataAdapter("PA_Inv_KardexAlmacenHorizontalGet") DataAdapter("PA_Inv_KardexAlmacenHorizontalGet")
@@ -1491,7 +1491,7 @@ Public Class ClsInventarios
.Add("@CveTipoAlmacen", SqlDbType.Int).Value = CveTipoAlmacen .Add("@CveTipoAlmacen", SqlDbType.Int).Value = CveTipoAlmacen
.Add("@ExistenciasCondicion", SqlDbType.Int).Value = CondicionExistencias .Add("@ExistenciasCondicion", SqlDbType.Int).Value = CondicionExistencias
.Add("@Orden", SqlDbType.Int).Value = Orden .Add("@Orden", SqlDbType.Int).Value = Orden
.Add("@CveMarca", SqlDbType.Int).Value = CveMarca .Add("@Marcas", SqlDbType.VarChar).Value = Marcas
End With End With
Try Try

502
Inventarios/KardexAlmacenHorizontal.aspx
View File

@@ -1,254 +1,256 @@
<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="KardexAlmacenHorizontal.aspx.vb" Inherits="Inventarios_KardexAlmacen" %> <%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="KardexAlmacenHorizontal.aspx.vb" Inherits="Inventarios_KardexAlmacen" %>
<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server"> <asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
</asp:Content> </asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server"> <asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
<style> <style>
.dataTables_scrollHead { .dataTables_scrollHead {
background-color: #95A5A6; background-color: #95A5A6;
color: white; color: white;
} }
.dataTables_scrollBody table th { .dataTables_scrollBody table th {
padding: 0px !important; padding: 0px !important;
padding-right: 4px !important; padding-right: 4px !important;
padding-left: 4px !important; padding-left: 4px !important;
} }
.table-scrollable { .table-scrollable {
margin: 0px !important; margin: 0px !important;
} }
.dataTables_scrollFoot { .dataTables_scrollFoot {
display: none; display: none;
} }
.dataTables_scroll { .dataTables_scroll {
margin-bottom: 0px; margin-bottom: 0px;
} }
.table.dataTable { .table.dataTable {
margin-top: 0px !important; margin-top: 0px !important;
} }
.table table-striped table-hover dataTable no-footer { .table table-striped table-hover dataTable no-footer {
margin-top: 0px !important; margin-top: 0px !important;
} }
.Excede { .Excede {
overflow: hidden; overflow: hidden;
text-overflow: ellipsis; text-overflow: ellipsis;
} }
.psagregar > div.comboxes { .psagregar > div.comboxes {
display: inline-block; display: inline-block;
width: 250px; width: 250px;
} }
.psagregar > div.codigo input { .psagregar > div.codigo input {
width: 79px; width: 79px;
} }
.psagregar > div.codigo { .psagregar > div.codigo {
display: inline-block; display: inline-block;
width: 80px; width: 80px;
} }
.psagregar > div.codigo > input[type="submit"] { .psagregar > div.codigo > input[type="submit"] {
display: none; display: none;
} }
@media (min-width: 991px) { @media (min-width: 991px) {
.textfilter { .textfilter {
max-width: 80px; max-width: 80px;
} }
.textfilter2 { .textfilter2 {
max-width: 70px; max-width: 70px;
} }
.dateFilter { .dateFilter {
min-width: 115px; min-width: 115px;
} }
} }
@media (min-width: 991px) and (max-width: 1400px) { @media (min-width: 991px) and (max-width: 1400px) {
.titlefiltrosmedia .col-md-3 { .titlefiltrosmedia .col-md-3 {
width: 22%; width: 22%;
} }
} }
</style> </style>
</asp:Content> </asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="E" runat="Server"> <asp:Content ID="Content3" ContentPlaceHolderID="E" runat="Server">
Kardex Almacén Horizontal Kardex Almacén Horizontal
</asp:Content> </asp:Content>
<asp:Content ID="Content4" ContentPlaceHolderID="HB" runat="Server"> <asp:Content ID="Content4" ContentPlaceHolderID="HB" runat="Server">
</asp:Content> </asp:Content>
<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server"> <asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
<li> <li>
<asp:LinkButton ID="LnkExportar" runat="server"><i class="fa fa-ad-excel"></i> Generar Excel</asp:LinkButton> <asp:LinkButton ID="LnkExportar" runat="server"><i class="fa fa-ad-excel"></i> Generar Excel</asp:LinkButton>
</li> </li>
</asp:Content> </asp:Content>
<asp:Content ID="Content6" ContentPlaceHolderID="HA" runat="Server"> <asp:Content ID="Content6" ContentPlaceHolderID="HA" runat="Server">
</asp:Content> </asp:Content>
<asp:Content ID="Content7" ContentPlaceHolderID="C" runat="Server"> <asp:Content ID="Content7" ContentPlaceHolderID="C" runat="Server">
<asp:UpdatePanel ID="UPFiltros" runat="server" UpdateMode="Conditional" RenderMode="Inline"> <asp:UpdatePanel ID="UPFiltros" runat="server" UpdateMode="Conditional" RenderMode="Inline">
<ContentTemplate> <ContentTemplate>
<div class="portlet solid grey-cascade portlet-filter"> <div class="portlet solid grey-cascade portlet-filter">
<div class="portlet-title portlet-filterT smalltitle" style="min-height: 49px; position: relative;"> <div class="portlet-title portlet-filterT smalltitle" style="min-height: 49px; position: relative;">
<div class="tools"> <div class="tools">
<asp:Button ID="btConsultar" runat="server" Text="Consultar" class="btn btn-primary" /> <asp:Button ID="btConsultar" 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>
<asp:CheckBox ID="chkexpand" CssClass="hidden" runat="server" /> <asp:CheckBox ID="chkexpand" CssClass="hidden" runat="server" />
</div> </div>
<div class="titlefiltros titlefiltrosmedia caption "> <div class="titlefiltros titlefiltrosmedia caption ">
<div class="row" style="padding-top: 10px; position: relative;"> <div class="row" style="padding-top: 10px; position: relative;">
<div class="col-md-1 truncate textfilter">Proveedor</div> <div class="col-md-1 truncate textfilter">Proveedor</div>
<div class="col-md-2"> <div class="col-md-2">
<ADS:Dropdownlost ID="DdlProveedor" runat="server" DataValueField="CveProveedor" DataTextField="RazonSocial" Width="100%" CssClassDdl="select2me" CssStyle="width: 100%;"></ADS:Dropdownlost> <ADS:Dropdownlost ID="DdlProveedor" runat="server" DataValueField="CveProveedor" DataTextField="RazonSocial" Width="100%" CssClassDdl="select2me" CssStyle="width: 100%;"></ADS:Dropdownlost>
</div> </div>
<label class="col-md-1 truncate textfilter2">Producto:</label> <label class="col-md-1 truncate textfilter2">Producto:</label>
<div class="col-md-2"> <div class="col-md-2">
<ADS:Dropdownlost ID="ddlProducto2" runat="server" AutoPostBack="False" DataTextField="PSCodigo" DataValueField="CvePS" CssClassDdl="select2me" Width="100%" CssStyle="width: 100%; "></ADS:Dropdownlost> <ADS:Dropdownlost ID="ddlProducto2" runat="server" AutoPostBack="False" DataTextField="PSCodigo" DataValueField="CvePS" CssClassDdl="select2me" Width="100%" CssStyle="width: 100%; "></ADS:Dropdownlost>
</div> </div>
<div class="col-md-2"> <label class="col-md-1 textfilter">Fecha Fin:</label>
<div class="row"> <div class="col-md-1" style="min-width: 110px;">
<label class="col-md-2 truncate">Marca:</label> <div style="display: inline-block; vertical-align: text-bottom;">
<div class="col-md-10"> <div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 110px !important; padding: 0px;">
<asp:DropDownList ID="DdlMarca" runat="server" CssClass="select2me " Style="width: 100px !important;" DataTextField="Marca" DataValueField="CveMarca"> <asp:TextBox ID="TxtFechaF" runat="server" CssClass="form-control" CausesValidation="true" Style="width: 80px" MaxLength="10"></asp:TextBox>
<asp:ListItem Text="Todas" Value="-1"></asp:ListItem> <span class="input-group-btn ">
</asp:DropDownList> <asp:LinkButton ID="ImgFechaF" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
</div> </span>
</div> </div>
</div> <ajax:MaskedEditExtender ID="MEEFechaF" runat="server" TargetControlID="TxtFechaF" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
<label class="col-md-1 textfilter">Fecha Fin:</label> <ajax:CalendarExtender runat="server" ID="CalendarExtender1" TargetControlID="TxtFechaF" PopupButtonID="ImgFechaF" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
<div class="col-md-1" style="min-width: 110px;"> </div>
<div style="display: inline-block; vertical-align: text-bottom;"> </div>
<div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 110px !important; padding: 0px;"> <label class="col-md-1 truncate">Producto:</label>
<asp:TextBox ID="TxtFechaF" runat="server" CssClass="form-control" CausesValidation="true" Style="width: 80px" MaxLength="10"></asp:TextBox> <div class="col-md-2">
<span class="input-group-btn "> <asp:DropDownList ID="DdlExistencia" runat="server" CssClass="select2me" Width="100%" CssStyle="width: 100%;">
<asp:LinkButton ID="ImgFechaF" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton> <asp:ListItem Text="Con existencia" Value="2" />
</span> <asp:ListItem Text="Sin existencia" Value="3" />
</div> </asp:DropDownList>
<ajax:MaskedEditExtender ID="MEEFechaF" runat="server" TargetControlID="TxtFechaF" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender> </div>
<ajax:CalendarExtender runat="server" ID="CalendarExtender1" TargetControlID="TxtFechaF" PopupButtonID="ImgFechaF" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender> </div>
</div> </div>
</div> </div>
<label class="col-md-1 truncate textfilter2">Producto:</label> <div class="portlet-body" <%= IIf(chkexpand.Checked = True, "", "style=""display:none;""")%>>
<div class="col-md-1"> <div class="row">
<asp:DropDownList ID="DdlExistencia" runat="server" CssClass="select2me"> <label class="col-md-1 truncate">Clasificación:</label>
<asp:ListItem Text="Con existencia" Value="2" /> <div class="col-md-2">
<asp:ListItem Text="Sin existencia" Value="3" /> <asp:DropDownList ID="DdlClasificacion" CssClass="select2me" runat="server" AppendDataBoundItems="true" AutoPostBack="true" DataTextField="Clasificacion" DataValueField="CveClasificacion" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 150px !important;">
</asp:DropDownList> <asp:ListItem Selected="True" Text="Seleccione la Clasificación (Todas)" Value="-1"></asp:ListItem>
</div> </asp:DropDownList>
</div> </div>
</div> <label class="col-md-1 truncate">Unidad Medida:</label>
</div> <div class="col-md-1">
<div class="portlet-body" <%= IIf(chkexpand.Checked = True, "", "style=""display:none;""")%>> <asp:DropDownList ID="DdlUnidadMedida" runat="server" CssClass="select2me " Style="width: 100px !important;" DataTextField="UnidadMedida" DataValueField="CveUnidadMedida">
<div class="row"> <asp:ListItem Text="Todos" Value="-1"></asp:ListItem>
<label class="col-md-1 truncate">Clasificación:</label> </asp:DropDownList>
<div class="col-md-2"> </div>
<asp:DropDownList ID="DdlClasificacion" CssClass="select2me" runat="server" AppendDataBoundItems="true" AutoPostBack="true" DataTextField="Clasificacion" DataValueField="CveClasificacion" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 150px !important;"> <label class="col-md-1 truncate">Almacén:</label>
<asp:ListItem Selected="True" Text="Seleccione la Clasificación (Todas)" Value="-1"></asp:ListItem> <div class="col-md-2">
</asp:DropDownList> <asp:DropDownList ID="ddlAlmacen" runat="server" CssClass="select2me " Style="width: 200px !important;" DataTextField="Almacen" DataValueField="CveAlmacen"></asp:DropDownList>
</div> </div>
<label class="col-md-1 truncate">Unidad Medida:</label> <label class="col-md-1 truncate">Tipo Almacen:</label>
<div class="col-md-1"> <div class="col-md-1">
<asp:DropDownList ID="DdlUnidadMedida" runat="server" CssClass="select2me " Style="width: 100px !important;" DataTextField="UnidadMedida" DataValueField="CveUnidadMedida"> <asp:DropDownList ID="DdlTipoAlmacen" CssClass="select2me" runat="server" AppendDataBoundItems="true" DataTextField="TipoAlmacen" DataValueField="CveTipoAlmacen" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 100px !important;">
<asp:ListItem Text="Todos" Value="-1"></asp:ListItem> <asp:ListItem Selected="True" Text="Seleccione el tipo de Almacen (Todos)" Value="-1"></asp:ListItem>
</asp:DropDownList> </asp:DropDownList>
</div> </div>
<label class="col-md-1 truncate">Almacén:</label> <label class="col-md-1 truncate">Tránsito?:</label>
<div class="col-md-2"> <div class="col-md-1">
<asp:DropDownList ID="ddlAlmacen" runat="server" CssClass="select2me " Style="width: 200px !important;" DataTextField="Almacen" DataValueField="CveAlmacen"></asp:DropDownList> <asp:DropDownList ID="DdlIncluyeTransitorios" CssClass="select2me" runat="server" AppendDataBoundItems="true" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 100px !important;">
</div> <asp:ListItem Text="No" Value="0" Selected="True"></asp:ListItem>
<label class="col-md-1 truncate">Tipo Almacen:</label> <asp:ListItem Text="Si (Origen)" Value="1"></asp:ListItem>
<div class="col-md-1"> <asp:ListItem Text="Si (Destino)" Value="2"></asp:ListItem>
<asp:DropDownList ID="DdlTipoAlmacen" CssClass="select2me" runat="server" AppendDataBoundItems="true" DataTextField="TipoAlmacen" DataValueField="CveTipoAlmacen" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 100px !important;"> </asp:DropDownList>
<asp:ListItem Selected="True" Text="Seleccione el tipo de Almacen (Todos)" Value="-1"></asp:ListItem> <%--<asp:CheckBox ID="ChkIncluyeTransitorios" runat="server" Checked="false" />--%>
</asp:DropDownList> </div>
</div> </div>
<label class="col-md-1 truncate">Tránsito?:</label> <asp:Panel ID="pnlOrden" runat="server" CssClass="row">
<div class="col-md-1"> <label class="col-md-1 truncate">Orden:</label>
<asp:DropDownList ID="DdlIncluyeTransitorios" CssClass="select2me" runat="server" AppendDataBoundItems="true" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 100px !important;"> <div class="col-md-2">
<asp:ListItem Text="No" Value="0" Selected="True"></asp:ListItem> <asp:DropDownList ID="DdlOrden" runat="server" CssClass="select2me" Width="100%">
<asp:ListItem Text="Si (Origen)" Value="1"></asp:ListItem> <asp:ListItem Text="Seleccione" Value="-1" Selected="True" />
<asp:ListItem Text="Si (Destino)" Value="2"></asp:ListItem> <asp:ListItem Text="Marca,Modelo,Rin,Medida de Barrenación" Value="1" />
</asp:DropDownList> <asp:ListItem Text="Familia,Marca,Rin,Medida de Barrenación" Value="2" />
<%--<asp:CheckBox ID="ChkIncluyeTransitorios" runat="server" Checked="false" />--%> <asp:ListItem Text="Familia,Linea,Rin,Medida de Barrenación" Value="3" />
</div> </asp:DropDownList>
</div> </div>
<asp:Panel ID="pnlOrden" runat="server" CssClass="row"> <div class="col-md-3">
<label class="col-md-1 truncate">Orden:</label> <div class="row">
<div class="col-md-2"> <label class="col-md-3 truncate">Marca:</label>
<asp:DropDownList ID="DdlOrden" runat="server" CssClass="select2me" Width="100%"> <div class="col-md-9">
<asp:ListItem Text="Seleccione" Value="-1" Selected="True" /> <asp:ListBox ID="DdlMarca" runat="server" DataTextField="Marca" DataValueField="CveMarca" data-text="Todos" SelectionMode="Multiple" CssClass="form-control ddlFiltros input-sm select2me Widthall" Style="width: 100%; height:50px !important;">
<asp:ListItem Text="Marca,Modelo,Rin,Medida de Barrenación" Value="1" /> <asp:ListItem Text="Todas" Value="-1"></asp:ListItem>
<asp:ListItem Text="Familia,Marca,Rin,Medida de Barrenación" Value="2" /> </asp:ListBox>
<asp:ListItem Text="Familia,Linea,Rin,Medida de Barrenación" Value="3" /> </div>
</asp:DropDownList> </div>
</div> </div>
</asp:Panel> </asp:Panel>
</div> </div>
</div> </div>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
<div class="text-right"> <div class="text-right">
<input type="text" id="TxtBusqueda2" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda2','{0}')", GvDatos.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" /> <input type="text" id="TxtBusqueda2" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda2','{0}')", GvDatos.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
<a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda2','{0}')", GvDatos.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a> <a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda2','{0}')", GvDatos.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
</div> </div>
<table class="Widthall ScrollAD"> <table class="Widthall ScrollAD">
<tr style="width: 100%"> <tr style="width: 100%">
<td style="padding: 0px;"> <td style="padding: 0px;">
<table class="table Widthall"> <table class="table Widthall">
<tr> <tr>
</tr> </tr>
</table> </table>
</td> </td>
</tr> </tr>
<tr> <tr>
<td style="padding: 0px"> <td style="padding: 0px">
<asp:UpdatePanel ID="UpDatos" runat="server"> <asp:UpdatePanel ID="UpDatos" runat="server">
<ContentTemplate> <ContentTemplate>
<asp:GridView ID="GvDatos" runat="server" ShowHeader="true" EmptyDataText="No hay registros." AutoGenerateColumns="True" <asp:GridView ID="GvDatos" runat="server" ShowHeader="true" EmptyDataText="No hay registros." AutoGenerateColumns="True"
ShowFooter="True" ShowHeaderWhenEmpty="True" HeaderStyle-CssClass="Texto" CssClass="table table-striped table-hover Widthall ScrollAD" data-sort="true" GridLines="None"> ShowFooter="True" ShowHeaderWhenEmpty="True" HeaderStyle-CssClass="Texto" CssClass="table table-striped table-hover Widthall ScrollAD" data-sort="true" GridLines="None">
<Columns> <Columns>
<asp:TemplateField ItemStyle-HorizontalAlign="Left"> <asp:TemplateField ItemStyle-HorizontalAlign="Left">
<HeaderTemplate> <HeaderTemplate>
Código Código
</HeaderTemplate>
<ItemTemplate> </HeaderTemplate>
<div class='truncate' style='width: 200px;'> <ItemTemplate>
<asp:Label runat="server" Text='<%# Eval("Codigo") %>' Width="100px"></asp:Label> <div class='truncate' style='width: 200px;'>
</div> <asp:Label runat="server" Text='<%# Eval("Codigo") %>' Width="100px"></asp:Label>
</ItemTemplate> </div>
</asp:TemplateField> </ItemTemplate>
<asp:TemplateField ItemStyle-HorizontalAlign="Left"> </asp:TemplateField>
<HeaderTemplate> <asp:TemplateField ItemStyle-HorizontalAlign="Left">
<HeaderTemplate>
Producto Producto
</HeaderTemplate>
<ItemTemplate> </HeaderTemplate>
<div class='truncate' style='width: 200px;'> <ItemTemplate>
<asp:Label runat="server" Text='<%# Eval("PS") %>' Width="250px"></asp:Label> <div class='truncate' style='width: 200px;'>
</div> <asp:Label runat="server" Text='<%# Eval("PS") %>' Width="250px"></asp:Label>
</ItemTemplate> </div>
</asp:TemplateField> </ItemTemplate>
</Columns> </asp:TemplateField>
</asp:GridView> </Columns>
</ContentTemplate> </asp:GridView>
</asp:UpdatePanel> </ContentTemplate>
</td> </asp:UpdatePanel>
</tr> </td>
</table> </tr>
</asp:Content> </table>
<asp:Content ID="Content8" ContentPlaceHolderID="JS" runat="Server"> </asp:Content>
</asp:Content> <asp:Content ID="Content8" ContentPlaceHolderID="JS" runat="Server">
</asp:Content>

40
Inventarios/KardexAlmacenHorizontal.aspx.vb
View File

@@ -22,9 +22,6 @@ Partial Class Inventarios_KardexAlmacen
ddlProducto2.SelectedValue = If(Request("CvePS") IsNot Nothing, Request("CvePS").ToString, "-1") ddlProducto2.SelectedValue = If(Request("CvePS") IsNot Nothing, Request("CvePS").ToString, "-1")
End If End If
End Sub End Sub
Private Function isWithFamily() As Boolean
Return (UsuarioActual.CveEmpresa = 66)
End Function
Private Sub CargaCombos() Private Sub CargaCombos()
CargaFuncionalidad105() CargaFuncionalidad105()
@@ -55,25 +52,21 @@ Partial Class Inventarios_KardexAlmacen
End Sub End Sub
Private Sub CargaClasificaciones() Private Sub CargaClasificaciones()
Dim CveClasificacion = If(Request("CveClasificacion") IsNot Nothing, Request("CveClasificacion").ToString, "-1") Dim CveClasificacion = If(Request("CveClasificacion") IsNot Nothing, Request("CveClasificacion").ToString, "-1")
If isWithFamily() Then Dim ObjClasificaciones As New ClsClasificaciones
DdlClasificacion.DataSource = GlobalDTSubFamilias(UsuarioActual.CveEmpresa).FiltraParametros("", Orderby:="Clasificacion") If UsuarioActual.Empresa.UsaAC Then
Else If ObjClasificaciones.GetClasificacionesExistencias(UsuarioActual.CveEmpresa) Then
Dim ObjClasificaciones As New ClsClasificaciones DdlClasificacion.DataSource = ObjClasificaciones.DtResultados
If UsuarioActual.Empresa.UsaAC Then DdlClasificacion.DataBind()
If ObjClasificaciones.GetClasificacionesExistencias(UsuarioActual.CveEmpresa) Then End If
DdlClasificacion.DataSource = ObjClasificaciones.DtResultados Else
DdlClasificacion.DataBind() If ObjClasificaciones.GetClasificacionesExistencias(UsuarioActual.CveEmpresa) Then
End If DdlClasificacion.DataSource = ObjClasificaciones.DtResultados
Else DdlClasificacion.DataBind()
If ObjClasificaciones.GetClasificacionesExistencias(UsuarioActual.CveEmpresa) Then End If
DdlClasificacion.DataSource = ObjClasificaciones.DtResultados End If
DdlClasificacion.DataBind() ObjClasificaciones.Dispose()
End If
End If
ObjClasificaciones.Dispose()
End If
DdlClasificacion.DataBind() DdlClasificacion.DataBind()
DdlClasificacion.SelectedValueExist(CveClasificacion) DdlClasificacion.SelectedValueExist(CveClasificacion)
@@ -139,8 +132,9 @@ Partial Class Inventarios_KardexAlmacen
Dim FechaF As Date = TxtFechaF.Text.ToDate Dim FechaF As Date = TxtFechaF.Text.ToDate
Dim CveAlmacen As Integer = ddlAlmacen.SelectedValue.ToEntero Dim CveAlmacen As Integer = ddlAlmacen.SelectedValue.ToEntero
Dim CveProveedorCompra As Integer = If(DdlProveedor.SelectedValue.ToEntero > 0, DdlProveedor.SelectedValue.ToEntero, -1) Dim CveProveedorCompra As Integer = If(DdlProveedor.SelectedValue.ToEntero > 0, DdlProveedor.SelectedValue.ToEntero, -1)
Dim Marcas As String = If(DdlMarca.GetSelectedValuesM = "", "-1", DdlMarca.GetSelectedValuesM)
If ObjMovimientos.GetKardexAlmacenHorizontal(CvePS, FechaF, CveAlmacen, DdlUnidadMedida.SelectedValue.ToEntero, CveProveedorCompra, DdlTipoAlmacen.SelectedValue.ToEntero(), DdlIncluyeTransitorios.SelectedValue.ToEntero(), DdlClasificacion.SelectedValue.ToEntero, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CondicionExistencias:=DdlExistencia.SelectedValue, Orden:=DdlOrden.SelectedValue.ToEntero(), CveMarca:=DdlMarca.SelectedValue.ToEntero()) Then If ObjMovimientos.GetKardexAlmacenHorizontal(CvePS, FechaF, CveAlmacen, DdlUnidadMedida.SelectedValue.ToEntero, CveProveedorCompra, DdlTipoAlmacen.SelectedValue.ToEntero(), DdlIncluyeTransitorios.SelectedValue.ToEntero(), DdlClasificacion.SelectedValue.ToEntero, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CondicionExistencias:=DdlExistencia.SelectedValue, Orden:=DdlOrden.SelectedValue.ToEntero(), Marcas:=Marcas) Then
If ObjMovimientos.DtResultados IsNot Nothing AndAlso ObjMovimientos.DtResultados.Rows.Count > 0 Then If ObjMovimientos.DtResultados IsNot Nothing AndAlso ObjMovimientos.DtResultados.Rows.Count > 0 Then
dt = ObjMovimientos.DtResultados dt = ObjMovimientos.DtResultados
Dim ListaBorrar As New List(Of DataColumn) Dim ListaBorrar As New List(Of DataColumn)