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