diff --git a/Inventarios/TraspasoAlmacen.aspx b/Inventarios/TraspasoAlmacen.aspx
index 171a85c90..71dbc9b57 100644
--- a/Inventarios/TraspasoAlmacen.aspx
+++ b/Inventarios/TraspasoAlmacen.aspx
@@ -644,7 +644,12 @@
                                         <asp:BoundField HeaderText="Unidad" DataField="UnidadMedida" ItemStyle-Width="10%" />
                                         <asp:BoundField HeaderText="Código" DataField="Codigo" ItemStyle-Width="10%" />
                                         <asp:BoundField HeaderText="Producto" DataField="PS" ItemStyle-Width="40%" />
-                                        <asp:BoundField HeaderText="Serie" DataField="Serie" ItemStyle-Width="15%" />
+                                        <%--<asp:BoundField HeaderText="Serie" DataField="Serie" ItemStyle-Width="15%" />--%>
+                                        <asp:TemplateField HeaderText="Serie" ItemStyle-Width="15%"  Visible="false" >
+                                            <ItemTemplate>
+                                                <asp:TextBox ID="TxtSerie" Width="90px" runat="server" Text='<%# Eval("Serie") %>' ></asp:TextBox>
+                                            </ItemTemplate>
+                                        </asp:TemplateField>
                                         <asp:TemplateField HeaderText="Lote" ItemStyle-Width="15%" ItemStyle-HorizontalAlign="Center"  Visible="false" >
                                             <ItemTemplate>
                                                 <asp:TextBox ID="TxtLote" Width="60px" runat="server" Text='<%# Eval("Lote") %>'  Visible="false"></asp:TextBox>
diff --git a/Inventarios/TraspasoAlmacen.aspx.vb b/Inventarios/TraspasoAlmacen.aspx.vb
index a9b0106c7..8d8bec1e5 100644
--- a/Inventarios/TraspasoAlmacen.aspx.vb
+++ b/Inventarios/TraspasoAlmacen.aspx.vb
@@ -1718,7 +1718,10 @@ Partial Class Inventarios_TraspasoAlmacen
             GvDatosRecepcion.DataSource = Dtt
             GvDatosRecepcion.DataBind()
 
-            GvDatosRecepcion.Columns(6).Visible = Dtt.MAX("Serie") <> ""
+
+
+            'GvDatosRecepcion.Columns(6).Visible = Dtt.MAX("Serie") <> ""
+            GvDatosRecepcion.Columns(6).Visible = Dtt.MAX("AplicaSerie") = "True"
             GvDatosRecepcion.Columns(7).Visible = Dtt.MAX("AplicaLote").ToEntero > 0 'Dtt.MAX("Lote") <> ""
             GvDatosRecepcion.Columns(8).Visible = Dtt.MAX("AplicaCaducidad").ToEntero > 0 'Dtt.MAX("FechaCaducidad").ToDate > MinFecha
             GvDatosRecepcion.Columns(9).Visible = Dtt.MAX("CveSeccionAlmacen").ToEntero > 0
@@ -1763,6 +1766,7 @@ Partial Class Inventarios_TraspasoAlmacen
 
                 e.Row.FCCheckBox("Chk").Visible = False
                 e.Row.FCTextBox("TxtCantidad").Visible = False
+                e.Row.FCTextBox("TxtSerie").Visible = False
 
                 e.Row.Cells(2).Text = String.Format("Folio: <a class=""texto"" style=""color:white;"" target='_blank' href='/Inventarios/EntradasSalidas.aspx?CveMovimiento={1}'>{0}</a> ", e.Row.DBCampo("FolioSalida"), e.Row.DBCampo("CveMovimientoSalida"))
                 e.Row.Cells(3).Text = String.Format("{0}", e.Row.DBCampo("FechaMovto").ToString.ToDate.ToShortDateString)
@@ -2099,6 +2103,7 @@ Partial Class Inventarios_TraspasoAlmacen
                         Dim PrecioEntrada As Decimal = If(TipoAlmacenDestino = 26, 0, gvr.DataKey("PU").ToString.ToDecimal)
                         ''RMF codigo temporal. por implementación
                         Dim tLote As String = gvr.DataKey("Lote").ToString
+                        Dim tSerie As String = gvr.FCTextBox("TxtSerie").Text 'gvr.DataKey("Serie").ToString
                         Dim tFechaCaducidad As Date = gvr.DataKey("FechaCaducidad").ToDate
 
                         If CveSubProyectoRecibe.ToString.Contiene(UsuarioActual.Empresa.Funcionalidad(347)) Then
@@ -2106,7 +2111,7 @@ Partial Class Inventarios_TraspasoAlmacen
                             tFechaCaducidad = gvr.FCTextBox("TxtCaducidad").Text.ToDate
                         End If
 
-                        If Not ObjInventario.AddMovimientoDetalle(CveMovimientoEntrada, gvr.FCTextBox("TxtCantidad").Text.ToString.ToDecimal, gvr.DataKey("CveUM").ToString.ToEntero, gvr.DataKey("CvePS").ToString.ToEntero, PrecioEntrada, CveAF:=gvr.DataKey("CveAF").ToString.ToEntero, CveSeccionAlmacen:=gvr.FCDropDownList("DdlSeccionAlmacen").SelectedValue.ToEntero, Serie:=gvr.DataKey("Serie").ToString, Lote:=tLote, FechaCaducidad:=tFechaCaducidad, CveMovimientoDetalleEntrada:=CveMovimientoDetalleEntrada) Then
+                        If Not ObjInventario.AddMovimientoDetalle(CveMovimientoEntrada, gvr.FCTextBox("TxtCantidad").Text.ToString.ToDecimal, gvr.DataKey("CveUM").ToString.ToEntero, gvr.DataKey("CvePS").ToString.ToEntero, PrecioEntrada, CveAF:=gvr.DataKey("CveAF").ToString.ToEntero, CveSeccionAlmacen:=gvr.FCDropDownList("DdlSeccionAlmacen").SelectedValue.ToEntero, Serie:=tSerie, Lote:=tLote, FechaCaducidad:=tFechaCaducidad, CveMovimientoDetalleEntrada:=CveMovimientoDetalleEntrada) Then
                             ErrorMovInv = True
                             TextoError = "Ocurrió un error al guardar los movimientos de salida"
                             Exit For