Page 1 of 1
SUMAR UNA FECHA A UN NUMERO?
Posted: Sat Jan 06, 2007 12:27 pm
by 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.
Posted: Sat Jan 06, 2007 1:23 pm
by 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
Posted: Sat Jan 06, 2007 2:03 pm
by dbzap
dfecha := CtoD( "31/12/2006" )
dFechaNueva := dFecha + 365*5
? dFecha, dFechaNueva
creo yo .....
Posted: Sat Jan 06, 2007 7:18 pm
by Verhoven
¿Y los años bisiestos?
imaginen que la fecha inicial sea un 29 de febrero, que haberlos haylos.
Posted: Sat Jan 06, 2007 7:24 pm
by 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
Posted: Sun Jan 07, 2007 9:43 pm
by Rochinha
Amigos
Un año bisiexto tiene 366 dias e para saber se lo mismo és bisexto basta dividir por 400 ex:
Code: Select all
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.
Posted: Mon Jan 08, 2007 12:32 pm
by 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
Posted: Mon Jan 08, 2007 12:52 pm
by 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 )
Posted: Mon Jan 08, 2007 6:29 pm
by karinha
Gracias a todos Ustedes.
Resuelto, marabillosamente Bién!
Regards, saludos.
Re: SUMAR UNA FECHA A UN NUMERO?
Posted: Tue Feb 09, 2021 5:23 am
by AIDA
Hola
como debo sumar 30 días para que después se ejecute otra aplicación
Saluditos
Re: SUMAR UNA FECHA A UN NUMERO?
Posted: Tue Feb 09, 2021 9:57 am
by nageswaragunupudi
karinha wrote: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
dNewDate := ADDMONTH( dOldDate, nMonts )