Aos Cuidados de André LuIS E rUbem Nascimento Rocha que me deram uma LUZ nesse
problema.
Olha só o que eu tive que fazer no meu SQL em tempo de execução.
REL_ANIVERFALEC.SQL_ANIVERFALEC.CLOSE;
REL_ANIVERFALEC.SQL_ANIVERFALEC.SQL.CLEAR;
SQL_ANIVERFALEC.SQL.ADD('SELECT EXTRACT(DAY FROM IRMA.DTFALECIM) AS DIA,
EXTRACT(MONTH FROM IRMA.DTFALECIM) AS MES,');
SQL_ANIVERFALEC.SQL.ADD('IRMA.CDRELIG, IRMA.NMOPCAO, IRMA.SOBRENOME,
IRMA.NMCIVIL, IRMA.DTNASC, IRMA.DTFALECIM');
SQL_ANIVERFALEC.SQL.ADD('FROM');
SQL_ANIVERFALEC.SQL.ADD('IRMA');
SQL_ANIVERFALEC.SQL.ADD('WHERE');
SQL_ANIVERFALEC.SQL.ADD('IRMA.CDSITUAC = ''FALEC'' ');
SQL_ANIVERFALEC.SQL.ADD('AND');
SQL_ANIVERFALEC.SQL.ADD('EXTRACT(MONTH FROM IRMA.DTFALECIM) BETWEEN :pMES and
:pMES2');
SQL_ANIVERFALEC.Params[0].DataType:= ftInteger;
SQL_ANIVERFALEC.Params[0].ParamType:= ptInputOutput;
SQL_ANIVERFALEC.Params[0].value:= 0;
SQL_ANIVERFALEC.Params[1].DataType:= ftInteger;
SQL_ANIVERFALEC.Params[1].ParamType:= ptInputOutput;
SQL_ANIVERFALEC.Params[1].value:= 0;
SQL_ANIVERFALEC.SQL.ADD('AND');
SQL_ANIVERFALEC.SQL.ADD('IRMA.IRMA.DTFALECIM BETWEEN :pDTFALEC AND
:pDTFALEC2');
SQL_ANIVERFALEC.Params[2].DataType:= ftDateTime;
SQL_ANIVERFALEC.Params[2].ParamType:= ptInputOutput;
SQL_ANIVERFALEC.Params[2].value:= '00:00:00';
SQL_ANIVERFALEC.Params[3].DataType:= ftDateTime;
SQL_ANIVERFALEC.Params[3].ParamType:= ptInputOutput;
SQL_ANIVERFALEC.Params[3].value:= '00:00:00';
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
<*> Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
<*> Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
