FoxPro/Visual FoxPro - Como imprimir el formato de fecha completo en un report

 
Vista:
sin imagen de perfil
Val: 20
Ha disminuido su posición en 10 puestos en FoxPro/Visual FoxPro (en relación al último mes)
Gráfica de FoxPro/Visual FoxPro

Como imprimir el formato de fecha completo en un report

Publicado por Joel (47 intervenciones) el 30/11/2018 20:48:16
Buenas colegas,

Mi consulta es la siguiente, como puedo convertir un formato de fecha de un textbox y plasmarlo en un rpt pero con formato de fecha completa, ejm: en lugar de que diga (30/11/2018) que me diga Hoy Viernes 30 de Noviembre del 2018 y este formato de fecha completa ponerlo en un rpt

Gracias, espero que me puedan ayudar.!
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
Imágen de perfil de Leonardo Daniel A.
Val: 1.115
Oro
Ha mantenido su posición en FoxPro/Visual FoxPro (en relación al último mes)
Gráfica de FoxPro/Visual FoxPro

Como imprimir el formato de fecha completo en un report

Publicado por Leonardo Daniel A. (497 intervenciones) el 01/12/2018 07:20:17
Tendras que crear una funcion que reciba la fecha, descompongas en dia mes año y luego pregunte por cada mes y la formes tu mismo y hagas un return y llamas a esa funcion desde el reporte
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
sin imagen de perfil
Val: 20
Ha disminuido su posición en 10 puestos en FoxPro/Visual FoxPro (en relación al último mes)
Gráfica de FoxPro/Visual FoxPro

Como imprimir el formato de fecha completo en un report

Publicado por Joel (47 intervenciones) el 05/12/2018 21:43:19
Buenas Leonardo muchas gracias por la recomendación, pero tienes algún ejemplo de como podría realizarlo? es que necesito mostrar la fecha que tengo en un textbox y esta fecha se plasme en el rpt pero completo osea la fecha en letras.
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
Imágen de perfil de Leonardo Daniel A.
Val: 1.115
Oro
Ha mantenido su posición en FoxPro/Visual FoxPro (en relación al último mes)
Gráfica de FoxPro/Visual FoxPro

Como imprimir el formato de fecha completo en un report

Publicado por Leonardo Daniel A. (497 intervenciones) el 06/12/2018 21:35:22
Hola, ya no uso Vfox.. pero se me ocurre algo asi


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
FUNCTION fechaCompleta
  PARAMETER _fecha
 
  _dia = DAY(_fecha)
  _mes = MONTH(_fecha)
  _year = YEAR(_fecha)
  _nomMes = ""
  _fechaCompleta = ""
  DO CASE
     CASE 1
         _nomMes = "Enero"
     CASE 2
         _nomMes  = "Febrero"
     CASE 3
         _nomMes  = "Marzo"
  ENDCASE
 
  _fechaCompleta = STR(_dia) + " de " + _nomMes + " de " + STR(_year)
 
RETURN _fechaCompleta


esa funcion la debes tener en algun PRG donde tengas funciones o procedimientos globales y en tu programa poner

SET PROCEDURE TO rutinas

y en el reporte agregas un campo y pones fechaCompleta( date() )
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
sin imagen de perfil
Val: 46
Ha aumentado 1 puesto en FoxPro/Visual FoxPro (en relación al último mes)
Gráfica de FoxPro/Visual FoxPro

Como imprimir el formato de fecha completo en un report

Publicado por Henry (16 intervenciones) el 07/12/2018 01:14:53
Hola Joel:
Te paso esta rutina en visual fox para lo que necesitas, comentas si te fue de utilidad

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
LOCAL aDias(7), aMeses(12)
aDias[1]="DOMINGO "
aDias[2]="LUNES "
aDias[3]="MARTES "
aDias[4]="MIERCOLES "
aDias[5]="JUEVES "
aDias[6]="VIERNES "
aDias[7]="SABADO "
aMeses[1]="ENERO"
aMeses[2]="FEBRERO"
aMeses[3]="MARZO"
aMeses[4]="ABRIL"
aMeses[5]="MAYO"
aMeses[6]="JUNIO"
aMeses[7]="JULIO"
aMeses[8]="AGOSTO"
aMeses[9]="SETIEMBRE"
aMeses[10]="OCTUBRE"
aMeses[11]="NOVIEMBRE"
aMeses[12]="DICIEMBRE"



1
2
3
4
DFECHA= aDias(DOW(XFECHA,1)) + ;
    TRANSFORM(DAY(XFECHA),"@L 99") + ;
    " de " + aMeses(MONTH(XFECHA)) + ;
    " de " + TRANSFORM(YEAR(XFECHA),"@L 9999")
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar
sin imagen de perfil
Val: 109
Ha mantenido su posición en FoxPro/Visual FoxPro (en relación al último mes)
Gráfica de FoxPro/Visual FoxPro

Como imprimir el formato de fecha completo en un report

Publicado por elhabraque (58 intervenciones) el 08/12/2018 12:07:43
Otra forma de mostrar la fecha con funciones del VFox:

DFECHA = CDOW(XFECHA) + ", " + ;
PADL(DAY(XFECHA),2, "0") + ;
" de " + CMONTH(XFECHA) + ;
" de " + STR(YEAR(XFECHA),4)
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