Fórum Dúvida no TSQLDataSet #254820
18/10/2004
0
Olá Pessoal,
estou com uma quando utilizo o TSQLDataSet para uma Query
via código,
acho que ele não reconhece minha query no command text quando tem mais de uma linha.
Por exemplo:
dtModule.CDS_RelatorioPedido.Active := False;
with dtModule.SQL_RelatorioPedido do
begin
Close;
CommandText := ´SELECT P.PEDIDO,P.NRONOTA,C.NOME,C.CPFCNPJ´;
CommandText := ´FROM PEDIDO_SAIDA P,CLIENTES C´;
CommandText := ´WHERE P.CODCLIENTE=C.NUMERO´;
end;
dtModule.CDS_RelatorioPedido.Active := True;
Quando executo a consulta, dá um erro dizendo que não Encontra o FROM.
Será que o TSQLDataSet não trabalha como o TSQLQuery que permite separar o código em varias linhas como por exemplo:
with dtModule.SQL_RelatorioPedido do
begin
Close;
SQL := ´SELECT P.PEDIDO,P.NRONOTA,C.NOME,C.CPFCNPJ´;
SQL := ´FROM PEDIDO_SAIDA P,CLIENTES C´;
SQL := ´WHERE P.CODCLIENTE=C.NUMERO´;
end;
dtModule.CDS_RelatorioPedido.Active := True;
Desde já agradeço a ajuda,
Abraço Ricardo Palhares.
estou com uma quando utilizo o TSQLDataSet para uma Query
via código,
acho que ele não reconhece minha query no command text quando tem mais de uma linha.
Por exemplo:
dtModule.CDS_RelatorioPedido.Active := False;
with dtModule.SQL_RelatorioPedido do
begin
Close;
CommandText := ´SELECT P.PEDIDO,P.NRONOTA,C.NOME,C.CPFCNPJ´;
CommandText := ´FROM PEDIDO_SAIDA P,CLIENTES C´;
CommandText := ´WHERE P.CODCLIENTE=C.NUMERO´;
end;
dtModule.CDS_RelatorioPedido.Active := True;
Quando executo a consulta, dá um erro dizendo que não Encontra o FROM.
Será que o TSQLDataSet não trabalha como o TSQLQuery que permite separar o código em varias linhas como por exemplo:
with dtModule.SQL_RelatorioPedido do
begin
Close;
SQL := ´SELECT P.PEDIDO,P.NRONOTA,C.NOME,C.CPFCNPJ´;
SQL := ´FROM PEDIDO_SAIDA P,CLIENTES C´;
SQL := ´WHERE P.CODCLIENTE=C.NUMERO´;
end;
dtModule.CDS_RelatorioPedido.Active := True;
Desde já agradeço a ajuda,
Abraço Ricardo Palhares.
Ricardoapalhares
Curtir tópico
+ 0
Responder
Posts
18/10/2004
Vinicius2k
Colega,
A propriedade CommandText do TSQLDataSet é uma única String (Wide), e não TStrings como a propriedade SQL das queries... então vc deve informar uma única linha, mas pode usar concatenção para facilitar a leitura do código :
T+
A propriedade CommandText do TSQLDataSet é uma única String (Wide), e não TStrings como a propriedade SQL das queries... então vc deve informar uma única linha, mas pode usar concatenção para facilitar a leitura do código :
with dtModule.SQL_RelatorioPedido do
begin
Close;
CommandText := ´SELECT P.PEDIDO,P.NRONOTA,C.NOME,C.CPFCNPJ ´ +
´FROM PEDIDO_SAIDA P,CLIENTES C ´ +
´WHERE P.CODCLIENTE=C.NUMERO´;
end;
T+
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)