diff --git a/Inventarios/RecepcionUsados.aspx.vb b/Inventarios/RecepcionUsados.aspx.vb
index 2c20baccc..71f0b413b 100644
--- a/Inventarios/RecepcionUsados.aspx.vb
+++ b/Inventarios/RecepcionUsados.aspx.vb
@@ -2389,6 +2389,9 @@ Partial Class Inventarios_RecepcionUsados
 
         'GUARDAR AJUSTES
         Me.ObjRemisionNC.DtAjustes = TmpDTAjustes
+        If Me.ObjRemisionNC.DtAjustes IsNot Nothing AndAlso Me.ObjRemisionNC.DtAjustes.Rows.Count > 0 Then
+            Me.ObjRemisionNC.EsGarantia = True
+        End If
 
         'VALIDA PROMOCIONES Y EXISTENCIAS
         Dim ObjVentas As New ClsVentas