FoxPro/Visual FoxPro - SIGUE FALLANDO MIREN MI CODIGO DEL CMONTH

HOLA AMIGOS, PERDONEN QUE LES SIGA MOLESTANDO PERO ES QUE NO ME SALE LO DEL CMONTH EN EL CAMPO DE MI REPORTE, ME SIGUE SALIENDO INCOMPLETO EL MES, MIREN, YO TENGO UN FORMULARIO EL CUAL TIENE UN BOTON PREVIEW, DICHO BOTON TIENE EL SIGUIENTE CODIGO

SELECT abonos.cclave,abonos.cnombre,;
abonos.cappat,abonos.capmat,DAY(abonos.dfecabo) as Dia,;
CMONTH(abonos.dfecabo) as Mes,YEAR(abonos.dfecabo) as Año,abonos.cdescrip,abonos.cmarca,abonos.cmod,;
abonos.cserie,abonos.nsdo FROM abonos WHERE ALLTRIM(Thisform.combo1.Value) = ALLTRIM(abonos.cclave);
AND Thisform.Pageframe1.Page1.TxtNNABO.Value = abonos.nnabo INTO CURSOR tmprecibo
SELECT tmprecibo
BROWSE
REPORT FORM rptrecibo PREVIEW NOWAIT

EN DONDE CMONTH(ABONOS.DFECABO) AS MES me arroja el nombre del mes en la etiqueta MES, y antes de mandarlo al reporte le hago un browse al cursor generado para ver el resultado y desde ahi me corta el mes, no aparece completo y logicamente en mi reporte tampoco.

oajala y me puedan ayudar, yo se que es sencilla la solucion, pero la verdad ya no se que hacer....

GRACIAS POR SU AYUDA...
SALUDOS: RAUL.

verifica si antes del SELECT tenes definido MES como character y si es así de cuanto es el LEN

Ok, si te sigue fallando has la rutina q te devuelva el nombre del mes como tu quieres en base al numero del mes

SELECT abonos.cclave,abonos.cnombre,;
abonos.cappat,abonos.capmat,DAY(abonos.dfecabo) as Dia,;
DescMes(MONTH(abonos.dfecabo)) As Mes,YEAR(abonos.dfecabo) as Año,abonos.cdescrip,abonos.cmarca,abonos.cmod,;
abonos.cserie,abonos.nsdo FROM abonos WHERE ALLTRIM(Thisform.combo1.Value) = ALLTRIM(abonos.cclave);
AND Thisform.Pageframe1.Page1.TxtNNABO.Value = abonos.nnabo INTO CURSOR tmprecibo
SELECT tmprecibo
BROWSE
REPORT FORM rptrecibo PREVIEW NOWAIT


FUNCTION DescMes()
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
ENDFUNCTION

Suerte.. compa

Probá así :
PADR(CMONTH(ABONOS.DFECABO),10) AS MES

Amigo Raul Flores :

Aqui te muestro otra forma de obtener el Nombre del Mes claro cambias los nombres de las variables...

SET CENTURY ON
SET DATE BRITISH

SELECT PADR(cMonth(Fech_Pres),10," ") As cMeses FROM Prestado ;
INTO Cursor Temp

Saludos,

GABRIEL
(Lima-Perú)