FoxPro/Visual FoxPro - gomonth

   
Vista:

gomonth

Publicado por Sebastian (253 intervenciones) el 13/02/2008 19:49:07
Hola foro necesito de ayuda tengo este codigo que verifica si la ultima atencion es antes de los 7 meses lo hace bien asta ahi, el problema es cuando ya lo acepto y voy a registrar a este cliente en el campo fecha puedo colocar cualquier fecha y lo acepta y no se como consistenciarlo a este tambien para que no acepte me ayudan gracias.

selec tabla1
set order to codigo_cliente
seek thisform.text1.value
if found()
thisform.text1.value=tabla1.codigo_cliente
if thisform.text1.value >=gomonth(date(),-7)
=messagebox("debe de pasar 7 meses para su cita ","Mensaje del Sistema")
thisform.text1.value=""
thisform.text1.setfocus
thisform.refresh
endif
endif
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:gomonth

Publicado por jose camilo (688 intervenciones) el 13/02/2008 20:22:18
no te entendi
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:gomonth

Publicado por Sebastian (253 intervenciones) el 13/02/2008 21:57:06
si tienes razon bueno de esta manera creo que mejare entender

quiero validar fechas de acuerdo al codigo del cliente y fecha en mi tabla ya tengo un registro y voy a volver a registrarlo no me debe permitir si es menos de 7 meses
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:gomonth

Publicado por jose camilo (688 intervenciones) el 18/02/2008 13:56:18
si estas usando datetime lo primero es sacar solo la fecha de la variable
luego restale a la fecha del sistema tu variable te daras los dias trancurrido
esto lo divide por trenta y te daras un aproximado de los meses transcurrido

ejemplo
***** Recuerda sacar solo la fecha No tengo a visual ahora y no recuerdo la funcion
******* trenta es un constante para los dias del mes la mas proxima es 30.41667, perderas un dia cada cuatro ano pero eso no importa no somos perfecto

AA = (date()-fecha de la data)/30
If Int(AA)<7
No ha pasado siete meses
Else
Ya pasaron Siete meses
EndIf
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar