diff --git a/App_Code/ClsPaginas.vb b/App_Code/ClsPaginas.vb
index 1ece45ca0..990afa21c 100644
--- a/App_Code/ClsPaginas.vb
+++ b/App_Code/ClsPaginas.vb
@@ -834,7 +834,7 @@ Public Class ClsPaginas
             End If
             Dim filtros As New List(Of String)
             If CveCategoria <> -1 Then filtros.Add($"CveCategoria = {CveCategoria}")
-            If UsoClasificacion <> -1 Then filtros.Add($"UsoClasificacion = {UsoClasificacion}")
+            If UsoClasificacion <> -1 Then filtros.Add($"UsoClasificacion IN ({UsoClasificacion},3)  ")
             If CveClasificacion <> -1 Then filtros.Add($"CveClasificacion = {CveClasificacion}")
             If filtros.Count > 0 Then
                 Dim Dv As New DataView(DirectCast(HttpContext.Current.Application(AppNombre), DataTable), String.Join(" AND ", filtros), "", DataViewRowState.CurrentRows)