From 8f340f55172d5aa0379cd42ad470f33dd7045ac5 Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Sat, 2 Mar 2024 11:47:10 -0700
Subject: [PATCH] -

---
 Planeacion/CatSubProyectos.aspx.vb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Planeacion/CatSubProyectos.aspx.vb b/Planeacion/CatSubProyectos.aspx.vb
index 3df377a95..959ac61db 100644
--- a/Planeacion/CatSubProyectos.aspx.vb
+++ b/Planeacion/CatSubProyectos.aspx.vb
@@ -93,7 +93,7 @@ Partial Class CatSubProyectos
             End If
             BtnGuardar.OnClientClick = $"ValidaGuardar();"
 
-            If UsuarioActual.Empresa.Funcionalidad(404) = "20" Then
+            If UsuarioActual.Empresa.Funcionalidad(404).Contiene("10", "20") Then
                 DVModalPrecioLista.Visible = True
             End If