- ocultar columna de importes cuando es almacenista

Ventas/RepComisionesSMS.aspx.vb

@@ -66,6 +66,18 @@ Partial Class Ventas_RepComisionesSMS
             GvDatos.Columns(19).Visible = False 'fecha pago
             GvDatos.Columns(20).Visible = False 'pagada
         End If
+        'ocultar columnas en usuario almacen.
+        If UsuarioActual.CveRol = 1578 Then 'almacen
+            GvDatos.Columns(11).Visible = False 'precio unitario
+            GvDatos.Columns(12).Visible = False 'precio total
+            GvDatos.Columns(14).Visible = False 'vendedor
+            GvDatos.Columns(16).Visible = False 'tecnico
+            GvDatos.Columns(17).Visible = False 'gerente
+            GvDatos.Columns(18).Visible = False 'ed.medica
+            GvDatos.Columns(19).Visible = False 'fecha pago
+            GvDatos.Columns(20).Visible = False 'pagada
+        End If
+
     End Sub
 
     Public Sub CargaDatos()