Generar Mora o recargo a mes vencido

[donpedro]

Hola bendiciones, tenia mucho tiempo que no entraba al foro, pero bueno estamos aqui.

Tengo un problemita con un sistema educativo en el modulo de facturacion. Debo decir que el sistema esta creado en Delphi 2009 con MySql como manejador de Base de Datos.

lo que deseo hacer es que cuando pase la fecha de pago genere una mora de $50 automaticamente.....

si tienen algun link que me sirva de ayuda,, ya que quizas hallan hecho esa pregunta en el foro....

gracias de antemano, por cual ayuda brindada.

[Casimiro Notevi]

Código Delphi [-]
if now>fechapago then showmessage('me debes 50$')

Explícate mejor

[kapcomx]

Que tal compañero donPedro, no tengo idea de como lo estes programando pero lo que dice casimiro es valido puedes hacer un recorrido en tu tabla

Código Delphi [-]
tudataset.first;
while not (tudataset.eof) do 
 begin 

   if now>tudatasetfechapago then 
            
                //aqui actualizar no se como lo hagas pero aca una idea de tu update
               "update tutabla set tucampo = (tucampo + 50) where id_detutabla= " + tudatasetcampoid.asstring;

   tudataset.next;
 end;

espero te sirva Saludos...

[Casimiro Notevi]

Empezado por kapcomx

... puedes hacer un recorrido en tu tabla

Bueno, no hace falta recorrer los registros para hacer eso, en sql sería algo así:

Código SQL [-]
update latabla set campomora=campomora+50 where now>fechapago