Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Generar Mora o recargo a mes vencido (https://www.clubdelphi.com/foros/showthread.php?t=88570)

donpedro 25-06-2015 16:42:42

Generar Mora o recargo a mes vencido
 
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 25-06-2015 17:22:09

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

kapcomx 25-06-2015 21:08:45

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...:cool:

Casimiro Notevi 25-06-2015 23:08:46

Cita:

Empezado por kapcomx (Mensaje 493694)
... 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


La franja horaria es GMT +2. Ahora son las 23:14:54.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi