[firebase-br] Porque ???????
Marcio Roberto Chiaveli
marcio.chiaveli em gmail.com
Seg Dez 18 08:43:59 -03 2006
Bom dia Clovis.
Da uma olhada na montagem do sql, acho que esta faltando voce separar
os AND's com um espaço.
Ex: vSQL := 'SELECT * FROM LEIS WHERE ANOREV
='+quotedstr(fDm1.CDS1.FieldByName('Ano').AsString) +
> ' and NUMEROREV ='+quotedstr(fDm1.CDS1.FieldByName('Numero').AsString) +
> ' and ARTIGOREV ='+quotedstr(fDm1.CDS1.FieldByName('Artigo').AsString) +
> ' and INCISOREV ='+quotedstr(fDm1.CDS1.FieldByName('Inciso').AsString) +
> ' and PARAGRAFOREV='+quotedstr(fDm1.CDS1.FieldByName('Paragrafo').AsString);
Em 16/12/06, Clovis<clovito.ferreira em itelefonica.com.br> escreveu:
> Bom dia Pessoal
> Saudações
>
> Trabalho com D7, dbExpress e Firebird 1.5. Qual o motivo desta situação não estar sendo suportada por uma query?
>
> vSQL := 'SELECT * FROM LEIS WHERE ANOREV ='+quotedstr(fDm1.CDS1.FieldByName('Ano').AsString) +
> 'and NUMEROREV ='+quotedstr(fDm1.CDS1.FieldByName('Numero').AsString) +
> 'and ARTIGOREV ='+quotedstr(fDm1.CDS1.FieldByName('Artigo').AsString) +
> 'and INCISOREV ='+quotedstr(fDm1.CDS1.FieldByName('Inciso').AsString) +
> 'and PARAGRAFOREV='+quotedstr(fDm1.CDS1.FieldByName('Paragrafo').AsString);
>
>
> fDm1.Qy2.Close;
> fDm1.Qy2.SQL.Clear;
> fDm1.Qy2.SQL.Add(vSQL);
> fDm1.Qy2.Open;
> if fDm1.Qy2.RecordCount > 0 then
> begin
> No RecordCount diz que não suporta essa condição, pois até pouco tempo funcionava
> Obrigado
> Clovito
>
>
>
> Que a Paz do Grande Arquiteto
> do Universo nos Ampare
> clovito.ferreira em itelefonica.com.br
> Msn-> clovitoferreira em cgmnet.com.br
> Dourado SP
> ______________________________________________
> FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
> Para editar sua configuração na lista, use o endereço http://mail.firebase.com.br/mailman/listinfo/lista_firebase.com.br
> Para consultar mensagens antigas: http://firebase.com.br/pesquisa
>
Mais detalhes sobre a lista de discussão lista