Boa tarde..
O Status é numérico??
Se sim coloca assim:
Status IN (1,7,8)
Falouuuuu
Jaques Douglas Baumgart Dix
Desenvolvedor
Blumenau - SC
Ralp Alves Bezerra escreveu:
>
> Nobres colegas,
>
> Preciso listar em uma consulta os alunos que tenham o status igual a 1,
> 7 e 8 somente. Porém a consulta não retorna os dados solicitados.
>
> Já tentei trocar a linha:
> Sql.Add('Status="1" and Status="7" and Status="8" and');
> por :
> Sql.Add('Status="1" or Status="7" or Status="8" and'); mas não funciona.
>
> Alguém poderia me dar uma luz.
>
> Grato
>
> estou com uma dúvida nesta consulta abaixo:
>
> If Radio1.ItemIndex=12 then // Turma da Escola
> Begin
> With qrPesqAluno do
> Begin
> Close;
> Sql.Clear;
> Sql.Add('Select * From Alunos');
> If All.Checked=False then
> Begin
> Sql.Add('Where CodigoDaEscola=:CodEsc and');
> Sql.Add('Status="1" and Status="7" and Status="8" and');
> <==== dúvida nesta linha
> Sql.Add('TipoDeEnsinoD=:TE and');
> Sql.Add('TurmaD=:TR and');
> Sql.Add('SerieD=:SE and');
> Sql.Add('TurnoD=:TU');
> Sql.Add('Order By Nome');
> ParamByName('CodEsc').Value:=rxdbLookupCombo9.Text;
> ParamByName('TE').Value :=rxdbLookupCombo21.Text;
> ParamByName('TR').Value :=rxdbLookupCombo12.Text;
> ParamByName('SE').Value :=rxdbLookupCombo13.Text;
> ParamByName('TU').Value :=rxdbLookupCombo14.Text;
>
> end else begin
> Sql.Add('Where TipoDeEnsinoD=:TE and');
> Sql.Add('TurmaD=:TR and');
> Sql.Add('SerieD=:SE and');
> Sql.Add('TurnoD=:TU');
> Sql.Add('Order By Nome');
> ParamByName('TE').Value :=rxdbLookupCombo21.Text;
> ParamByName('TR').Value :=rxdbLookupCombo12.Text;
> ParamByName('SE').Value :=rxdbLookupCombo13.Text;
> ParamByName('TU').Value :=rxdbLookupCombo14.Text;
> end;
> Open
> end;
> if qrPesqAluno.IsEmpty Then ShowMessage('Registro não encontrado!')
> end;
>
>
[As partes desta mensagem que não continham texto foram removidas]
