diff --git a/RH/Personal.aspx b/RH/Personal.aspx
index 772ecbda8..2a6822592 100644
--- a/RH/Personal.aspx
+++ b/RH/Personal.aspx
@@ -1627,7 +1627,7 @@
                                                             </div>
                                                         </div>
                                                         <div class="col-md-6">
-                                                            <div class="form-group form-md-line-input input-iconright" runat="server" id="DVCodigoDispersionVale" visible="false">
+                                                            <div class="form-group form-md-line-input input-iconright" runat="server" id="DVCodigoDispersionVale">
                                                                 <asp:TextBox CssClass="form-control" ID="TxtCodigoDispersionVale" runat="server" MaxLength="25"></asp:TextBox>
                                                                 <asp:Label runat="server" AssociatedControlID="TxtNetoPeriodo" Text="Código Dispersión Vale:"></asp:Label>                                                                
                                                                 <i></i>
diff --git a/RH/Personal.aspx.vb b/RH/Personal.aspx.vb
index 6fa45cfb1..d9fe3cfbe 100644
--- a/RH/Personal.aspx.vb
+++ b/RH/Personal.aspx.vb
@@ -998,8 +998,6 @@ Partial Class RH_Personal
                     CarcaConceptosNomina()
                     CargaFonacot()
                 End If
-
-
             Else
                 cargatipoTrabajador()
                 MostrarOcultarFechasEstatus()
@@ -1021,25 +1019,12 @@ Partial Class RH_Personal
                 LIFamiliaresAcciones.Visible = True
                 DivFamiliares.Visible = True
                 DivPadres.Visible = False
-
-
             End If
 
-
-
-
-            'If UsuarioActual.TienePermisoProceso(84) Then 'abonar pago
-            '    HplAbonarMasivo.Visible = True
-            '    GvGxC.Columns(7).Visible = True
-            'End If
-
-
             If Not CvePersonal > 0 Then
                 DivSuperiorInmediato.Visible = False
             End If
 
-
-
             If UsuarioActual.CveEmpresa = 7 Then
                 DivSuperiorInmediato.Visible = True
                 DVSupervisorAsignado.Visible = False
@@ -1055,13 +1040,10 @@ Partial Class RH_Personal
             CargaLicencias()
             LtlTareaNueva.Text = String.Format("<a class=""caption-subject bold font-green"" onclick=""OpenModalNewTareaUserControl(1,-1,{{CvePersonal:{0}}});""> <i class=""fa fa-plus""'></i> Tarea</a>", CvePersonal)
 
-
             If UsuarioActual.CveRol = 1 Or UsuarioActual.CveUsuario = 100 Then
                 DVNetoPeriodo.Visible = True
-                DVCodigoDispersionVale.Visible = True
             End If
 
-
             If UsuarioActual.Empresa.Funcionalidad(712) = "1" Or UsuarioActual.CveEmpresa = 1 Then
                 DvRuta.Visible = True
                 DVTxtTelefono.Attributes.Add("class", "col-md-6")