From 69e7eee86f22ee9c32a524285bb9116943404cbe Mon Sep 17 00:00:00 2001
From: rrene <rrene@DESKTOP-04EII7E>
Date: Mon, 9 Nov 2020 12:58:56 -0700
Subject: [PATCH] -- permiso 131, que aplique al editar una OC ya autorizada

---
 OC/OC.aspx.vb | 2 +-
 vwd.webinfo   | 4 ++++
 2 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/OC/OC.aspx.vb b/OC/OC.aspx.vb
index 35b261248..fb8f773a7 100644
--- a/OC/OC.aspx.vb
+++ b/OC/OC.aspx.vb
@@ -3740,7 +3740,7 @@ Partial Class OC
         GvD.EditIndex = e.NewEditIndex
         CargaDatosDetalles()
         Dim EditingRow As GridViewRow = GvD.Rows(e.NewEditIndex)
-        If Not EsCreaApartirDe Then
+        If Not EsCreaApartirDe AndAlso Not UsuarioActual.TienePermisoProceso(131) Then 'si tiene el proce 131, e va a permitir, sino que lo bloquee
             If EditingRow.DataKey("TipoDato").ToEntero = 2 Or EditingRow.DataKey("CantidadNoEditable").ToDecimal > 0 Then
                 EditingRow.FCDropDownList("DdlClasificacion").Enabled = False
                 EditingRow.FCDropDownList("DdlPS").Enabled = False
diff --git a/vwd.webinfo b/vwd.webinfo
index 58b25d2ef..1391aa8cf 100644
--- a/vwd.webinfo
+++ b/vwd.webinfo
@@ -130,6 +130,10 @@
     
   
     
+  
+    
+  
+