- visualización de porlet de estatus, que esté igual a los otros

Ventas/Ventas.aspx.vb

@@ -5331,7 +5331,7 @@ Partial Class Ventas
                     LnkOCs.Visible = False
                     UpnTools.Update()
 
-                    DivEstatusFac.Visible = True
+                    UpEstatus.Visible = True
                     HdnCveCliente.Value = CveCliente.ToString()
                     ViewState("CveCliente") = CveCliente
                     ViewState("CveEmpresaCRM") = DbRowVenta("CveEmpresaCRM").ToString().ToEntero()
@@ -6726,7 +6726,7 @@ Partial Class Ventas
                 Me.PermiteCredito = ObjCliente.PermiteCredito
                 LnkAgregarCliente.Visible = False
 
-                If UsuarioActual.Empresa.Funcionalidad(714) = "1" Then 'cuando inicia cargado con el cliente. publico general
+                If UsuarioActual.Empresa.Funcionalidad(714) <> "" Then 'cuando inicia cargado con el cliente. publico general
                     LnkAgregarCliente.Visible = True
                 End If
 
@@ -30275,7 +30275,7 @@ Partial Class Ventas
     Private Sub LimpiaDocumentoNC()
 
         EsCreaApartirDe = True
-        DivEstatusFac.Visible = False
+        UpEstatus.Visible = False
         TabAlmacen.Visible = False
 
         'LIMPIA ACCIONES
@@ -30681,7 +30681,7 @@ Partial Class Ventas
             TxtTipoCambio.Text = GlobalTipoCambio(NowADS()).ToString()
         End If
 
-        DivEstatusFac.Visible = False
+        UpEstatus.Visible = False
 
         'REINICIALIZA TABS
         TabAlmacen.Enabled = False
@@ -32973,7 +32973,7 @@ Partial Class Ventas
         BtnCrearApartirDe.Visible = False '[IPP-2Novimebre2018] REEMPLAZA LO COMENTADO ARRIBA
         EsCreaApartirDe = True
         ModalidadEdicion = True
-        DivEstatusFac.Visible = False
+        UpEstatus.Visible = False
         TabAlmacen.Visible = False
 
         'CUANDO ES CREAR APARTIR DE SE LIMPIAN FUNCIONALIDADES DE DOCUMENTOS YA REGISTRADOS