Funcion para Meses ???

30/03/2005 - 14:55 por Programador T-101 T-1001 | Informe spam
Hola foro..
Ante Todo Gracias a los que lean esto.. y me puedean ayudar..
amigo tengo campos o variables FECHAS
lo que quiero es averiguar si hay una funcion por la cual pormedio de dicha
funcion pueda averiguar cuantos MESES exactos teniendo
encuenta dias, Es decir del dia 10 de una fecha al dia 11 de otra fecha ya
hay otro mes...
espero me entiendan

Gracias...

La Vida Es Bella, Seguramente Que Mañana No Vivamos Lo De Hoy

Preguntas similare

Leer las respuestas

#1 Pablo Javier
30/03/2005 - 15:36 | Informe spam
Hola

No se si te entendí bien, pero te paso un ejemplo que resta cantidad de
meses de entre dos fechas:

* Resta la cantidad de mes entre 01/12/05 y hoy.
( MONTH(DATE(2005,12,01)) - MONTH(DATE()) )

Saludos...
Pablo


PortalFox :: Nada corre como un zorro
http://www.portalfox.com

PortalFox - NNTP Forum Gateway
Respuesta Responder a este mensaje
#2 Luis María Guayán
30/03/2005 - 16:14 | Informe spam
Mira esta función que te puede servir:

? DifMes(DATE(2004,3,31))

*--
* FUNCTION DifMes(tdIni, tdFin)
*--
* Calcula los meses completos:
* tdIni = Fecha Inicial
* tdFin = Fecha a la cual se calcula la diferencia.
* Por omisión toma la fecha actual.
*--
FUNCTION DifMes(tdIni, tdFin)
LOCAL lnAnio, lnMes
IF EMPTY(tdFin)
tdFin = DATE()
ENDIF
IF tdFin < tdIni
RETURN .NULL. && Fecha Inicial menor que Fecha Final
ENDIF
*-- Calculo los años
lnAnio = YEAR(tdFin) - YEAR(tdIni)
IF GOMONTH(tdIni, 12 * lnAnio) > tdFin
lnAnio = lnAnio - 1
ENDIF
*-- Calculo los meses
lnMes = MONTH(tdFin) - MONTH(tdIni)
IF lnMes < 0
lnMes = lnMes + 12
ENDIF
* Si el dia es mayor, no cumplio el mes
IF (DAY(tdFin) < DAY(tdIni))
IF lnMes = 0
lnMes = 11
ELSE
lnMes = lnMes - 1
ENDIF
ENDIF
RETURN lnMes + (lnAnio * 12)
ENDFUNC

*--

Luis María Guayán
Tucumán, Argentina
________________________________
SysOp de www.PortalFox.com
Microsoft Visual FoxPro MVP
________________________________
La palabra imposible solo figura
en el diccionario de los tontos


"Programador T-101 T-1001" escribió en el mensaje
news:
Hola foro..
Ante Todo Gracias a los que lean esto.. y me puedean ayudar..
amigo tengo campos o variables FECHAS
lo que quiero es averiguar si hay una funcion por la cual pormedio de


dicha
funcion pueda averiguar cuantos MESES exactos teniendo
encuenta dias, Es decir del dia 10 de una fecha al dia 11 de otra fecha


ya
hay otro mes...
espero me entiendan

Gracias...

La Vida Es Bella, Seguramente Que Mañana No Vivamos Lo De Hoy


Respuesta Responder a este mensaje
#3 Programador T-101 T-1001
30/03/2005 - 18:18 | Informe spam
Gracias Luis Maria Guayan Mil Gracias... Aunque vas a perder hoy... le diste
la clave a un colombiano...
Los siento... Les Ganaremos 1-0

Jajajajajja By
Respuesta Responder a este mensaje
#4 Pablo Javier
30/03/2005 - 20:38 | Informe spam
Excelente!

Saludos...
Pablo


PortalFox :: Nada corre como un zorro
http://www.portalfox.com

PortalFox - NNTP Forum Gateway
Respuesta Responder a este mensaje
#5 Luis María Guayán
30/03/2005 - 20:53 | Informe spam
Los siento... Les Ganaremos 1-0



Eso lo veremos esta noche :-)

Mi pronostico: Argentina 3 - Colombia 1

Los goles: Javier Saviola, Juan Román Riquelme y Rodrigo Palacios (si
ingresa al juego)

Luis María Guayán
Tucumán, Argentina
________________________________
SysOp de www.PortalFox.com
Microsoft Visual FoxPro MVP
________________________________
La palabra imposible solo figura
en el diccionario de los tontos
Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaSiguiente Respuesta Tengo una respuesta
Search Busqueda sugerida