diff --git a/Source/Modulos/Facturas de proveedor/Controller/uFacturasProveedorController.pas b/Source/Modulos/Facturas de proveedor/Controller/uFacturasProveedorController.pas
index dcb32740..1ed478d2 100644
--- a/Source/Modulos/Facturas de proveedor/Controller/uFacturasProveedorController.pas	
+++ b/Source/Modulos/Facturas de proveedor/Controller/uFacturasProveedorController.pas	
@@ -889,12 +889,12 @@ begin
       ARecibos.FECHA_EMISION := AFactura.FECHA_FACTURA;
 
       AFechaVencimiento := AFactura.FECHA_FACTURA + AFormaPago.Plazos.NUM_DIAS;
+      ADiasMas := 0;
       if (AFactura.Proveedor.VENCIMIENTO_FACTURAS_1 <> 0)
       or (AFactura.Proveedor.VENCIMIENTO_FACTURAS_2 <> 0)
       or (AFactura.Proveedor.VENCIMIENTO_FACTURAS_3 <> 0) then
       begin
         ADiaVencimiento := DayOf(AFechaVencimiento);
-        ADiasMas := 0;
         while (ADiaVencimiento <> AFactura.Proveedor.VENCIMIENTO_FACTURAS_1)
         and (ADiaVencimiento <> AFactura.Proveedor.VENCIMIENTO_FACTURAS_2)
         and (ADiaVencimiento <> AFactura.Proveedor.VENCIMIENTO_FACTURAS_3) do