SUMAR UNA FECHA A UN NUMERO?

[karinha]

Buenos Dias Amigos, por favor, necesito ayuda de todos ustedes, para lo ke sigue:

Como puedo hacer para sumar una fecha a un numero:

Ejemplo:

Tengo la siguinte fecha inicial:

31/12/2006

Necesito sumar a esta fecha, 5 años( 60 meces )

y que el resultado, me retorne la nueva fecha de término.

Regards, saludos.

[Armando]

Karinha:

Se me ocurre lo siguiente partiendo de la fecha de la PC

FUNCTION Sumar(nSumar)
LOCAL dNvaFec := CTOD(STR(DAY(DATE()),2,0) + "/" + ;
STR(MONTH(DATE()),2,0) + "/" + ;
STR(YEAR(DATE())+nSumar,4,0))
RETURN(dNvaFec)

Espero te funcione

Saludos, Armando

[dbzap]

dfecha := CtoD( "31/12/2006" )
dFechaNueva := dFecha + 365*5
? dFecha, dFechaNueva

creo yo .....

[Verhoven]

¿Y los años bisiestos?
imaginen que la fecha inicial sea un 29 de febrero, que haberlos haylos.

[Armando]

dbZap:

Disculpa la intromisión, en la forma que sugieres se estan sumando dias y no años, me queda la siguiente duda, ¿¿ qué pasará cuando haya algún año bisiesto dentro de los 5 años a sumar ????

Saludos, Armando

[Rochinha]

Amigos

Un año bisiexto tiene 366 dias e para saber se lo mismo és bisexto basta dividir por 400 ex:

[code]
if MOD( nAno / 400 ) <> 0
? "Año es Bisiexto."
endif
[code]

2000 / 400 es 5.00
2001 / 400 es 5.00
2002 / 400 es 5.01 - este es bisiexto
2003 / 400 es 5.00

Portanto la rutina deve verificar cada año e somar mais un dia.

[carlosmora]

Los años bisiestos son todos aquellos múltiplos de 4, no multiplos de 100 salvo los multiplos de 400 (el 2000 es bisiesto)

Carlos

[dbzap]

Un buen chiste referido a lo mismo dice....

Juan pregunta a Paco... cuanto es 2 x 3..... ?
Paco apresuradamente responde, 5 !!
Pero Paco, señala Juan, 2 x 3 es 6.....
y Paco responde... "y que querias, rapidez o exactitud ?"

Solo respondi a una inquietud de "saber como sumar dias a una fecha".
Para hacer exactamente lo que solicita es necesario contar dias exactos, la idea es saber cuantos dias tiene cada mes y eso es facil ( con un truco claro está ).
Te ubicas en el primer dia del mes siguiente y restas 1 y tienes el ultimo dia del mes anterior y asi vas sumando hasta el mes que requieres.... eso es todo.
Una vez obtenida la suma de dias, se agrega a la fecha actual y listo el bote !!

Saludos

(Espero ser claro, de lo contrario tendria que escribir la rutina, de todas formas me avisas )

[karinha]

Gracias a todos Ustedes.

Resuelto, marabillosamente Bién!

Regards, saludos.

[AIDA]

Hola

como debo sumar 30 días para que después se ejecute otra aplicación

Saluditos

[nageswaragunupudi]

Buenos Dias Amigos, por favor, necesito ayuda de todos ustedes, para lo ke sigue:

Como puedo hacer para sumar una fecha a un numero:

Ejemplo:

Tengo la siguinte fecha inicial:

31/12/2006

Necesito sumar a esta fecha, 5 años( 60 meces )

y que el resultado, me retorne la nueva fecha de término.

Regards, saludos.

Code: Select all  Expand view  RUN

dNewDate := ADDMONTH( dOldDate, nMonts )