FoxPro/Visual FoxPro - avisar cierre con fechas

 
Vista:

avisar cierre con fechas

Publicado por Loly (103 intervenciones) el 01/06/2009 16:12:22
Hola buenos dias... quisiera que me ayudaran con lo siguiente:
tengo una aplicacion que estoy terminando y el usuario debera realizar un cierre de operaciones dias antes de cada fin de mes... por decir de 3 a 5 dias habiles de cada mes y deseo que cuando se acerque a esas fechas... al enceder el equipo muestre que ya es tiempo de realizar cierre... y que no sea antes del fin de mes... por ejemplo yo construi esto pero no me ayuda en lo mas minino... a ver si ustedes me podran ayudar....

***** ESTO VA AL ARRANCAR EL SISTEMA*****
dinicial=(DATE()-DAY(DATE())+1)+25
IF DATE() >= dinicial
dinicial=DATE()
dFinal=GOMONTH(DATE(),1)
Faltan=dfinal-dinicial
MESSAGEBOX('Hoy es: '+DTOC(dinicial)+' Faltan '+ALLTRIM(STR(Faltan))+' dias Para el Cierre de Operaciones '+Chr(13);
+'Realice su respaldo de Datos y Obtenga sus reportes...',0+64,'Proximo Cierre')
Endif

Muchas gracias amigos....
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:avisar cierre con fechas

Publicado por andy (228 intervenciones) el 01/06/2009 19:21:57
Creo que el problema es en el modo que determinas las fechas
Con algo asi puedes establecer que el aviso se muestre entre el dia
27 y el dia 5 de cada mes:

IF day(DATE())>=27.or.day(date())<=5
MESSAGEBOX('Hoy es: '+DTOC(date());
+' Realice su respaldo de Datos Antes del dia 5',0+64)
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

RE:avisar cierre con fechas

Publicado por loly (103 intervenciones) el 01/06/2009 19:42:34
eso es precisamente lo que necesito... muchas gracias amigo.... estoy bien AGRADECIDA ....

saludos
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