aplicando retro sobre sobre el tiempo caducidad

App_Code/ClsPaginas.vb

@@ -38,14 +38,14 @@ Public Class ClsPaginas
 
 
 
-    Public ReadOnly Property EsProduccion As Boolean
+    Public ReadOnly Property EsProduccion As Boolean
-        Get
+        Get
-            If IsNothing(System.Configuration.ConfigurationManager.AppSettings("EsProduccion")) Then
+            If IsNothing(System.Configuration.ConfigurationManager.AppSettings("EsProduccion")) Then
-                Return False
+                Return False
-            Else
+            Else
-                Return (System.Configuration.ConfigurationManager.AppSettings("EsProduccion").ToString() = "1")
+                Return (System.Configuration.ConfigurationManager.AppSettings("EsProduccion").ToString() = "1")
-            End If
+            End If
-        End Get
+        End Get
     End Property
 
 #Region "Propiedades"

Inventarios/Kardex.aspx

@@ -560,8 +560,8 @@
                                         DataKeyNames="Almacen,Cantidad,FechaCaducidad">
                                         <Columns>
                                             <asp:BoundField HeaderText="Almacén" DataField="Almacen"/>
-                                            <asp:BoundField HeaderText="Cantidad" DataField="Cantidad"/>
+                                            <asp:BoundField HeaderText="Cantidad" DataField="Cantidad" DataFormatString="{0:n2}" ItemStyle-HorizontalAlign="Right"/>
-                                            <asp:BoundField HeaderText="Fecha Caducidad" DataField="FechaCaducidad"/>
+                                            <asp:BoundField HeaderText="Fecha Caducidad" DataField="FechaCaducidad" DataFormatString="{0:dd/MM/yyyy}"/>
                                         </Columns>
 
                                     </asp:GridView>

Ventas/ProductosServicios.aspx

@@ -876,7 +876,7 @@
                                                 <div class="row" style="margin-top: 5px;" runat="server" id="DivTiempoCaducidad" visible="false">
                                                     <label class="col-md-6 truncate">Tiempo de Caducidad</label>
                                                     <div class="col-md-6">
-                                                        <asp:TextBox runat="server" ID="TxtTiempoCaducidad"/><label>Días</label>
+                                                        <asp:TextBox runat="server" ID="TxtTiempoCaducidad" Width="75px"/><label>Días</label>
                                                         <asp:RegularExpressionValidator ID="RfvTxtTiempoCaducidad" runat="server" ControlToValidate="TxtTiempoCaducidad" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Tiempo Caducidad''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar" ValidationExpression="\d{1,}" Display="None"></asp:RegularExpressionValidator>
                                                         <ajax:ValidatorCalloutExtender ID="VceTxtTiempoCaducidad" runat="server" HighlightCssClass="vco" TargetControlID="RfvTxtTiempoCaducidad" Width="300px" ></ajax:ValidatorCalloutExtender>
                                                     </div>

Ventas/ProductosServicios.aspx.vb

@@ -876,6 +876,10 @@ Partial Class ProductosyServicios
                 ChkLote.Checked = ObjProductosServicios.AplicaLote
                 ChkCaducidad.Checked = ObjProductosServicios.AplicaCaducidad
                 ChkSeccion.Checked = ObjProductosServicios.AplicaSeccion
+                If ObjProductosServicios.DtResultados.Rows(0)("TiempoCaducidad") IsNot Nothing Then
+                    TxtTiempoCaducidad.Text = ObjProductosServicios.DtResultados.Rows(0)("TiempoCaducidad").ToString()
+                    DivTiempoCaducidad.Visible = ChkCaducidad.Checked
+                End If
 
                 If ObjProductosServicios.AplicaSeccion Then
                     CargaGvSeccionAlmacen()