Ver Mensaje Individual
  #2  
Antiguo 29-12-2022
Avatar de duilioisola
[duilioisola] duilioisola is offline
Miembro Premium
 
Registrado: ago 2007
Ubicación: Barcelona, España
Posts: 1.734
Reputación: 20
duilioisola Es un diamante en brutoduilioisola Es un diamante en brutoduilioisola Es un diamante en bruto
No se en python pero la función de cálculo es sencilla utilizando un bucle tipo while...
Pongo el código con un pseudocódigo pascalisado.

Código Delphi [-]
procedur DameVencimientos(FechaInicio: TDateTime; Anyos: integer; DiasEntrePagos: integer);
var
  Fecha : TDateTime;
begin
   // Calculo fecha final como Fecha Inicio + Anyos
   // (RecodeYear modifica la parte año de una fecha)
   FechaFinal := RecodeYear(FechaInicio, YearOf(FechaInicio) + Anyos);

   // Primer pago es FechaInicio + DiasEntrePagos
   Fecha := FechaInicio + DiasEntrePAgos;

   // Mientras no me pase de fecha final voy devolviendo las fechas de vencimiento
   while Fecha <= FechaFinal do
   begin
      Write('Vencimiento: ' + FormatDate(Fecha));

      // Incremento la fecha
      Fecha := Fecha + DiasEntrePagos;
   end;
end;
Responder Con Cita