extract(Year from dta)...no delphi 5..erro...

Question

Ol�...estou com um erro nesta sql usando o extract...n�o sei se � possivel utilizar no delphi 5...

EXTRACT(Year from A.Cad_dta_nascimento)...preciso do ano da data de nascimento

caso alguem saiba uma outra forma...

valeu galera

fabio cavalcanti

Luineumann · Answer

qual o erro que esta dando?...

Massuda · Answer

O EXTRACT s� funciona dessa forma se o BD for Paradox e o campo for DATE ou TIMESTAMP... qual BD voc� est� usando?...

Bruno Belchior · Answer

n�o sei se paradox suporta o extract... o q posso dizer � que apenas a vers�o 1.5 e superior de Firebird suporta......

Cavalcanti.fabio · Answer

galeta estou usando paradoex e delphi 5...o que eu estou pensando deste erro e que tenho que declarar na clausula USES alguma unit para que este comando possa funcionar e n�o sei se ele funciona no delphi 5.

valeu.

Luineumann · Answer

o extract funciona em delphi 5 e em paradox sim. eu uso sempre issocopia todo o comando sql que vc esta usando e t� dando erro para dar uma olhada...

Cavalcanti.fabio · Answer

aqui vai a minha sql...gostaria de lembrar se tenho que declara alguna unit na clausula Uses

vSelect := �SELECT * FROM CAD001 A,CAD004 B �;
vSelect := vSelect + � WHERE A.Cad_Id_Codigo = B.Cad_Id_Codigo �;
vSelect := vSelect + � AND �+EXTRACT(Year from A.Cad_dta_nascimento)>=:pAno1;
vSelect := vSelect + � AND �+EXTRACT(Year from A.Cad_dta_nascimento)<=:pAno2;
Query1.Params[0].AsInteger:= YearOf(Date) - StrToInt(MaskEdit3.Text);
Query1.Params[1].AsInteger:= YearOf(Date) - StrToInt(MaskEdit4.Text);

dar o seguinte erro :

Undeclared identifier: �EXTRACT�

valeu galera...abra�os a todos e bom final de semana

t+

Massuda · Answer

Talvez voc� tenha cometido um erro de digita��o, mas, da forma como voc� escreveu o c�digo, o EXTRACT est� sendo interpretado como algo que o Delphi deve compilar, n�o parte da sua query. Acho que o certo seria...

 vSelect := �SELECT * FROM CAD001 A,CAD004 B �;
 vSelect := vSelect + � WHERE A.Cad_Id_Codigo = B.Cad_Id_Codigo �;
 vSelect := vSelect + � AND EXTRACT(Year from A.Cad_dta_nascimento)>=:pAno1 �;
 vSelect := vSelect + � AND EXTRACT(Year from A.Cad_dta_nascimento)<=:pAno2 �;
...

F�rum extract(Year from dta)...no delphi 5..erro... #297704