ActiveDelphi

[fdstorti]

Olá, estou começando usar o Delphi a pouco e estou tendo problema com um programa que estou desenvolvendo.

É o seguinte: tenho uma tabela de funcionários e nesta tabela guardo a data de nascimento deles. Tenho uma consulta de mês de aniversário que funciona beleza, porém neste formulário de consulta, gero um relatório e imprimo os funcionários que fazem aniversário num determinado mês. Gostaria de nesse relatório ordenar os funcionários por data de aniversário e não data de nascimento (até porque não quero que apareça no relatório a data de nascimento do funcionário, e sim o dia do aniversário). Alguém aí pode me ajudar?

Obs.: Utilizo o delphi 7 e o interbase 6.5

[renanbg]

Se entendi bem, você quer exibir apenas o dia do aniversario certo?

Se for isso, no seu select, use a função extract para pegar apenas o dia da data de nascimento.

aqui tem um exemplo

[fdstorti]

O dia do aniversário eu já tinha feito, o que eu não estou conseguindo é ordenar a minha Query por data de aniversário. Eu só consigo ordenar pela data de nascimento.

Eu estou usando o seguinte comando SQL: "SELECT * FROM FUNCIONARIO WHERE EXTRACT (MONTH FUNC_DATANASC) = :MES
ORDER BY FUNC_NOME".

Obs.: Já tentei depois de order by colocar "EXTRACT (DAY FUNC_DATANASC) mas dá erro.

[johnny-walker]

Tente desta forma:


http://www.activedelphi.com.br/forum/viewtopic.php?t=65829&highlight=dataini


bye
_________________
P.O.W.E.R B.Y D.E.L.P.H.I

[renanbg]

Você está extraindo o mes e ordenando por nome.

Para que funcione da forma que deseja, extraia tbm o dia e ordene pelo dia.

[fdstorti]

Eu estou ordenando por nome porque não consegui por dia. Você tem algum exemplo pra me mostrar?

[leo_cj]

Tenta assim:

[fdstorti]

Já tentei isso. Mas veja o que acontece:

Exemplo:
Tenho 3 funcionários que fazem aniversário em setembro. O funcionário A nasceu no dia 20/09/1988. O B, no dia 21/09/1965, e o C, no dia 13/09/1991.

Logicamente eu tenho que listar os que fazem aniversário primeiro, ou seja:

C, A e B.

Todavia, caso eu ordene por data de nascimento (como me indicou), a ordem ficaria do mais velho pro mais novo (B,A e C). Este é meu problema rsrsrs

[leo_cj]

Entendi, falha minha, não tinha pensando no ano

tenta assim:

[fdstorti]

Obrigado pela dica, mas parece que o interbase não aceita essa cláusula (extract) após "order by". Está dando erro.

"Extract" após a cláusula "where" funciona bem, mas depois de "order by" dá erro!

[imex]

Boa tarde,

fdstorti, não fiz nenhum teste, não sei se funciona da forma como você postou, mas pela sintaxe da função Extract deveria ter um From antes do nome do campo:

[fdstorti]

Galera, obrigado a todos pelos comentários. Eu consegui resolver o meu problema, porém de outra forma. Entretanto, os comentários aqui postados elucidaram meus pensamentos. Eis aí como fiz:

SELECT FUNC_NOME, FUNC_DATANASC, EXTRACT (DAY FROM FUNC_DATANASC) AS DIA
WHERE EXTRACT (MONTH FROM FUNC_DATANASC) = :MES
ORDER BY 3