Fórum Contar duas tabelas, exibindo resultado em duas colunas #623798
30/07/2025
0
Pessoal,
O código a seguir roda certinho no IBEXPERT, porém estou com um pouco de dificuldade em ajusta-lo para o delphi.
O código a seguir roda certinho no IBEXPERT, porém estou com um pouco de dificuldade em ajusta-lo para o delphi.
SELECT (SELECT COUNT(*)
FROM TBDUPLICATAS
WHERE COD_CEDENTE = :CEDENTE
) AS DUPLICATAS,
(SELECT COUNT(*)
FROM TBVENCIDAS
WHERE COD_CEDENTE = :CEDENTE
) AS VENCIDAS
FROM RDB$DATABASE
Renan
Curtir tópico
+ 0
Responder
Posts
02/08/2025
Fabricio Pereira
Pessoal,
O código a seguir roda certinho no IBEXPERT, porém estou com um pouco de dificuldade em ajusta-lo para o delphi.
O código a seguir roda certinho no IBEXPERT, porém estou com um pouco de dificuldade em ajusta-lo para o delphi.
SELECT (SELECT COUNT(*)
FROM TBDUPLICATAS
WHERE COD_CEDENTE = :CEDENTE
) AS DUPLICATAS,
(SELECT COUNT(*)
FROM TBVENCIDAS
WHERE COD_CEDENTE = :CEDENTE
) AS VENCIDAS
FROM RDB$DATABASECreio que seu SQL esteja dentro de uma query (emplo abaixo qrVendas) então passa o parâmetro (via um campo de texto abaixo edtInput) via código, em um botão por ex.,.....
qrVendas.Close;
qrVendas..Unprepare;
qrVendas.Params[0].Value:=edtInput.Text;
qrVendas.Prepare;
qrVendas.Open;
Cria um DataSource apontando pra essa query e mostra num DBGrid pra ver o resultado
Responder
Gostei + 0
07/08/2025
Renan
Olá, Fabricio.
Obrigado pela dica.
No meu caso só preciso dos valores mesmo, sem mostrar num grid.
Consegui montar a extrutura no padrão do delphi e ta rodando lisinho.
Obrigado pela dica.
No meu caso só preciso dos valores mesmo, sem mostrar num grid.
Consegui montar a extrutura no padrão do delphi e ta rodando lisinho.
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)