Visual FoxPro.NET - Formato Fecha en impresión

   
Vista:

Formato Fecha en impresión

Publicado por Hernando Moreno S. hernando.msilva@gmail.com (2 intervenciones) el 20/05/2016 01:58:31
Buenas tardes. Por favor, les quiero pedir un apoyo. Tengo un programa y en un informe, me esta imprimiendo el nombre del mes así:

Ag/st/, en ves de ser Agosto.

Abr/l, en ves de ser Abril

Ma/o, en ves de ser Mayo y asi sucesivamente para cualquier mes,

Dentro del informe la instrucción para que me imprima el nombre del mes la declare:

SUBSTR(cMONTH(f_recibo),1,10)


La verdad no se que error tenga.


Muchas gracias por su apoyo
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

Formato Fecha en impresión

Publicado por Saúl Hernández Aguilar (46 intervenciones) el 23/05/2016 15:51:04
Hola Hernando

Prueba de esa manaera

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
nommes = nombreMes(MONTH(DATE()))
 
?nommes
 
**
FUNCTION NombreMes
PARAMETER nmes
PRIVATE vmes, cretorno
DIMENSION vmes(12)
vmes[01] = "Enero"
vmes[02] = "Febrero"
vmes[03] = "Marzo"
vmes[04] = "Abril"
vmes[05] = "Mayo"
vmes[06] = "Junio"
vmes[07] = "Julio"
vmes[08] = "Agosto"
vmes[09] = "Septiembre"
vmes[10] = "Octubre"
vmes[11] = "Noviembre"
vmes[12] = "Diciembre"
cretorno = ""
IF BETWEEN(nmes, 1, 12)
     cretorno = vmes(nmes)
ENDIF
RELEASE vmes
RETURN cretorno
ENDFUNC
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