From 8142dbc8f93db91d75a20f57c4b534507519ede0 Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Thu, 6 Jun 2024 19:10:57 -0700
Subject: [PATCH] --filtrado de vendedor

---
 Ventas/RepComisionesSMS.aspx.vb | 10 ++++++++--
 1 file changed, 8 insertions(+), 2 deletions(-)

diff --git a/Ventas/RepComisionesSMS.aspx.vb b/Ventas/RepComisionesSMS.aspx.vb
index 226514bc9..2ed9fb216 100644
--- a/Ventas/RepComisionesSMS.aspx.vb
+++ b/Ventas/RepComisionesSMS.aspx.vb
@@ -34,7 +34,10 @@ Partial Class Ventas_RepComisionesSMS
 
     Private Sub CargaCombos()
 
-
+        'If UsuarioActual.TienePermisoProceso(376) Then
+        '    DdlTecnico.Enabled = False
+        '    DdlTecnico.SelectedValueExist(UsuarioActual.CveUsuario)
+        'End If
         'If UsuarioActual.Empresa.Funcionalidad(302) = "1" AndAlso DdlSubProyectoDatos.SelectedValue.ToEntero() > 0 Then
         '    DdlVendedor.DataSource = GlobalDTVendedores(UsuarioActual.CveEmpresa, VendedorTipo:=-1).FiltraParametros(String.Format("VendedorTipo IN (1,4) AND (CveSubProyecto IS NULL OR CveSubProyecto = {0})", DdlSubProyectoDatos.SelectedValue))
         'Else
@@ -42,7 +45,10 @@ Partial Class Ventas_RepComisionesSMS
         'End If
         DdlVendedor.DataBind()
         DdlVendedor.Items.Insert(0, New ListItem("Todos", "-1"))
-
+        If UsuarioActual.CveVendedor > 0 Then
+            DdlVendedor.SelectedValueExist(UsuarioActual.CveVendedor)
+            DdlVendedor.Enabled = False
+        End If
 
         DdlMedico.DataSource = GlobalDTMedicos(UsuarioActual.CveEmpresa).FiltraParametros("Estatus = 'True' ")
         DdlMedico.DataBind()