Como crio uma função no Servidor
Bom dia a todos,
Estou precisando criar uma função no servidor no SERVIDOR.TBL onde um paramentro recebe TSQLQUERY.
O objetivo é ficar assim:
PARAMETRO.sql.add(....)
Desde ja agradeço
Silvio Coelho
Estou precisando criar uma função no servidor no SERVIDOR.TBL onde um paramentro recebe TSQLQUERY.
O objetivo é ficar assim:
PARAMETRO.sql.add(....)
Desde ja agradeço
Silvio Coelho
Minervasoft
Curtidas 0
Respostas
Aasn
06/11/2008
Olá,
Crie a função no servidor com o parâmetro do tipo ´VARIANT *´
[]´s
AASN
Crie a função no servidor com o parâmetro do tipo ´VARIANT *´
[]´s
AASN
GOSTEI 0
Minervasoft
06/11/2008
AASN, infelismente nao deu apesar de nao apresentar erro na copilação quando executa diz que é inválido.
GOSTEI 0
Aasn
06/11/2008
Olá,
deixe-me ver se entendi... vc quer passar uma sentença SQL como parâmetro para a função do servidor, é isso? ou vc quer passar o objeto TSQLQuery como parâmetro?
[]´s
AASN
deixe-me ver se entendi... vc quer passar uma sentença SQL como parâmetro para a função do servidor, é isso? ou vc quer passar o objeto TSQLQuery como parâmetro?
[]´s
AASN
GOSTEI 0
Minervasoft
06/11/2008
No cliente ela seria assim
procedure ComplementoQuery(Tabela: TSQLQuery; Query, Complemento: String);
begin
Tabela.SQL.Text := Query;
Tabela.SQL.Add(Complemento);
end;
onde:
Tabela : é a sqlQuery;
Query : query original;
complemento : condição imposta para buscar o registro
Espero que possa me ajuda
Desde ja agradeço
Silvio Coelho
procedure ComplementoQuery(Tabela: TSQLQuery; Query, Complemento: String);
begin
Tabela.SQL.Text := Query;
Tabela.SQL.Add(Complemento);
end;
onde:
Tabela : é a sqlQuery;
Query : query original;
complemento : condição imposta para buscar o registro
Espero que possa me ajuda
Desde ja agradeço
Silvio Coelho
GOSTEI 0