Pregunta con fechas

08/05/2004 - 00:41 por anonymous | Informe spam
Tengo unos titulos bancarios creados en el 20020101 y
debian retirarlos a los 3 meses, estamos
en 20040507; debia sacarlo el 20020401 pero no lo retiro
asi que se acumula otros 3 meses o sea
20040701; si estamos en 20040507 y no lo ha retirado
cuando seria la proxima fecha??

Le he echado cabeza y no me cuadra.

Agradezco la ayuda y sugerencias que me puedan brindar

Preguntas similare

Leer las respuestas

#6 Fernando D. Bozzo
11/05/2004 - 16:54 | Informe spam
Hola:

Los algoritmos que te puse los hice basándome en tu pedido inicial:

"si estamos en 20040507 y no lo ha retirado cuando seria la proxima fecha??"

..entonces, dada la fecha: 5/10/2003 más 6 meses obtenemos: 5/4/2004, pero
como es una fecha anterior a hoy calculo la siguiente que sea mayor o igual
a hoy, lo que dá: 5/10/2004

Si te interesan las fechas cada 6 meses, aunque sean anteriores a hoy,
entonces no necesitás ningún algoritmo, sólo te basta con la función GOMONTH

Saludos,

Fernando D. Bozzo




"anonymous" escribió en el mensaje
news:b56f01c43762$46fc7790$
Estoy trabajando con el siguiente codigo suministrado por
Fernando Bozzo

nMesesAprox = INT((DATE() - thisform.txtFecha.Value ) /
30.4375)
nDifA3Meses = MOD(nMesesAprox,thisform.txtMeses.Value)
dFechaIni = thisform.txtFecha.Value
dFechaHoy = DATE()
dProximaFecha = {}
IF nDifA3Meses = 0 THEN
dProximaFecha = GOMONTH(dFechaIni, nMesesAprox)
IF dProximaFecha < dFechaHoy THEN
dProximaFecha = GOMONTH(dFechaIni, nMesesAprox +
thisform.txtMeses.Value)
ENDIF
ELSE
dProximaFecha = GOMONTH(dFechaIni, nMesesAprox -
nDifA3Meses + thisform.txtMeses.Value)
ENDIF
MESSAGEBOX(dProximaFecha)

Y la fecha 2003/10/05(año/mes/dia) con 6 meses siempre se
va al else y se pueden dar cuenta que lo suma dos veces,
no entiendo el MOD.

Espero que me puedan aclarar un poco.

Claro que el otro codigo si funciona pero no lo he
probado con todos.

Gracias.
#7 anonymous
11/05/2004 - 21:03 | Informe spam
Hola Fernando ya entendi mejor el algoritmo que me
facilitaste y me sale a las mil maravillas, muchas
gracias eres muy buena gente.
Mostrar la cita
pedido inicial:
Mostrar la cita
la proxima fecha??"
Mostrar la cita
obtenemos: 5/4/2004, pero
Mostrar la cita
que sea mayor o igual
Mostrar la cita
anteriores a hoy,
Mostrar la cita
con la función GOMONTH
Mostrar la cita
escribió en el mensaje
Mostrar la cita
Ads by Google
Search Busqueda sugerida