J� recebi umas 25 dicas, mais infelismente nehnuma de certo.

Question

Select Cli.*,Pfis.* From TabCliente Cli, TabPes_Fisica Pfis Where cli.Cod_Vendedor = �00� and cli.Cod_Cidade = �00� and cli.Cod_Area = �000� and cli.Rota_Cliente = �111� and cli.Cod_cliente = Pfis.Cod...

Anonymous · Answer

trira as aspascli.Rota_Cliente = ��111�� ficacli.Rota_Cliente =111...

Jelves · Answer

[quote:beab11bf1c=�Anonymous�]trira as aspascli.Rota_Cliente = ��111�� ficacli.Rota_Cliente =111[/quote:beab11bf1c]ja tirei mais n�o d� certo e nem poderia pois meus campos � do tipo STRING, o problema n�o � as aspas...Obrigado......

Anonymous · Answer

Caro amigo JelvesDe um espa�o nesta instru��o...Dm.Qr_Cliente.SQL.add(�Select Cli.Cod_cliente, Pfis.* From TabCliente Cli, TabPes_Fisica Pfis�);paraDm.Qr_Cliente.SQL.add(�Select Cli.Cod_cliente, Pfis.* From TabCliente Cli, TabPes_Fisica Pfis �);Repare que o espa�a � no final...Espero ter ajudado. :)...

Jelves · Answer

[quote:13b1dc44fe=�efrare�]Caro amigo JelvesDe um espa�o nesta instru��o...Dm.Qr_Cliente.SQL.add(�Select Cli.Cod_cliente, Pfis.* From TabCliente Cli, TabPes_Fisica Pfis�);paraDm.Qr_Cliente.SQL.add(�Select Cli.Cod_cliente, Pfis.* From TabCliente Cli, TabPes_Fisica Pfis �);Repare que o espa�a � no final...Espero ter ajudado. :)[/quote:13b1dc44fe]Sinto muito, mais ainda n�o � isso... dei o espa�o e continua a me retornar a mensagem:�Qr_Cliente: Fild �Cod_Cliente� not Found�...

Anonymous · Answer

Atente para a possibilidade de voc� ter inclu�do apenas alguns fields no Fields Editor da Query, caso esteja faltando algum, remova todos e fa�a um teste.
Atente tamb�m para a possibilidade de retorno de campos com o mesmo nome.

Anonymous · Answer

Caro Alessandro,
H� mais de 4 anos tenho sistemas utilizando Delphi/Access, n�o acredito que sua sintaxe esteja errado, mas tente a forma que sempre deu certo comigo. Abra�os...

const ctApost = #39;
.
.
.
procedure AbreQuery;
var sComando : string;
begin
sComando :=
�Select Cli.*,Pfis.* � +
� From TabCliente Cli, TabPes_Fisica Pfis � +
� Where cli.Cod_Vendedor = � + ctApost + �00� + ctApost +
� and cli.Cod_Cidade = � + ctApost +� 00� + ctApost +
� and cli.Cod_Area = � + ctApost + �000� + ctApost +
� and cli.Rota_Cliente = � + ctApost + �111� + ctApost +
� and cli.Cod_cliente = Pfis.Cod_cliente�;

with Dm.Qr_Cliente do
begin
Close;
SQL.Clear;
SQL.add(sComando);
if not prepared then
prepare;
open;
end;
end;

Anonymous · Answer

Desculpe, a mensagem anterior que enviei era para o jelves e n�o para o Alessandro......

Anonymous · Answer

jelves, qual � vars�o do Delphi e qual � o mecanismo de acesso? BDE, ADO...?...

Aldeir_antonio · Answer

� O seguinte os fields n�o foram adicionados na query � por isso que n�o vai funcionar.

Para que isso funcione, vc tem que escrever o corpo do select na proprietade SQL da query, ativar para ver se a sintaxe esta ok e dar um duplo clik sobre a mesma e na janelinha que aparecer, clicar com o bot�o direito e a op��o add all, (adicionar todos os campos), ai sim ap�s vc executar o seu comando abaixo, funcionar� com certeza....

Boa sorte...

Anonymous · Answer

[color=red:0eb7f74edd]A inser��o dos fields na query n�o � obrigat�ria e nem essencial para o funcionamento da mesma[/color:0eb7f74edd]. Apenas ocorrer� um erro, caso existam fields adicionados a query e a instru�ao n�o traga algum field adicionado.

Anonymous · Answer

Provavelmente voc� n�o tem o campo cadastrado no fields editor do TQuery, portanto, basta clicar com o bot�o direito no componente e selecionar �Fields Editor� e escolha entre:

- apagar todos os campos que estiverem l� ou;
- incluir o campo pretendido �cli_codigo� ou coisa parecida.

Se der certo mande resposta, se n�o der, mande seu db para:

anapaula@mconline.com.br, e-mail da minha namorada.

Carnette · Answer

Use os Componente para acesso a base de dados do MAULUCO Kiril Antonov...O cara se didicou a estudar esta base de dados....Fa�a DOWNLOAD dele neste endere�o abaixo...

componentes de controle de acesso a base de dados ACCESS
www.carnette.kit.net/d5/kadao77.zip

Anonymous · Answer

[quote:de1146326a=�Denilson�]Caro Alessandro, H� mais de 4 anos tenho sistemas utilizando Delphi/Access, n�o acredito que sua sintaxe esteja errado, mas tente a forma que sempre deu certo comigo. Abra�os...const ctApost = #39;...procedure AbreQuery;var sComando : string;begin sComando :=      �Select Cli.*,Pfis.*                                 � +     � From TabCliente Cli, TabPes_Fisica Pfis � +     � Where cli.Cod_Vendedor = �   + ctApost + �00�   + ctApost +     � and cli.Cod_Cidade         = �   + ctApost +� 00�   + ctApost +      � and cli.Cod_Area            = �   + ctApost + �000�  + ctApost +     � and cli.Rota_Cliente        = �   + ctApost + �111�  + ctApost +     � and cli.Cod_cliente          = Pfis.Cod_cliente�; with Dm.Qr_Cliente do  begin    Close;     SQL.Clear;     SQL.add(sComando);     if not prepared then     prepare;   open;   end;end;[/quote:de1146326a]Denilson, voc� est� usando DBE ou ADO?Jelves...

Anonymous · Answer

*-------------------------*Primeiro recrie os fields de sua query, ou seja, clique duplo sobre a query, exclua os fields e crie-os novamente.*-------------------------*with Dm.Qr_Cliente do  begin    if Active then       Close;    SQL.Clear;    SQL.Add(�SELECT Cli.Cod_Cliente,�);    SQL.Add(�       Pfis.*�);    SQL.Add(�FROM TabCliente Cli,�);    SQL.Add(�     TabPes_Fisica Pfis�);    SQL.Add(�WHERE Cli.Cod_Cliente  = Pfis.Cod_Cliente�);    SQL.Add(�  AND Cli.Cod_Vendedor = � + QuotedStr(�00�));    SQL.Add(�  AND Cli.Cod_Cidade   = � + QuotedStr(�00�));    SQL.Add(�  AND Cli.Cod_Area     = � + QuotedStr(�000�));    SQL.Add(�  AND Cli.Rota_Cliente = � + QuotedStr(�111�));    Open;  end;*-------------------------*Para testar a query, coloque o seguinte comando antes do Open.SQL.SaveToFile(�C:MinhaQuery.txt�);execute o programa, leia o arquivo criado e execute-o no SQL Explorer....