Calendario de Viajes AF Codigo Descripcion, orden cronograma por sub tipo activo fijo

Ventas/ActualizarPrecios.aspx

@@ -52,16 +52,18 @@
     <li>
         <asp:HyperLink ID="HlAgregarExcel" NavigateUrl="#" Visible="True" data-toggle="modal" data-target="#DivCargaExcel" runat="server"><i class='fa fa-server'></i> Importar Listado</asp:HyperLink>
     </li>
-    <li>
+    
         <asp:UpdatePanel ID="UpExportarExcel" runat="server">
             <ContentTemplate>
-                <asp:LinkButton ID="LnkExportarExcel" Text="<i class='fa fa-file-excel-o'></i> ExportarExcel" runat="server" OnClick="LnkExportarExcel_Click"></asp:LinkButton>
+                <li>
+                <asp:LinkButton ID="LnkExportarExcel" Text="" runat="server" OnClick="LnkExportarExcel_Click"> <i class='fa fa-file-excel-o'></i> Exportar Excel</asp:LinkButton>
+                      </li>
             </ContentTemplate>
             <Triggers>
                 <asp:PostBackTrigger ControlID="LnkExportarExcel" />
             </Triggers>
         </asp:UpdatePanel>
-    </li>
+  
 </asp:Content>
 <asp:Content ID="Content6" ContentPlaceHolderID="C" runat="Server">
 

Ventas/ActualizarPrecios.aspx.vb

@@ -108,8 +108,16 @@ Partial Class Ventas_ActualizarPrecios
             If UsuarioActual.CveEmpresa.Contiene(189, 190, 192, 193) Then
                 LblModalidad.Visible = True
                 DivModalidad.Visible = True
+            End If
+
+            If UsuarioActual.TienePermisoProceso(282) Then
+                PermisoEdicionLista = False
+                DivActualizarPrecio.Visible = False
+                HlAgregarExcel.Visible = False
             End If
+
             CargaCombos()
+
         End If
     End Sub
     Public Sub CargaCombos()
@@ -256,7 +264,13 @@ Partial Class Ventas_ActualizarPrecios
 
             dvDatos.Visible = True
             dvMultiple.Visible = False
+
             DivActualizarPrecio.Visible = True
+
+            If UsuarioActual.TienePermisoProceso(282) Then
+                DivActualizarPrecio.Visible = False
+            End If
+
             GVPrecios.DataBind()
         End If
 
@@ -1010,6 +1024,9 @@ Partial Class Ventas_ActualizarPrecios
 
         dvDatos.Visible = DdlModalidad.SelectedValue = "1"
         DivActualizarPrecio.Visible = DdlModalidad.SelectedValue = "1"
+        If UsuarioActual.TienePermisoProceso(282) Then
+            DivActualizarPrecio.Visible = False
+        End If
         dvMultiple.Visible = DdlModalidad.SelectedValue = "2"
 
         UPPrecioLista.Update()