diff --git a/App_Code/ClsInventarios.vb b/App_Code/ClsInventarios.vb
index 7b8d53ecf..32297767a 100644
--- a/App_Code/ClsInventarios.vb
+++ b/App_Code/ClsInventarios.vb
@@ -1472,7 +1472,7 @@ Public Class ClsInventarios
         Return Retorno
 
     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) 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) As Boolean
         Dim Retorno As Boolean = False
 
         DataAdapter("PA_Inv_KardexAlmacenHorizontalGet")
@@ -1490,6 +1490,7 @@ Public Class ClsInventarios
             .Add("@CveProveedorCompra", SqlDbType.Int).Value = CveProveedor
             .Add("@CveTipoAlmacen", SqlDbType.Int).Value = CveTipoAlmacen
             .Add("@ExistenciasCondicion", SqlDbType.Int).Value = CondicionExistencias
+            .Add("@Orden", SqlDbType.Int).Value = Orden
         End With
 
         Try
diff --git a/Inventarios/KardexAlmacenHorizontal.aspx b/Inventarios/KardexAlmacenHorizontal.aspx
index 397af66ab..b0c469f31 100644
--- a/Inventarios/KardexAlmacenHorizontal.aspx
+++ b/Inventarios/KardexAlmacenHorizontal.aspx
@@ -58,6 +58,26 @@
             .psagregar > div.codigo > input[type="submit"] {
                 display: none;
             }
+
+        @media (min-width: 991px) {
+            .textfilter {
+                max-width: 80px;
+            }
+
+            .textfilter2 {
+                max-width: 70px;
+            }
+
+            .dateFilter {
+                min-width: 115px;
+            }
+        }
+
+        @media (min-width: 991px) and (max-width: 1400px) {
+            .titlefiltrosmedia .col-md-3 {
+                width: 22%;
+            }
+        }
     </style>
 </asp:Content>
 
@@ -87,18 +107,18 @@
                         <a href="javascript;" data-idchekbox="<%= chkexpand.ClientID%>" class=" <%= IIf(chkexpand.Checked = True, "collapse", "expand")%>"></a>
                         <asp:CheckBox ID="chkexpand" CssClass="hidden" runat="server" />
                     </div>
-                    <div class="titlefiltros caption ">
+                    <div class="titlefiltros titlefiltrosmedia  caption ">
                         <div class="row" style="padding-top: 10px; position: relative;">
-                            <div class="col-md-1 truncate">Proveedor</div>
+                            <div class="col-md-1 truncate textfilter">Proveedor</div>
                             <div class="col-md-3">
                                 <ADS:Dropdownlost ID="DdlProveedor" runat="server" DataValueField="CveProveedor" DataTextField="RazonSocial" Width="100%" CssClassDdl="select2me" CssStyle="width: 100%;"></ADS:Dropdownlost>
                             </div>
-                            <label class="col-md-1 truncate">Producto:</label>
-                            <div class="col-md-3" style="min-width: 250px; max-width: 300px;">
-                                <ADS:Dropdownlost ID="ddlProducto2" runat="server" AutoPostBack="False" DataTextField="PSCodigo" DataValueField="CvePS" CssClassDdl="select2me" CssStyle="width: 250px; "></ADS:Dropdownlost>
+                            <label class="col-md-1 truncate textfilter2">Producto:</label>
+                            <div class="col-md-3">
+                                <ADS:Dropdownlost ID="ddlProducto2" runat="server" AutoPostBack="False" DataTextField="PSCodigo" DataValueField="CvePS" CssClassDdl="select2me" Width="100%" CssStyle="width: 100%; "></ADS:Dropdownlost>
                             </div>
-                            <label class="col-md-1">Fecha Fin:</label>
-                            <div class="col-md-1">
+                            <label class="col-md-1 textfilter">Fecha Fin:</label>
+                            <div class="col-md-1" style="min-width: 110px;">
                                 <div style="display: inline-block; vertical-align: text-bottom;">
                                     <div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 110px !important; padding: 0px;">
                                         <asp:TextBox ID="TxtFechaF" runat="server" CssClass="form-control" CausesValidation="true" Style="width: 80px" MaxLength="10"></asp:TextBox>
