From d32f25c4e9424989531a76f53bb4008a702f9baa Mon Sep 17 00:00:00 2001
From: Jonathan Alexis Perez Morales <jonathan.perez@adssistemas.mx>
Date: Wed, 29 Apr 2020 15:37:02 -0700
Subject: [PATCH] No mostrar entrega directa en econollantas

---
 OC/OC.aspx    | 2 +-
 OC/OC.aspx.vb | 8 ++++++++
 2 files changed, 9 insertions(+), 1 deletion(-)

diff --git a/OC/OC.aspx b/OC/OC.aspx
index 50959795d..671c9712c 100644
--- a/OC/OC.aspx
+++ b/OC/OC.aspx
@@ -606,7 +606,7 @@
                                         <asp:ImageButton ID="ImgCambiaClienteVendedor" data-toggle="tooltip" title="Actualizar Cliente/Vendedor" Visible="false" ImageUrl="/Imagenes/accept.png" runat="server" />
                                     </div>
                                 </div>
-                                <div class="col-md-2" style="max-width: 145px;">
+                                <div id="DivEntregaDirecta" runat="server" visible="true" class="col-md-2" style="max-width: 145px;">
                                     <asp:CheckBox ID="ChkEntregaDirecta" CssClass="md-checksd" AutoPostBack="true" OnCheckedChanged="ChkEntregaDirecta_CheckedChanged" Text="Entrega Directa" TextAlign="Right" runat="server" Checked="false" />
                                 </div>
                                 <div runat="server" id="DivLugarEntregaDirecta1" visible="false" class="col-md-2" style="max-width: 120px;">
diff --git a/OC/OC.aspx.vb b/OC/OC.aspx.vb
index 807c00757..6d0db23ee 100644
--- a/OC/OC.aspx.vb
+++ b/OC/OC.aspx.vb
@@ -795,6 +795,14 @@ Partial Class OC
 
             PermisosPagina()
             RegistraScript("$get('HdnWidth').value = $('#C_Tab_TabC_DivConceptosContenido').width();")
+
+            'NO MOSTRAR LA OPCION DE ENTREGA DIRECTA (ECONOLLANTAS)
+            If UsuarioActual.CveEmpresa = 141 Then
+                DivEntregaDirecta.Visible = False
+                ChkEntregaDirecta.Enabled = False
+                ChkEntregaDirecta.Checked = False
+            End If
+
         End If
         Me.Form.DefaultButton = ""
     End Sub