From f2752276f214c548a75b126445c101957ac09a8a Mon Sep 17 00:00:00 2001
From: Jonathan Alexis Perez Morales <jonathan.perez@adssistemas.mx>
Date: Wed, 30 Oct 2019 10:38:29 -0700
Subject: [PATCH] EMD:Deshabilitar campo de tipo proveedor si no es prisila

---
 Compras/Proveedores.aspx.vb | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/Compras/Proveedores.aspx.vb b/Compras/Proveedores.aspx.vb
index 073f98587..389ffd36f 100644
--- a/Compras/Proveedores.aspx.vb
+++ b/Compras/Proveedores.aspx.vb
@@ -768,6 +768,11 @@ Partial Class Compras_Proveedores
                 DdlCveUsuarioResponsable.SelectedValue = ObjProveedor.CveUsuarioResponsable.ToString
                 DdlCveTipoProveedor.SelectedValue = ObjProveedor.CveTipoProveedor.ToString
 
+                'EMD: Si no es prisila desablita este campo
+                If UsuarioActual.CveEmpresa = 13 AndAlso Not UsuarioActual.CveUsuario.Contiene(58, 100) Then
+                    DdlCveTipoProveedor.Enabled = False
+                    DdlCveTipoProveedor.Attributes.Add("disabled", "disabled")
+                End If
 
                 If TxtRazonSocial.Text.Trim = TxtNombreComercial.Text.Trim Then TxtRazonSocial.Attributes.Add("onKeyUp", "SetText(" & TxtRazonSocial.ClientID & ", " & TxtNombreComercial.ClientID & ")")