@@ -110,7 +130,7 @@
                                     <ajax:CalendarExtender runat="server" ID="CalendarExtender1" TargetControlID="TxtFechaF" PopupButtonID="ImgFechaF" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
                                 </div>
                             </div>
-                            <label class="col-md-1 truncate" style="width:120px">Producto:</label>
+                            <label class="col-md-1 truncate textfilter2">Producto:</label>
                             <div class="col-md-1">
                                 <asp:DropDownList ID="DdlExistencia" runat="server" CssClass="select2me">
                                     <asp:ListItem Text="Con existencia" Value="2" />
@@ -146,7 +166,7 @@
                         </div>
                         <label class="col-md-1 truncate">Tránsito?:</label>
                         <div class="col-md-1">
-                            <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;">
+                            <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;">
                                 <asp:ListItem Text="No" Value="0" Selected="True"></asp:ListItem>
                                 <asp:ListItem Text="Si (Origen)" Value="1"></asp:ListItem>
                                 <asp:ListItem Text="Si (Destino)" Value="2"></asp:ListItem>
@@ -154,6 +174,17 @@
                             <%--<asp:CheckBox ID="ChkIncluyeTransitorios" runat="server" Checked="false" />--%>
                         </div>
                     </div>
+                    <asp:Panel ID="pnlOrden" runat="server" CssClass="row">
+                        <label class="col-md-1 truncate">Orden:</label>
+                            <div class="col-md-2">
+                                <asp:DropDownList ID="DdlOrden" runat="server" CssClass="select2me" Width="100%">
+                                    <asp:ListItem Text="Seleccione" Value="-1" Selected="True" />
+                                    <asp:ListItem Text="Marca,Modelo,Rin,Medida de Barrenación" Value="1" />
+                                    <asp:ListItem Text="Familia,Marca,Rin,Medida de Barrenación" Value="2" />
+                                    <asp:ListItem Text="Familia,Linea,Rin,Medida de Barrenación" Value="3" />
+                                </asp:DropDownList>
+                            </div>
+                    </asp:Panel>
                 </div>
             </div>
         </ContentTemplate>
diff --git a/Inventarios/KardexAlmacenHorizontal.aspx.vb b/Inventarios/KardexAlmacenHorizontal.aspx.vb
index b8c30dfb3..92b34df1c 100644
--- a/Inventarios/KardexAlmacenHorizontal.aspx.vb
+++ b/Inventarios/KardexAlmacenHorizontal.aspx.vb
@@ -13,7 +13,7 @@ Partial Class Inventarios_KardexAlmacen
             TxtFechaF.Text = Now.ToShortDateString
             CargaCombos()
             ddlAlmacen.Items.Insert(0, New ListItem("Todos", "-1"))
-
+            pnlOrden.Visible = UsuarioActual.CveEmpresa = 141
             If IfNull(Request("CvePS"), "-1").ToString.ToEntero > 0 Then CargarKardex(Request("CvePS").ToString.ToEntero)
             ddlProducto2.SelectedValue = If(Request("CvePS") IsNot Nothing, Request("CvePS").ToString, "-1")
         End If
@@ -128,7 +128,7 @@ Partial Class Inventarios_KardexAlmacen
         Dim CveAlmacen As Integer = ddlAlmacen.SelectedValue.ToEntero
         Dim CveProveedorCompra As Integer = If(DdlProveedor.SelectedValue.ToEntero > 0, DdlProveedor.SelectedValue.ToEntero, -1)
 
-        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) 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()) Then
             If ObjMovimientos.DtResultados IsNot Nothing AndAlso ObjMovimientos.DtResultados.Rows.Count > 0 Then
                 dt = ObjMovimientos.DtResultados
                 Dim ListaBorrar As New List(Of DataColumn)
diff --git a/vwd.webinfo b/vwd.webinfo
index 2515705b1..bfda47f43 100644
--- a/vwd.webinfo
+++ b/vwd.webinfo
@@ -21,6 +21,8 @@
   
     
   
+    
+  
     <Service ID="{C0C07587-41A7-46C8-8FBD-3F9C8EBE2DDC}"/>
   </StartupServices>
 </VisualWebDeveloper>
\ No newline at end of file