Retornar o quot;mêsquot;

Delphi

13/08/2008

Colegas,


Tenho um sistema de administração escolar o qual imprime carnês, então to precisando usar a data de vencimento do carnê informando o mês da prestação, como posso fazer isso?

Ex:

Dt de vencimento >> 05.08.2008
Mês >>>>>>>>> Agosto

Dt de vencimento >> 05.09.2008
Mês >>>>>>>>> Setembro





Agradecido


Irenildo

Irenildo

Curtidas 0

Respostas

Steve_narancic

Steve_narancic

13/08/2008

Vc pode utilizar a função formatDateTime, se não me engano o que vc quer seria algo assim:

FormatDateTime(´MMMM´, DtVecto);


onde:
´MMMM´ => Mascara
DtVecto => Sua Data


GOSTEI 0
Craudio

Craudio

13/08/2008

Que banco vc esta usando ?
Que tal se isso retornar convertido ?


GOSTEI 0
Irenildo

Irenildo

13/08/2008

To usando Sql Server 2005, não sei se ficou bem claro o que preciso...
É gerado um carnê nesse carnê existe a data de vencimento, então eu gostaria que de alguma forma através da data de vencimento fosse mostrado o mês da referida prestação...


GOSTEI 0
Craudio

Craudio

13/08/2008

Não sei se ajuda vc mas no Firebird eu fazia assim.

SELECT
nmCliente,
vlrCompra,
CASE MONTH(dtVencimento)
WHEN 1 THEN ´JANEIRO´
WHEN 2 THEN ´FEVEREIRO´
WHEN 3 THEN ´MARCO´
WHEN 4 THEN ´ABRIL´
WHEN 5 THEN ´MAIO´
WHEN 6 THEN ´JUNHO´
WHEN 7 THEN ´JULHO´
WHEN 8 THEN ´AGOSTO´
WHEN 9 THEN ´SETEMBRO´
WHEN 10 THEN ´OUTUBRO´
WHEN 11 THEN ´NOVEMBRO´
ELSE ´DEZEMBRO´
END AS MES_PARA_CARNE
FROM TABELA

Espero que ajude.


GOSTEI 0
POSTAR