From 64ae0c203f79f17031e411c6e3fc7d6278c4e703 Mon Sep 17 00:00:00 2001 From: rrene Date: Thu, 29 Aug 2024 08:35:49 -0700 Subject: [PATCH] =?UTF-8?q?-activar=20permiso=20de=20edici=C3=B3n?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- OS/OrdenesServicios.aspx.vb | 17 ++++++++++------- 1 file changed, 10 insertions(+), 7 deletions(-) diff --git a/OS/OrdenesServicios.aspx.vb b/OS/OrdenesServicios.aspx.vb index bebbd24ad..6c0f5e7cd 100644 --- a/OS/OrdenesServicios.aspx.vb +++ b/OS/OrdenesServicios.aspx.vb @@ -490,9 +490,12 @@ Partial Class OS_OrdenesServicios BtnGuardar.Visible = False DdlEstatusOS.Enabled = False Else - BtnGuardar.Visible = False + If UsuarioActual.TienePermisoProceso(369) Then ' terminado + BtnGuardar.Visible = True + Else + BtnGuardar.Visible = False + End If End If - End If End Sub @@ -1198,27 +1201,27 @@ Partial Class OS_OrdenesServicios 'ObjEstatusPermisos.Dispose() 'OS Estatus Inicial - If tipoEstatus = 1 And UsuarioActual.TienePermisoProceso(366) Then + If tipoEstatus = 1 AndAlso UsuarioActual.TienePermisoProceso(366) Then Exit Sub End If 'OS Estatus Asignación - If tipoEstatus = 2 And UsuarioActual.TienePermisoProceso(367) Then + If tipoEstatus = 2 AndAlso UsuarioActual.TienePermisoProceso(367) Then Exit Sub End If 'OS Estatus Proceso - If tipoEstatus = 3 And UsuarioActual.TienePermisoProceso(368) Then + If tipoEstatus.Contiene(2, 3) AndAlso UsuarioActual.TienePermisoProceso(368) Then Exit Sub End If 'OS Estatus Terminado - If tipoEstatus = 4 And UsuarioActual.TienePermisoProceso(369) Then + If tipoEstatus.Contiene(2, 3, 4) AndAlso UsuarioActual.TienePermisoProceso(369) Then Exit Sub End If 'OS Estatus Cancelada - If tipoEstatus = 5 And UsuarioActual.TienePermisoProceso(370) Then + If tipoEstatus.Contiene(2, 3, 4, 5) AndAlso UsuarioActual.TienePermisoProceso(370) Then Exit Sub End If