diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb
index ef294b50b..38d5b90a6 100644
--- a/Compras/Compras.aspx.vb
+++ b/Compras/Compras.aspx.vb
@@ -13134,7 +13134,7 @@ Partial Class Compras_Compras
             DDLDevolucion.Items.Clear()
             Dim dtt As DataTable = objcompras.DtResultados
             If UsuarioActual.Empresa.Funcionalidad(558) = "1" Then 'solo los últimos 3 meses
-                dtt = dtt.FiltraParametros($"Fecha >= #{NowADS.AddMonths(-3).ToString("yyyy/MM/dd")}#")
+                dtt = dtt.FiltraParametros($"Fecha >= #{NowADS.AddMonths(-6).ToString("yyyy/MM/dd")}#")
             End If
             DDLDevolucion.DataSource = dtt
             DDLDevolucion.Items.Insert(0, New ListItem("Seleccione", "-1"))