diff --git a/Ventas/ProductosServicios.aspx b/Ventas/ProductosServicios.aspx
index 1163fa121..e19e1185a 100644
--- a/Ventas/ProductosServicios.aspx
+++ b/Ventas/ProductosServicios.aspx
@@ -174,7 +174,7 @@
                                                 <asp:ListItem Text="Producto" Value="2"></asp:ListItem>
                                                 <asp:ListItem Text="Servicio" Value="1"></asp:ListItem>
                                             </asp:DropDownList>
-                                            <label for="<%= DdlTipoPS.ClientID.ToString()%>">Tipo PS:</label>
+                                            <label for="<%= DdlTipoPS.ClientID.ToString()%>">Tipo Producto Servicio:</label>
                                             <asp:RequiredFieldValidator ID="RFVTipoPS" runat="server" ControlToValidate="DdlTipoPS" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Tipo''</b> es necesario, por favor seleccione uno." InitialValue="-1" ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
                                             <ajax:ValidatorCalloutExtender ID="VCETipoPS" runat="server" HighlightCssClass="vco" TargetControlID="RFVTipoPS" Width="300px"></ajax:ValidatorCalloutExtender>
                                             <i></i>
@@ -200,7 +200,7 @@
                                         <div class="form-group form-md-line-input input-iconright DIVCLASIFICACIONCONTABLE" id="DivDdlClasificacion" runat="server">
                                             <asp:DropDownList ID="DdlClasificacion" CssClass="form-control input-sm select2me" OnSelectedIndexChanged="DdlClasificacion_SelectedIndexChanged" AutoPostBack="true" runat="server" AppendDataBoundItems="true" CausesValidation="true" DataTextField="Clasificacion" DataValueField="CveClasificacion" Width="350px">
                                             </asp:DropDownList>
-                                            <label for="<%= DdlClasificacion.ClientID.ToString()%>">Clasificación Contable:</label>
+                                            <label for="<%= DdlClasificacion.ClientID.ToString()%>">Clasificación del producto:</label>
                                             <asp:RequiredFieldValidator ID="RFVClasificacion" runat="server" ControlToValidate="DdlClasificacion" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Clasificación''</b> es necesario, por favor seleccione uno." InitialValue="-1" ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
                                             <ajax:ValidatorCalloutExtender ID="VCClasificacion" runat="server" HighlightCssClass="vco" TargetControlID="RFVClasificacion" Width="300px"></ajax:ValidatorCalloutExtender>
                                             <i></i>
@@ -1020,7 +1020,7 @@
                                                     <label class="col-md-6 truncate">Aplica Lote</label>
                                                     <div class="col-md-6">
 
-                                                        <asp:CheckBox ID="ChkLote" CssClass="chksino" data-size="small" runat="server" Text=" " />
+                                                        <asp:CheckBox ID="ChkLote" CssClass="chksino" data-size="smaller" runat="server" Text=" " />
 
                                                     </div>
                                                 </div>
diff --git a/Ventas/ProductosServicios.aspx.vb b/Ventas/ProductosServicios.aspx.vb
index af051c9da..b9abdc86f 100644
--- a/Ventas/ProductosServicios.aspx.vb
+++ b/Ventas/ProductosServicios.aspx.vb
@@ -227,6 +227,12 @@ Partial Class ProductosyServicios
                     End If
                 End If
 
+                If UsuarioActual.Empresa.Funcionalidad(170) <> "" Then
+                    ChkSerie.Checked = UsuarioActual.Empresa.Funcionalidad(170).Contains("SERIE")
+                    ChkLote.Checked = UsuarioActual.Empresa.Funcionalidad(170).Contains("LOTE")
+                    ChkCaducidad.Checked = UsuarioActual.Empresa.Funcionalidad(170).Contains("CADUCIDAD")
+                    ChkSeccion.Checked = UsuarioActual.Empresa.Funcionalidad(170).Contains("SECCION")
+                End If
 
                 If UsuarioActual.Empresa.Funcionalidad(143) = "1" Then