Alguna función en Visual FoxPro 6.0 que me diga cuál es el último día de un mes (dada una fecha)

Deseo saber si existe alguna función en Visual FoxPro 6.0 que me diga cuál es el último día de un mes (dada una fecha).
La siguiente pregunta es: tengo Foxpro 6.0 en Inglés, al realizar la función CMONTH me sale el mes en Inglés. Hay alguna manera de que salga en español con otra función.?

1 Respuesta

Respuesta
Disculpa la demora:
Para la primera pregunta tienes que realizar una rutina, como esta:
Llamar la rutina de esta forma:
DiaUltimo(dFechaIngreso)
Procedure diaultimo
parameters dFechaIngreso
nMesFechaIngreso = month(dFechaIngreso)
Do Case
....Case nMesFechaIngreso = 1
..........dUltimoDia = cTod("31/01/" + Str(Year(dFechaIngreso),4)
..........cDiaUltimo = cDow(dUltimoDia)
...Case nMesFechaIngreso = 2
...
...
EndCase
Return cDiaUltimo
EndProc
Para la segunda pregunta también podes hacer un procedimiento:
Procedure CambiaMes
Parameters nMes
do Case
..Case nMes = 1
......cMes = "Enero"
..Case nMes = 2
......cMes = "Febrero"
....
....
End Case
return cMes
Endproc

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas