diff --git a/Ventas/RepVentasUtilidadPadre.aspx b/Ventas/RepVentasUtilidadPadre.aspx
index 9c211461f..1dc7c4fc0 100644
--- a/Ventas/RepVentasUtilidadPadre.aspx
+++ b/Ventas/RepVentasUtilidadPadre.aspx
@@ -178,6 +178,16 @@
                         <div class="col-md-2">
                             <asp:Dropdownlist runat="server" ID="DdlMarcas" CssStyle="width: 100%;"  CssClass="form-control  input-small input-sm select2me" Width="100%" DataTextField="Marca" DataValueField="CveMarca" />
                         </div>
+                        <div class="col-md-1 truncate" id="divgarantia1" runat="server" visible="false">
+                            Garantía:
+                        </div>
+                        <div class="col-md-2" id="divgarantia2" runat="server" visible="false">
+                            <asp:Dropdownlist runat="server" ID="DdlGarantia" CssStyle="width: 100%;"  CssClass="form-control  input-small input-sm select2me" Width="100%">
+                                <asp:ListItem Text="Todos" Value="-1" Selected="True"></asp:ListItem>
+                                <asp:ListItem Text="Si" Value="1"></asp:ListItem>
+                                <asp:ListItem Text="No" Value="0"></asp:ListItem>
+                               </asp:Dropdownlist>
+                        </div>
                     </div>
                 </div>
             </div>
diff --git a/Ventas/RepVentasUtilidadPadre.aspx.vb b/Ventas/RepVentasUtilidadPadre.aspx.vb
index 4acfd2fca..c5f1d1cc7 100644
--- a/Ventas/RepVentasUtilidadPadre.aspx.vb
+++ b/Ventas/RepVentasUtilidadPadre.aspx.vb
@@ -91,6 +91,12 @@ Partial Class Ventas_RepVentasUtilidadPadre
             DdlPS.ddl.Items.Insert(0, New ListItem("Todos", "-1"))
         End If
 
+        'garantia
+        If UsuarioActual.Empresa.Funcionalidad(531) = "1" Then
+            divgarantia1.visible = True
+            divgarantia2.visible = True
+        End If
+
         DdlMarcas.DataSource = GlobalDTGralMarcas(UsuarioActual.CveEmpresa)
         DdlMarcas.DataBind()
         DdlMarcas.Items.Insert(0, New ListItem("Todas", "-1"))
@@ -126,7 +132,7 @@ Partial Class Ventas_RepVentasUtilidadPadre
         If ObjVentas.GetReportePadreVentasUtilidad(If(DdlVendedor.GetSelectedValuesM = "", "-1", DdlVendedor.GetSelectedValuesM), DdlClientesWS.SelectedValue.ToEntero,
                                                     If(DdlSubProyecto.GetSelectedValuesM = "", "-1", DdlSubProyecto.GetSelectedValuesM), txtFechaI.Text.ToDate, txtFechaF.Text.ToDate,
                                                     UsuarioActual.CveEmpresa, DdlGrupo.SelectedValue.ToEntero, DdlPS.SelectedValue.ToEntero, DdlCategoria.SelectedValue.ToEntero, DdlClasificacion.SelectedValue.ToEntero,
-                                                   DdlMarcas.SelectedValue.ToEntero) Then
+                                                   DdlMarcas.SelectedValue.ToEntero, DdlGarantia.SelectedValue.ToEntero) Then
             GvDatos.DataSource = ObjVentas.DtResultados
             DtDatos = ObjVentas.DtResultados
         End If