Ir para conteúdo
Fórum Script Brasil
  • 0

pesquisa por quantidade de registro


vms

Pergunta

queria fazer uma pesquisa em um banco de dados

por quantidades de ocorrencias

ex:

campo1 (maquinas) A

campo2 (defeito) M

campo3 (data_defeito) A

qual a maquina que ocorre mais defeito registrado?

uso tabela paradox

Link para o comentário
Compartilhar em outros sites

4 respostass a esta questão

Posts Recomendados

  • 0
queria fazer uma pesquisa em um banco de dados

por quantidades de ocorrencias

Voce pode fazer uma pesquisa por data ou por defeito

Ex:

Select * from Tabela

Where data_defeito >= :Data1 and data_defeito <= :Data2

Order by maquinas, data_defeito

Neste caso Data1 e Data2 são passados como parametros ( data nicial e data final da pesquisa )

Select * Tabela

Where defeito like :Def

Order by maquinas, data_defeito

Neste caso Def é passado como parametro ( descrição do defeito )

..........................................................................

qual a maquina que ocorre mais defeito registrado?

Como voce não colocou quantidade de defeitos mas sim descrição do defeito então use a select 2

abraço

Link para o comentário
Compartilhar em outros sites

  • 0
Neste caso Data1 e Data2 são passados como parametros ( data nicial e data final da pesquisa )

Jhonas, voce pode fazer um exemplo como passar como parametro? porfarvor!

seria mais ou menos assim?

DM.QPesqQtd.Close;
DM.QPesqQtd.SQL.Clear;
DM.QPesqQtd.SQL.Text := 'select * from OS where Data_Inicio >= :Data1 and Data_Inicio  <= :Data2';
DM.QPesqQtd.ParamByName("Data1").AsString := (Edit1.Text);
DM.QPesqQtd.ParamByName("Data2").AsString := (Edit2.Text);
DM.QPesqQtd.Open;

Link para o comentário
Compartilhar em outros sites

  • 0
Jhonas, voce pode fazer um exemplo como passar como parametro? porfarvor!

seria mais ou menos assim?

Sim ou poderia ser assim tambem

DM.QPesqQtd.Close;
DM.QPesqQtd.SQL.Clear;
DM.QPesqQtd.SQL.Text := 'select * from OS where Data_Inicio >= :Data1 and Data_Inicio  <= :Data2';
DM.QPesqQtd.ParamByName("Data1").AsDate := DateEdit1.Date;
DM.QPesqQtd.ParamByName("Data2").AsDate := DateEdit2.Date;
DM.QPesqQtd.Open;

abraço

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,4k
×
×
  • Criar Novo...