diff --git a/OS/RepServicioDomicilio.aspx.vb b/OS/RepServicioDomicilio.aspx.vb
index b5b44b6ad..5766f4969 100644
--- a/OS/RepServicioDomicilio.aspx.vb
+++ b/OS/RepServicioDomicilio.aspx.vb
@@ -789,8 +789,8 @@ Partial Class OS_RepServicioDomicilio
                 Dim TipoEstatus As Integer = 0
                 TipoEstatus = GlobalDTEstatusOrdenServicios(UsuarioActual.CveEmpresa).FiltroPrimeroValor("TipoEstatus", String.Format("CveEstatusOrdenServicio = {0}", ObjOS.CveEstatusOrdenServicio), "CveEstatusOrdenServicio ASC").ToEntero
 
-                LnkModalAsignar.Visible = If(TipoEstatus.Contiene(5), False, True)
-                LnkCancelarOrden.Visible = If(TipoEstatus.Contiene(5), False, True)
+                LnkModalAsignar.Visible = If(TipoEstatus.Contiene(4, 5), False, True)
+                LnkCancelarOrden.Visible = If(TipoEstatus.Contiene(4, 5), False, True)
 
                 If (TipoEstatus = 5) Then
                     LblModalOStitulo.Text = "Orden Cancelada"