Fórum SQL com nome de tabela variável. URGENTE!!! #167715
03/07/2003
0
Pessoal,
Tenho que fazer um select onde o nome das tabelas varia, mas o campo não. Tentei isso, mas não deu certo:
procedure TfrmPrincipal.PegaNumRegistros(pNomeTabela: string); begin with qryAux do
begin
Close;
SQL.Clear;
SQL.Add(´SELECT MODULO.NOME AS NOME, ´ + pNomeTabela + ´.COD_MODULO´ + ´ AS CODIGO, COUNT (*) AS TOTAL FROM´);
SQL.Add(´MODULO, ´ + pNomeTabela);
SQL.Add(´WHERE MODULO.COD_MODULO = ´ + pNomeTabela + ´.COD_MODULO´);
SQL.Add(´GROUP BY ´ + pNomeTabela + ´.COD_MODULO, MODULO.NOME´);
Open;
end;
end;
Tenho que fazer um select onde o nome das tabelas varia, mas o campo não. Tentei isso, mas não deu certo:
procedure TfrmPrincipal.PegaNumRegistros(pNomeTabela: string); begin with qryAux do
begin
Close;
SQL.Clear;
SQL.Add(´SELECT MODULO.NOME AS NOME, ´ + pNomeTabela + ´.COD_MODULO´ + ´ AS CODIGO, COUNT (*) AS TOTAL FROM´);
SQL.Add(´MODULO, ´ + pNomeTabela);
SQL.Add(´WHERE MODULO.COD_MODULO = ´ + pNomeTabela + ´.COD_MODULO´);
SQL.Add(´GROUP BY ´ + pNomeTabela + ´.COD_MODULO, MODULO.NOME´);
Open;
end;
end;
Vfalseth
Curtir tópico
+ 0
Responder
Posts
03/07/2003
Motta
deveria funcionar, salve o conteudo da query
query.savetofile(´...´);
para checar
query.savetofile(´...´);
para checar
Responder
Gostei + 0
03/07/2003
Jairo Norenberg
VFalseTH
Pelo que eu vi, seu código está correto.
Certifique-se de que o editor de campos da query (FieldDefs)esteja vazia.
Se não funcionar, mostre-nos o tipo de erro que está ocorrendo.
Jairo Norenberg
Pelo que eu vi, seu código está correto.
Certifique-se de que o editor de campos da query (FieldDefs)esteja vazia.
Se não funcionar, mostre-nos o tipo de erro que está ocorrendo.
Jairo Norenberg
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)