diff --git a/Compras/Compras.aspx b/Compras/Compras.aspx
index ded4e0c6f..1ae19bf47 100644
--- a/Compras/Compras.aspx
+++ b/Compras/Compras.aspx
@@ -2338,7 +2338,7 @@
                                 </tr>
                                 <tr>
                                     <td align="left">
-                                        <asp:Label ID="LblAplicaNC" runat="server" Width="100px" Text="Aplica NC:" ToolTip="Aplica Nota Crédito"></asp:Label></td>
+                                        <asp:Label ID="LblAplicaNC" runat="server" Width="100px" Text="Aplica NC/Dev:" ToolTip="Aplica Nota Crédito"></asp:Label></td>
                                     <td align="left">
                                         <asp:CheckBox ID="ChkAplicaNotaCredito" CssClass="make-switchsd" runat="server" /></td>
                                 </tr>
diff --git a/Inventarios/EntradasSalidas.aspx.vb b/Inventarios/EntradasSalidas.aspx.vb
index f297ce97f..cbcb4ec02 100644
--- a/Inventarios/EntradasSalidas.aspx.vb
+++ b/Inventarios/EntradasSalidas.aspx.vb
@@ -435,6 +435,7 @@ Partial Class Inventarios_EntradasSalidas
         dt.Columns.Add("Serie", Type.GetType("System.String"))
         dt.Columns.Add("Lote", Type.GetType("System.String"))
         dt.Columns.Add("FechaCaducidad", Type.GetType("System.DateTime"))
+        dt.Columns.Add("AplicaCaducidad", Type.GetType("System.String"))
 
         dt.Columns.Add("Observaciones")
         dt.Columns.Add("CountMovimientoEntradaDetalle")
@@ -1261,6 +1262,7 @@ Partial Class Inventarios_EntradasSalidas
             registro.Item("Lote") = If(Lote <> "", Lote, "")
             registro.Item("FechaCaducidad") = FechaCaducidad
             registro.Item("Observaciones") = Observaciones
+            registro.Item("AplicaCaducidad") = RowPS("AplicaCaducidad").ToString
             DtMovimientos.Rows.Add(registro)
             CargaGVM(DtMovimientos.FiltraParametros("Estatus <> 'E' "))
             RegistraScript("playsonidito('beep-07.wav')")