Permiso para bloquear totales en reporte ps de venta

Ventas/RepProductosServicios.aspx.vb

@@ -270,6 +270,13 @@ Partial Class Ventas_RepProductosServicios
         txtFechaI.Text = Now.FirstDayOfMonth.ToShortDateString
         txtFechaF.Text = Now.ToShortDateString
 
+        If UsuarioActual.TienePermisoProceso(339) Then
+            GvDatos.Columns(2).Visible = False
+            GvDatos.Columns(3).Visible = False
+            GvDatos.Columns(4).Visible = False
+            GvDatos.Columns(5).Visible = False
+        End If
+
     End Sub
 #End Region
 

Ventas/RepProductosServiciosDetalle.aspx.vb

@@ -273,6 +273,14 @@ Partial Class Ventas_RepProductosServiciosDetalle
         TCEspecifico = 0
         TipoCambio = 1
 
+        If UsuarioActual.TienePermisoProceso(339) Then
+            GvDatos.Columns(10).Visible = False
+            GvDatos.Columns(11).Visible = False
+            GvDatos.Columns(12).Visible = False
+            GvDatos.Columns(13).Visible = False
+            GvDatos.Columns(14).Visible = False
+        End If
+
     End Sub
 
     Private Sub CargaSucursales(CveCliente As Integer, CveClienteSucursal As Integer)