[delphi-br] Ajuda com sql

2010-05-25 Por tôpico Allan GabrielAM
Prezados, tenho uma tabela que tem armazenado os seguintes dados:
coddescricaoorigemqtde
1111A   1
1111A   1
1111C   1   
2222A   1
2222A   1  
3333B   1 
No gerador de relatórios que uso (fortes report) ele aparece da forma citada 
acima, mas estou precisando fazer aparecer agrupado por cod,origem somando a 
quantidade ficaria assim:
1111A   2  aqui soma as duas 
quantidades da mesma origem (A) e mesmo produto (1)
1111C   1   
2222A   2 aqui soma as duas 
quantidades da mesma origem (A) e mesmo produto (2)
3333B   1 
No filtro antes de imprimir estou fazendo assim:
DatAM.ibqMov.close;
DatAM.IbqMov.sql.clear;
DataM.ibqmov.sql.add('select * from tmov order by codproduto,origem');
DataM.ibqmov.open;

Como faço pra sair como eu preciso?

Obrigado.
Rafael.

[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Ajuda com sql

2010-05-25 Por tôpico Zote
select codproduto,origem, count(*) from tmov group
by codproduto,origem order by codproduto,origem
--
José Henrique (Zote)
Analista de TI
Bludata Software


2010/5/25 Allan GabrielAM alla...@americamoveiseletro.com.br



 Prezados, tenho uma tabela que tem armazenado os seguintes dados:
 cod descricao origem qtde
 1 111 A 1
 1 111 A 1
 1 111 C 1
 2 222 A 1
 2 222 A 1
 3 333 B 1
 No gerador de relatórios que uso (fortes report) ele aparece da forma
 citada acima, mas estou precisando fazer aparecer agrupado por cod,origem
 somando a quantidade ficaria assim:
 1 111 A 2  aqui soma as duas quantidades da mesma origem (A) e
 mesmo produto (1)
 1 111 C 1
 2 222 A 2 aqui soma as duas quantidades da mesma origem (A) e mesmo
 produto (2)
 3 333 B 1
 No filtro antes de imprimir estou fazendo assim:
 DatAM.ibqMov.close;
 DatAM.IbqMov.sql.clear;
 DataM.ibqmov.sql.add('select * from tmov order by codproduto,origem');
 DataM.ibqmov.open;

 Como faço pra sair como eu preciso?

 Obrigado.
 Rafael.

 [As partes desta mensagem que não continham texto foram removidas]

  



[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Ajuda com sql

2010-05-25 Por tôpico Allan GabrielAM
Olá José, deu certo, obrigado mesmo.

Atenciosamente,
Rafael
- Original Message - 
  From: José Henrique (Zote) 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, May 25, 2010 8:44 PM
  Subject: Re: [delphi-br] Ajuda com sql



  select codproduto,origem, count(*) from tmov group
  by codproduto,origem order by codproduto,origem
  --
  José Henrique (Zote)
  Analista de TI
  Bludata Software

  2010/5/25 Allan GabrielAM alla...@americamoveiseletro.com.br

  
  
   Prezados, tenho uma tabela que tem armazenado os seguintes dados:
   cod descricao origem qtde
   1 111 A 1
   1 111 A 1
   1 111 C 1
   2 222 A 1
   2 222 A 1
   3 333 B 1
   No gerador de relatórios que uso (fortes report) ele aparece da forma
   citada acima, mas estou precisando fazer aparecer agrupado por cod,origem
   somando a quantidade ficaria assim:
   1 111 A 2  aqui soma as duas quantidades da mesma origem (A) e
   mesmo produto (1)
   1 111 C 1
   2 222 A 2 aqui soma as duas quantidades da mesma origem (A) e mesmo
   produto (2)
   3 333 B 1
   No filtro antes de imprimir estou fazendo assim:
   DatAM.ibqMov.close;
   DatAM.IbqMov.sql.clear;
   DataM.ibqmov.sql.add('select * from tmov order by codproduto,origem');
   DataM.ibqmov.open;
  
   Como faço pra sair como eu preciso?
  
   Obrigado.
   Rafael.
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   
  

  [As partes desta mensagem que não continham texto foram removidas]



  

[As partes desta mensagem que não continham texto foram removidas]



RES: [delphi-br] Ajuda com sql

2010-05-25 Por tôpico Filippe Maymone
Alan, 

 

Pelo que eu entendi é so somar as quantidade e dar um group by nos itens que
quer agrupar .. desta forma:

 

 

select codproduto,Descricao,origem, SUM(Quantidade)AS Quantidade from tmov

Group by codproduto,Descricao,origem

order by codproduto,origem

 

 http://www.gecon.inf.br/ Gecon Cons. e Desen. de Sistemas Ltda.
Filippe Maymone
fili...@gecon.inf.br

fone: 11-22423065 / 11-41192856

Cel: 11-81663158

 

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Allan GabrielAM
Enviada em: terça-feira, 25 de maio de 2010 05:02
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Ajuda com sql

 

  

Prezados, tenho uma tabela que tem armazenado os seguintes dados:
cod descricao origem qtde 
1 111 A 1
1 111 A 1
1 111 C 1 
2 222 A 1
2 222 A 1 
3 333 B 1 
No gerador de relatórios que uso (fortes report) ele aparece da forma citada
acima, mas estou precisando fazer aparecer agrupado por cod,origem somando a
quantidade ficaria assim:
1 111 A 2  aqui soma as duas quantidades da mesma origem (A) e mesmo
produto (1)
1 111 C 1 
2 222 A 2 aqui soma as duas quantidades da mesma origem (A) e mesmo
produto (2)
3 333 B 1 
No filtro antes de imprimir estou fazendo assim:
DatAM.ibqMov.close;
DatAM.IbqMov.sql.clear;
DataM.ibqmov.sql.add('select * from tmov order by codproduto,origem');
DataM.ibqmov.open;

Como faço pra sair como eu preciso?

Obrigado.
Rafael.

[As partes desta mensagem que não continham texto foram removidas]





[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Ajuda com sql

2010-05-25 Por tôpico Roni Rodrigo
SELECT CAMPO1, CAMPO2, CAMPO3, SUM(CAMPO4) AS SOMA FROM TMOV
GROUP BY CAMPO1, CAMPO2, CAMPO3
ORDER BY CODPRODUTO, ORIGEM

O SUM irá somar os valores do seu campo.
o GROUP BY irá agrupar pelos demais campos...
o/


Em 25/05/2010 05:02, Allan GabrielAM escreveu:
 Prezados, tenho uma tabela que tem armazenado os seguintes dados:
 cod descricao origem qtde
 1 111 A 1
 1 111 A 1
 1 111 C 1
 2 222 A 1
 2 222 A 1
 3 333 B 1
 No gerador de relatórios que uso (fortes report) ele aparece da forma 
 citada acima, mas estou precisando fazer aparecer agrupado por 
 cod,origem somando a quantidade ficaria assim:
 1 111 A 2  aqui soma as duas quantidades da mesma origem (A) e 
 mesmo produto (1)
 1 111 C 1
 2 222 A 2 aqui soma as duas quantidades da mesma origem (A) e 
 mesmo produto (2)
 3 333 B 1
 No filtro antes de imprimir estou fazendo assim:
 DatAM.ibqMov.close;
 DatAM.IbqMov.sql.clear;
 DataM.ibqmov.sql.add('select * from tmov order by codproduto,origem');
 DataM.ibqmov.open;

 Como faço pra sair como eu preciso?

 Obrigado.
 Rafael.



[delphi-br] Ajuda com SQL

2010-01-16 Por tôpico vinicius
Amigos, andei pesquisando nas mensagens antigas e na net e não encontrei
resposta que atenda o meu problema.

Tenho duas tabelas, uma com dados de um pedido e outra com o andamento.

para cara registro na tabela 1 tenho varios na tabela 2 com a data e o
tipo de movimento.

o que eu quero e pegar somente o último movimento que cada pedido em
aberto possui.

O meu banco é FB 2.1, D7.

Já Tentei diversas combinações, mais não esta dando certo.

select distinct A.CDPEDIDO,  max(B.DATAMOVIMENTO)
fROM bdpedidos A
JOIN BDANDAMENTO B on B.CDPEDIDO = A.cdpedido

Alguem pode me dar uma luz.

Agradeço antecipadamente.

Vinicius



Re: [delphi-br] Ajuda com SQL

2009-09-09 Por tôpico Fabiano Moura
Não entendi a necessidade de criar inclusive campo descrição do produto nas
duas tabelas, afinal você pode pegar os dados da tabela pai utilizando os
JOINS.
Recomendo dar uma pesquisada sobre normatização de banco de dados.
Sobre o seu problema, dá para resolver de diversas maneiras, uma maneira
mais usada é através de trigger e você pode encontrar várias informações no
site ou lista de discussão da firebase (www.firebase.com.br).

Obrigado,

Fabiano

2009/9/8 joao_jma joao_...@itelefonica.com.br

 mesmo erro

 Invalid token.
 Dynamic SQL Error.
 SQL error code = -104.
 Token unknown - line 3, char 1.
 FROM.

 cara, eu acabei resolvendo de outra maneira... agradeço!

 Criei uma consulta SQL agrupando os produtos do ITENSORC e trazendo a
 descrição do CADPRODUTOS:

  qDados.SQL.Add('select i.produto, c.descricao as DESCPRODUTO,
 c.fornecedor');
  qDados.SQL.Add(' from itensorc i');
  qDados.SQL.Add(' inner join cadprodutos c on (i.produto =
 c.codloja)');
  qDados.SQL.Add(' group by i.produto, c.descricao,
 c.fornecedor');
  qDados.SQL.Add(' order by i.produto');

 Resultado: Todos os itens da tabela ITENSORC agrupados e contendo a
 descrição atual do CADPRODUTOS.
 Depois criei uma rotina para gerar um SCRIPT de atualização:

 qDados.First;
 While Not qDados.Eof Do
 Begin
UPDATE ITENSORC SET
   DESCPRODUTO = qDadosDESCPRODUTO.Value
   FORNECEDOR  = qDadosFORNECEDOR.AsString
WHERE (PRODUTO = qDadosPRODUTO.Value)

qDados.Next;
 End;


  Vou rodar 1 vez por semana, demora uns 10 minutos, tudo depende da qtde de
 registros na tabela ITENSORC.

 Valew pela força!!!

João M. de Amorim - Informática:
Andreza Enxovais - Ibitinga/SP
((16) 3341-9000


   - Original Message -
  From: Guilherme Ventura de Souza
  To: delphi-br@yahoogrupos.com.br
   Sent: Tuesday, September 08, 2009 1:29 PM
  Subject: Re: [delphi-br] Ajuda com SQL



  UPDATE ITENSORC

  SET ITENSORC.DESCPRODUTO =CADPRODUTOS.DESCRICAO

  FROM CADPRODUTOS

  WHERE CADPRODUTOS.codloja =itensorc.produto

  GO

  Cara, tenta assim, sem os Alias que eu tinha colocado

  aqui no sqlserver com o Alias não funcionou, mas assim do jeito que to
 mandando agora funcionou

  UPDATE ITENSORC SET ITENSORC.DESCPRODUTO = CADPRODUTOS.DESCRICAO
  from itensorc INNER JOIN cadprodutos on
  (cadprodutos.codloja = itensorc.produto)

  - Original Message -
  From: joao_jma
  To: delphi-br@yahoogrupos.com.br
  Sent: Tuesday, September 08, 2009 9:30 AM
  Subject: Re: [delphi-br] Ajuda com SQL

  isso não deu certo... alguem pode me ajudar?

  João M. de Amorim - Informática:
  Andreza Enxovais - Ibitinga/SP
  ((16) 3341-9000
  È(16) 9239-0959

  - Original Message -
  From: Guilherme Ventura de Souza
  To: delphi-br@yahoogrupos.com.br
  Sent: Friday, August 21, 2009 3:42 PM
  Subject: Re: [delphi-br] Ajuda com SQL

  Tenta isso aqui amigo, tenho quase certeza que funciona ;)

  UPDATE ItensSorc Is
  SET Is.DescProd=Cp.Descricao
  FROM CadProdutos Cp
  WHERE Is.CodProd=Cp.CodProd

  - Original Message -
  From: joao_jma
  To: Undisclosed-Recipient:;
  Sent: Friday, August 21, 2009 2:45 PM
  Subject: [delphi-br] Ajuda com SQL

  Tenho 2 tabelas

  CADPRODUTOS
  codprod
  descricao
  fornecedor

  ITENSORC (Gravo a descrição e o fornecedor do produto nessa tabela tb)
  codprod
  descprod
  forprod

  PRECISO DE UM SQL, PRA FAZER DE FORMA RAPIDA A ATUALIZAÇÃO DOS DADOS NA
 TABELA ITENSORC

  Eu preciso atualizar as descrições e fornecedor da tabela itensorc, pois
 quando existe alteração nesses dados na tabela cadprodutos, a tabela
 itensorc fica desatualizada.

  []'s

  João

  [As partes desta mensagem que não continham texto foram removidas]

  [As partes desta mensagem que não continham texto foram removidas]

  [As partes desta mensagem que não continham texto foram removidas]

  [As partes desta mensagem que não continham texto foram removidas]





 [As partes desta mensagem que não continham texto foram removidas]



 

 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 






[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Ajuda com SQL

2009-09-09 Por tôpico Fabiano Moura
Expressão errada: Não é normatização é normalização.

Rsrsrsrs, na correria escrevi errado, rsrsrs

Fabiano

2009/9/8 Fabiano Moura mctbra...@gmail.com

 Não entendi a necessidade de criar inclusive campo descrição do produto nas
 duas tabelas, afinal você pode pegar os dados da tabela pai utilizando os
 JOINS.
 Recomendo dar uma pesquisada sobre normatização de banco de dados.
 Sobre o seu problema, dá para resolver de diversas maneiras, uma maneira
 mais usada é através de trigger e você pode encontrar várias informações no
 site ou lista de discussão da firebase (www.firebase.com.br).

 Obrigado,

 Fabiano

 2009/9/8 joao_jma joao_...@itelefonica.com.br

 mesmo erro


 Invalid token.
 Dynamic SQL Error.
 SQL error code = -104.
 Token unknown - line 3, char 1.
 FROM.

 cara, eu acabei resolvendo de outra maneira... agradeço!

 Criei uma consulta SQL agrupando os produtos do ITENSORC e trazendo a
 descrição do CADPRODUTOS:

  qDados.SQL.Add('select i.produto, c.descricao as DESCPRODUTO,
 c.fornecedor');
  qDados.SQL.Add(' from itensorc i');
  qDados.SQL.Add(' inner join cadprodutos c on (i.produto =
 c.codloja)');
  qDados.SQL.Add(' group by i.produto, c.descricao,
 c.fornecedor');
  qDados.SQL.Add(' order by i.produto');

 Resultado: Todos os itens da tabela ITENSORC agrupados e contendo a
 descrição atual do CADPRODUTOS.
 Depois criei uma rotina para gerar um SCRIPT de atualização:

 qDados.First;
 While Not qDados.Eof Do
 Begin
UPDATE ITENSORC SET
   DESCPRODUTO = qDadosDESCPRODUTO.Value
   FORNECEDOR  = qDadosFORNECEDOR.AsString
WHERE (PRODUTO = qDadosPRODUTO.Value)

qDados.Next;
 End;


  Vou rodar 1 vez por semana, demora uns 10 minutos, tudo depende da qtde
 de registros na tabela ITENSORC.

 Valew pela força!!!

João M. de Amorim - Informática:
Andreza Enxovais - Ibitinga/SP
((16) 3341-9000


   - Original Message -
  From: Guilherme Ventura de Souza
  To: delphi-br@yahoogrupos.com.br
   Sent: Tuesday, September 08, 2009 1:29 PM
  Subject: Re: [delphi-br] Ajuda com SQL



  UPDATE ITENSORC

  SET ITENSORC.DESCPRODUTO =CADPRODUTOS.DESCRICAO

  FROM CADPRODUTOS

  WHERE CADPRODUTOS.codloja =itensorc.produto

  GO

  Cara, tenta assim, sem os Alias que eu tinha colocado

  aqui no sqlserver com o Alias não funcionou, mas assim do jeito que to
 mandando agora funcionou

  UPDATE ITENSORC SET ITENSORC.DESCPRODUTO = CADPRODUTOS.DESCRICAO
  from itensorc INNER JOIN cadprodutos on
  (cadprodutos.codloja = itensorc.produto)

  - Original Message -
  From: joao_jma
  To: delphi-br@yahoogrupos.com.br
  Sent: Tuesday, September 08, 2009 9:30 AM
  Subject: Re: [delphi-br] Ajuda com SQL

  isso não deu certo... alguem pode me ajudar?

  João M. de Amorim - Informática:
  Andreza Enxovais - Ibitinga/SP
  ((16) 3341-9000
  È(16) 9239-0959

  - Original Message -
  From: Guilherme Ventura de Souza
  To: delphi-br@yahoogrupos.com.br
  Sent: Friday, August 21, 2009 3:42 PM
  Subject: Re: [delphi-br] Ajuda com SQL

  Tenta isso aqui amigo, tenho quase certeza que funciona ;)

  UPDATE ItensSorc Is
  SET Is.DescProd=Cp.Descricao
  FROM CadProdutos Cp
  WHERE Is.CodProd=Cp.CodProd

  - Original Message -
  From: joao_jma
  To: Undisclosed-Recipient:;
  Sent: Friday, August 21, 2009 2:45 PM
  Subject: [delphi-br] Ajuda com SQL

  Tenho 2 tabelas

  CADPRODUTOS
  codprod
  descricao
  fornecedor

  ITENSORC (Gravo a descrição e o fornecedor do produto nessa tabela tb)
  codprod
  descprod
  forprod

  PRECISO DE UM SQL, PRA FAZER DE FORMA RAPIDA A ATUALIZAÇÃO DOS DADOS NA
 TABELA ITENSORC

  Eu preciso atualizar as descrições e fornecedor da tabela itensorc, pois
 quando existe alteração nesses dados na tabela cadprodutos, a tabela
 itensorc fica desatualizada.

  []'s

  João

  [As partes desta mensagem que não continham texto foram removidas]

  [As partes desta mensagem que não continham texto foram removidas]

  [As partes desta mensagem que não continham texto foram removidas]

  [As partes desta mensagem que não continham texto foram removidas]





 [As partes desta mensagem que não continham texto foram removidas]



 

 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 







[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Ajuda com SQL

2009-09-09 Por tôpico joao_jma
Ae Fabiano, muito obrigado pela informação...

Pode crer que conheço o uso de JOIN's ...

Estou utilizando DESCRICAO na tabela por extrema necessidade...

já resolvi meu problema como descrevi no outro email abaixo!

EXCEÇÕES da empresa me levaram a isso...

GRATO!


João M. de Amorim - Informática: 
Andreza Enxovais - Ibitinga/SP
((16) 3341-9000
 

  - Original Message - 
  From: Fabiano Moura 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, September 08, 2009 7:31 PM
  Subject: Re: [delphi-br] Ajuda com SQL


Expressão errada: Não é normatização é normalização.

  Rsrsrsrs, na correria escrevi errado, rsrsrs

  Fabiano

  2009/9/8 Fabiano Moura mctbra...@gmail.com

   Não entendi a necessidade de criar inclusive campo descrição do produto nas
   duas tabelas, afinal você pode pegar os dados da tabela pai utilizando os
   JOINS.
   Recomendo dar uma pesquisada sobre normatização de banco de dados.
   Sobre o seu problema, dá para resolver de diversas maneiras, uma maneira
   mais usada é através de trigger e você pode encontrar várias informações no
   site ou lista de discussão da firebase (www.firebase.com.br).
  
   Obrigado,
  
   Fabiano
  
   2009/9/8 joao_jma joao_...@itelefonica.com.br
  
   mesmo erro
  
  
   Invalid token.
   Dynamic SQL Error.
   SQL error code = -104.
   Token unknown - line 3, char 1.
   FROM.
  
   cara, eu acabei resolvendo de outra maneira... agradeço!
  
   Criei uma consulta SQL agrupando os produtos do ITENSORC e trazendo a
   descrição do CADPRODUTOS:
  
   qDados.SQL.Add('select i.produto, c.descricao as DESCPRODUTO,
   c.fornecedor');
   qDados.SQL.Add(' from itensorc i');
   qDados.SQL.Add(' inner join cadprodutos c on (i.produto =
   c.codloja)');
   qDados.SQL.Add(' group by i.produto, c.descricao,
   c.fornecedor');
   qDados.SQL.Add(' order by i.produto');
  
   Resultado: Todos os itens da tabela ITENSORC agrupados e contendo a
   descrição atual do CADPRODUTOS.
   Depois criei uma rotina para gerar um SCRIPT de atualização:
  
   qDados.First;
   While Not qDados.Eof Do
   Begin
   UPDATE ITENSORC SET
   DESCPRODUTO = qDadosDESCPRODUTO.Value
   FORNECEDOR = qDadosFORNECEDOR.AsString
   WHERE (PRODUTO = qDadosPRODUTO.Value)
  
   qDados.Next;
   End;
  
  
   Vou rodar 1 vez por semana, demora uns 10 minutos, tudo depende da qtde
   de registros na tabela ITENSORC.
  
   Valew pela força!!!
  
   João M. de Amorim - Informática:
   Andreza Enxovais - Ibitinga/SP
   ((16) 3341-9000
  
  
   - Original Message -
   From: Guilherme Ventura de Souza
   To: delphi-br@yahoogrupos.com.br
   Sent: Tuesday, September 08, 2009 1:29 PM
   Subject: Re: [delphi-br] Ajuda com SQL
  
  
  
   UPDATE ITENSORC
  
   SET ITENSORC.DESCPRODUTO =CADPRODUTOS.DESCRICAO
  
   FROM CADPRODUTOS
  
   WHERE CADPRODUTOS.codloja =itensorc.produto
  
   GO
  
   Cara, tenta assim, sem os Alias que eu tinha colocado
  
   aqui no sqlserver com o Alias não funcionou, mas assim do jeito que to
   mandando agora funcionou
  
   UPDATE ITENSORC SET ITENSORC.DESCPRODUTO = CADPRODUTOS.DESCRICAO
   from itensorc INNER JOIN cadprodutos on
   (cadprodutos.codloja = itensorc.produto)
  
   - Original Message -
   From: joao_jma
   To: delphi-br@yahoogrupos.com.br
   Sent: Tuesday, September 08, 2009 9:30 AM
   Subject: Re: [delphi-br] Ajuda com SQL
  
   isso não deu certo... alguem pode me ajudar?
  
   João M. de Amorim - Informática:
   Andreza Enxovais - Ibitinga/SP
   ((16) 3341-9000
   È(16) 9239-0959
  
   - Original Message -
   From: Guilherme Ventura de Souza
   To: delphi-br@yahoogrupos.com.br
   Sent: Friday, August 21, 2009 3:42 PM
   Subject: Re: [delphi-br] Ajuda com SQL
  
   Tenta isso aqui amigo, tenho quase certeza que funciona ;)
  
   UPDATE ItensSorc Is
   SET Is.DescProd=Cp.Descricao
   FROM CadProdutos Cp
   WHERE Is.CodProd=Cp.CodProd
  
   - Original Message -
   From: joao_jma
   To: Undisclosed-Recipient:;
   Sent: Friday, August 21, 2009 2:45 PM
   Subject: [delphi-br] Ajuda com SQL
  
   Tenho 2 tabelas
  
   CADPRODUTOS
   codprod
   descricao
   fornecedor
  
   ITENSORC (Gravo a descrição e o fornecedor do produto nessa tabela tb)
   codprod
   descprod
   forprod
  
   PRECISO DE UM SQL, PRA FAZER DE FORMA RAPIDA A ATUALIZAÇÃO DOS DADOS NA
   TABELA ITENSORC
  
   Eu preciso atualizar as descrições e fornecedor da tabela itensorc, pois
   quando existe alteração nesses dados na tabela cadprodutos, a tabela
   itensorc fica desatualizada.
  
   []'s
  
   João
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   [As partes desta mensagem que não continham texto foram removidas]
  
  
  
  
  
   [As partes desta mensagem que não continham texto foram removidas]
  
  
  
   
  
   --
FAVOR

Re: [delphi-br] Ajuda com SQL

2009-09-08 Por tôpico joao_jma
isso não deu certo... alguem pode me ajudar?



João M. de Amorim - Informática: 
Andreza Enxovais - Ibitinga/SP
((16) 3341-9000
È(16) 9239-0959
 

  - Original Message - 
  From: Guilherme Ventura de Souza 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, August 21, 2009 3:42 PM
  Subject: Re: [delphi-br] Ajuda com SQL


Tenta isso aqui amigo, tenho quase certeza que funciona ;)

  UPDATE ItensSorc Is
  SET Is.DescProd=Cp.Descricao
  FROM CadProdutos Cp
  WHERE Is.CodProd=Cp.CodProd

  - Original Message - 
  From: joao_jma 
  To: Undisclosed-Recipient:; 
  Sent: Friday, August 21, 2009 2:45 PM
  Subject: [delphi-br] Ajuda com SQL

  Tenho 2 tabelas

  CADPRODUTOS 
  codprod
  descricao
  fornecedor

  ITENSORC (Gravo a descrição e o fornecedor do produto nessa tabela tb)
  codprod
  descprod
  forprod

  PRECISO DE UM SQL, PRA FAZER DE FORMA RAPIDA A ATUALIZAÇÃO DOS DADOS NA 
TABELA ITENSORC

  Eu preciso atualizar as descrições e fornecedor da tabela itensorc, pois 
quando existe alteração nesses dados na tabela cadprodutos, a tabela itensorc 
fica desatualizada.

  []'s

  João 

  [As partes desta mensagem que não continham texto foram removidas]

  [As partes desta mensagem que não continham texto foram removidas]



  

[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Ajuda com SQL

2009-09-08 Por tôpico Marcio Barbosa
João, porque vc tem que gravar a descricao dos itens na tabela ITENSORC?




2009/9/8 joao_jma joao_...@itelefonica.com.br



 isso não deu certo... alguem pode me ajudar?


 João M. de Amorim - Informática:
 Andreza Enxovais - Ibitinga/SP
 ((16) 3341-9000
 È(16) 9239-0959


 - Original Message -
 From: Guilherme Ventura de Souza
 To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Sent: Friday, August 21, 2009 3:42 PM
 Subject: Re: [delphi-br] Ajuda com SQL

 Tenta isso aqui amigo, tenho quase certeza que funciona ;)

 UPDATE ItensSorc Is
 SET Is.DescProd=Cp.Descricao
 FROM CadProdutos Cp
 WHERE Is.CodProd=Cp.CodProd

 - Original Message -
 From: joao_jma
 To: Undisclosed-Recipient:;
 Sent: Friday, August 21, 2009 2:45 PM
 Subject: [delphi-br] Ajuda com SQL

 Tenho 2 tabelas

 CADPRODUTOS
 codprod
 descricao
 fornecedor

 ITENSORC (Gravo a descrição e o fornecedor do produto nessa tabela tb)
 codprod
 descprod
 forprod

 PRECISO DE UM SQL, PRA FAZER DE FORMA RAPIDA A ATUALIZAÇÃO DOS DADOS NA
 TABELA ITENSORC

 Eu preciso atualizar as descrições e fornecedor da tabela itensorc, pois
 quando existe alteração nesses dados na tabela cadprodutos, a tabela
 itensorc fica desatualizada.

 []'s

 João

 [As partes desta mensagem que não continham texto foram removidas]

 [As partes desta mensagem que não continham texto foram removidas]

 [As partes desta mensagem que não continham texto foram removidas]

  



[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Ajuda com SQL

2009-09-08 Por tôpico Guilherme Ventura de Souza

UPDATE ITENSORC

SET ITENSORC.DESCPRODUTO =CADPRODUTOS.DESCRICAO

FROM CADPRODUTOS

WHERE CADPRODUTOS.codloja =itensorc.produto

GO



Cara, tenta assim, sem os Alias que eu tinha colocado

aqui no sqlserver com o Alias não funcionou, mas assim do jeito que to mandando 
agora funcionou


UPDATE ITENSORC SET ITENSORC.DESCPRODUTO = CADPRODUTOS.DESCRICAO
from itensorc INNER  JOIN cadprodutos on
 (cadprodutos.codloja = itensorc.produto)

  - Original Message - 
  From: joao_jma 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, September 08, 2009 9:30 AM
  Subject: Re: [delphi-br] Ajuda com SQL


isso não deu certo... alguem pode me ajudar?

  João M. de Amorim - Informática: 
  Andreza Enxovais - Ibitinga/SP
  ((16) 3341-9000
  È(16) 9239-0959


  - Original Message - 
  From: Guilherme Ventura de Souza 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, August 21, 2009 3:42 PM
  Subject: Re: [delphi-br] Ajuda com SQL

  Tenta isso aqui amigo, tenho quase certeza que funciona ;)

  UPDATE ItensSorc Is
  SET Is.DescProd=Cp.Descricao
  FROM CadProdutos Cp
  WHERE Is.CodProd=Cp.CodProd

  - Original Message - 
  From: joao_jma 
  To: Undisclosed-Recipient:; 
  Sent: Friday, August 21, 2009 2:45 PM
  Subject: [delphi-br] Ajuda com SQL

  Tenho 2 tabelas

  CADPRODUTOS 
  codprod
  descricao
  fornecedor

  ITENSORC (Gravo a descrição e o fornecedor do produto nessa tabela tb)
  codprod
  descprod
  forprod

  PRECISO DE UM SQL, PRA FAZER DE FORMA RAPIDA A ATUALIZAÇÃO DOS DADOS NA 
TABELA ITENSORC

  Eu preciso atualizar as descrições e fornecedor da tabela itensorc, pois 
quando existe alteração nesses dados na tabela cadprodutos, a tabela itensorc 
fica desatualizada.

  []'s

  João 

  [As partes desta mensagem que não continham texto foram removidas]

  [As partes desta mensagem que não continham texto foram removidas]

  [As partes desta mensagem que não continham texto foram removidas]



  

[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Ajuda com SQL

2009-09-08 Por tôpico joao_jma
mesmo erro

Invalid token.
Dynamic SQL Error.
SQL error code = -104.
Token unknown - line 3, char 1.
FROM.

cara, eu acabei resolvendo de outra maneira... agradeço!

Criei uma consulta SQL agrupando os produtos do ITENSORC e trazendo a descrição 
do CADPRODUTOS:

  qDados.SQL.Add('select i.produto, c.descricao as DESCPRODUTO, 
c.fornecedor');
  qDados.SQL.Add(' from itensorc i');
  qDados.SQL.Add(' inner join cadprodutos c on (i.produto = 
c.codloja)');
  qDados.SQL.Add(' group by i.produto, c.descricao, c.fornecedor');
  qDados.SQL.Add(' order by i.produto');

Resultado: Todos os itens da tabela ITENSORC agrupados e contendo a descrição 
atual do CADPRODUTOS.
Depois criei uma rotina para gerar um SCRIPT de atualização:

 qDados.First;
 While Not qDados.Eof Do
 Begin
UPDATE ITENSORC SET
   DESCPRODUTO = qDadosDESCPRODUTO.Value
   FORNECEDOR  = qDadosFORNECEDOR.AsString
WHERE (PRODUTO = qDadosPRODUTO.Value)

qDados.Next;
 End;


 Vou rodar 1 vez por semana, demora uns 10 minutos, tudo depende da qtde de 
registros na tabela ITENSORC.

Valew pela força!!!

João M. de Amorim - Informática: 
Andreza Enxovais - Ibitinga/SP
((16) 3341-9000
 

  - Original Message - 
  From: Guilherme Ventura de Souza 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, September 08, 2009 1:29 PM
  Subject: Re: [delphi-br] Ajuda com SQL



  UPDATE ITENSORC

  SET ITENSORC.DESCPRODUTO =CADPRODUTOS.DESCRICAO

  FROM CADPRODUTOS

  WHERE CADPRODUTOS.codloja =itensorc.produto

  GO

  Cara, tenta assim, sem os Alias que eu tinha colocado

  aqui no sqlserver com o Alias não funcionou, mas assim do jeito que to 
mandando agora funcionou

  UPDATE ITENSORC SET ITENSORC.DESCPRODUTO = CADPRODUTOS.DESCRICAO
  from itensorc INNER JOIN cadprodutos on
  (cadprodutos.codloja = itensorc.produto)

  - Original Message - 
  From: joao_jma 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, September 08, 2009 9:30 AM
  Subject: Re: [delphi-br] Ajuda com SQL

  isso não deu certo... alguem pode me ajudar?

  João M. de Amorim - Informática: 
  Andreza Enxovais - Ibitinga/SP
  ((16) 3341-9000
  È(16) 9239-0959

  - Original Message - 
  From: Guilherme Ventura de Souza 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, August 21, 2009 3:42 PM
  Subject: Re: [delphi-br] Ajuda com SQL

  Tenta isso aqui amigo, tenho quase certeza que funciona ;)

  UPDATE ItensSorc Is
  SET Is.DescProd=Cp.Descricao
  FROM CadProdutos Cp
  WHERE Is.CodProd=Cp.CodProd

  - Original Message - 
  From: joao_jma 
  To: Undisclosed-Recipient:; 
  Sent: Friday, August 21, 2009 2:45 PM
  Subject: [delphi-br] Ajuda com SQL

  Tenho 2 tabelas

  CADPRODUTOS 
  codprod
  descricao
  fornecedor

  ITENSORC (Gravo a descrição e o fornecedor do produto nessa tabela tb)
  codprod
  descprod
  forprod

  PRECISO DE UM SQL, PRA FAZER DE FORMA RAPIDA A ATUALIZAÇÃO DOS DADOS NA 
TABELA ITENSORC

  Eu preciso atualizar as descrições e fornecedor da tabela itensorc, pois 
quando existe alteração nesses dados na tabela cadprodutos, a tabela itensorc 
fica desatualizada.

  []'s

  João 

  [As partes desta mensagem que não continham texto foram removidas]

  [As partes desta mensagem que não continham texto foram removidas]

  [As partes desta mensagem que não continham texto foram removidas]

  [As partes desta mensagem que não continham texto foram removidas]



  

[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Ajuda com SQL

2009-08-21 Por tôpico joao_jma
Tenho 2 tabelas

CADPRODUTOS 
codprod
descricao
fornecedor

ITENSORC (Gravo a descrição e o fornecedor do produto nessa tabela tb)
codprod
descprod
forprod

PRECISO DE UM SQL, PRA FAZER DE FORMA RAPIDA A ATUALIZAÇÃO DOS DADOS NA TABELA 
ITENSORC

Eu preciso atualizar as descrições e fornecedor da tabela itensorc, pois quando 
existe alteração nesses dados na tabela cadprodutos, a tabela itensorc fica 
desatualizada.

[]'s

João 


[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Ajuda com SQL

2009-08-21 Por tôpico Leandro
update cadprodutos c, itensorc i set c.fornecedor = 'dfdk', i.forprod =
'dfdk' where c.codprod = '1' and i.codprod = '1'

2009/8/21 joao_jma joao_...@itelefonica.com.br



 Tenho 2 tabelas

 CADPRODUTOS
 codprod
 descricao
 fornecedor

 ITENSORC (Gravo a descrição e o fornecedor do produto nessa tabela tb)
 codprod
 descprod
 forprod

 PRECISO DE UM SQL, PRA FAZER DE FORMA RAPIDA A ATUALIZAÇÃO DOS DADOS NA
 TABELA ITENSORC

 Eu preciso atualizar as descrições e fornecedor da tabela itensorc, pois
 quando existe alteração nesses dados na tabela cadprodutos, a tabela
 itensorc fica desatualizada.

 []'s

 João

 [As partes desta mensagem que não continham texto foram removidas]

  




-- 
Leandro, MuTukA


[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Ajuda com SQL

2009-08-21 Por tôpico joao_jma
vc não entendeu a necessidade

preciso atualizar na tabela itensorc os dados de descricao e fornecedor que 
estão no cadprodutos

João M. de Amorim - Informática: 
Andreza Enxovais - Ibitinga/SP
((16) 3341-9000
È(16) 9239-0959
 

  - Original Message - 
  From: Leandro 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, August 21, 2009 3:49 PM
  Subject: Re: [delphi-br] Ajuda com SQL


update cadprodutos c, itensorc i set c.fornecedor = 'dfdk', i.forprod =
  'dfdk' where c.codprod = '1' and i.codprod = '1'

  2009/8/21 joao_jma joao_...@itelefonica.com.br

  
  
   Tenho 2 tabelas
  
   CADPRODUTOS
   codprod
   descricao
   fornecedor
  
   ITENSORC (Gravo a descrição e o fornecedor do produto nessa tabela tb)
   codprod
   descprod
   forprod
  
   PRECISO DE UM SQL, PRA FAZER DE FORMA RAPIDA A ATUALIZAÇÃO DOS DADOS NA
   TABELA ITENSORC
  
   Eu preciso atualizar as descrições e fornecedor da tabela itensorc, pois
   quando existe alteração nesses dados na tabela cadprodutos, a tabela
   itensorc fica desatualizada.
  
   []'s
  
   João
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   
  

  -- 
  Leandro, MuTukA

  [As partes desta mensagem que não continham texto foram removidas]



  

[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Ajuda com SQL

2009-08-21 Por tôpico Guilherme Ventura de Souza
Tenta isso aqui amigo, tenho quase certeza que funciona ;)

UPDATE ItensSorc Is
SET Is.DescProd=Cp.Descricao
FROM CadProdutos Cp
WHERE Is.CodProd=Cp.CodProd

  - Original Message - 
  From: joao_jma 
  To: Undisclosed-Recipient:; 
  Sent: Friday, August 21, 2009 2:45 PM
  Subject: [delphi-br] Ajuda com SQL


Tenho 2 tabelas

  CADPRODUTOS 
  codprod
  descricao
  fornecedor

  ITENSORC (Gravo a descrição e o fornecedor do produto nessa tabela tb)
  codprod
  descprod
  forprod

  PRECISO DE UM SQL, PRA FAZER DE FORMA RAPIDA A ATUALIZAÇÃO DOS DADOS NA 
TABELA ITENSORC

  Eu preciso atualizar as descrições e fornecedor da tabela itensorc, pois 
quando existe alteração nesses dados na tabela cadprodutos, a tabela itensorc 
fica desatualizada.

  []'s

  João 

  [As partes desta mensagem que não continham texto foram removidas]



  

[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Ajuda com SQL

2009-08-21 Por tôpico Daniel Hiromy
Ops! Fiz confusão e achei q estava respondendo pra lista de Firebird.
Qual BD vc está usando?

2009/8/21 Daniel Hiromy hirom...@gmail.com

 Faça uma trigger.

 set term ^ ;

 create or alter trigger AU_CADPRODUTOS for CADPRODUTOS
 active after update position 0
 as
 begin
   update ITENSORC set descprod = new.descricao, fornprod = new.fornecedor
   where codprod = new.codprod;
 end ^

 set term ; ^

 2009/8/21 joao_jma joao_...@itelefonica.com.br



 Tenho 2 tabelas


 CADPRODUTOS
 codprod
 descricao
 fornecedor

 ITENSORC (Gravo a descrição e o fornecedor do produto nessa tabela tb)
 codprod
 descprod
 forprod

 PRECISO DE UM SQL, PRA FAZER DE FORMA RAPIDA A ATUALIZAÇÃO DOS DADOS NA
 TABELA ITENSORC

 Eu preciso atualizar as descrições e fornecedor da tabela itensorc, pois
 quando existe alteração nesses dados na tabela cadprodutos, a tabela
 itensorc fica desatualizada.

 []'s

 João

 [As partes desta mensagem que não continham texto foram removidas]

  





[As partes desta mensagem que não continham texto foram removidas]



RES: [delphi-br] Ajuda com SQL

2009-08-21 Por tôpico Cleiton - Yahoo
João, seguinte voce pode fazer assim:

 

Na tabela ITENSORC

 

Select  ITENSORC.cadprod, ITENSORC.forprod, CADPRODUTOS.DESCRICAO from
ITENSORC

Left join CADPRODUTOS on (CADPRODUTOS.codprod = ITENSORC.codprod)

 

Assim quando você modificar a descrição do produto na tabela CADPRODUTOS
automaticamente

o select ira pegar essa descrição.

 

OK?

 

Abraço..

 

 

 

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de joao_jma
Enviada em: sexta-feira, 21 de agosto de 2009 14:45
Para: Undisclosed-Recipient:;
Assunto: [delphi-br] Ajuda com SQL

 

  

Tenho 2 tabelas

CADPRODUTOS 
codprod
descricao
fornecedor

ITENSORC (Gravo a descrição e o fornecedor do produto nessa tabela tb)
codprod
descprod
forprod

PRECISO DE UM SQL, PRA FAZER DE FORMA RAPIDA A ATUALIZAÇÃO DOS DADOS NA
TABELA ITENSORC

Eu preciso atualizar as descrições e fornecedor da tabela itensorc, pois
quando existe alteração nesses dados na tabela cadprodutos, a tabela
itensorc fica desatualizada.

[]'s

João 

[As partes desta mensagem que não continham texto foram removidas]





[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Ajuda com SQL

2009-08-21 Por tôpico Daniel Hiromy
Faça uma trigger.

set term ^ ;

create or alter trigger AU_CADPRODUTOS for CADPRODUTOS
active after update position 0
as
begin
  update ITENSORC set descprod = new.descricao, fornprod = new.fornecedor
  where codprod = new.codprod;
end ^

set term ; ^

2009/8/21 joao_jma joao_...@itelefonica.com.br



 Tenho 2 tabelas

 CADPRODUTOS
 codprod
 descricao
 fornecedor

 ITENSORC (Gravo a descrição e o fornecedor do produto nessa tabela tb)
 codprod
 descprod
 forprod

 PRECISO DE UM SQL, PRA FAZER DE FORMA RAPIDA A ATUALIZAÇÃO DOS DADOS NA
 TABELA ITENSORC

 Eu preciso atualizar as descrições e fornecedor da tabela itensorc, pois
 quando existe alteração nesses dados na tabela cadprodutos, a tabela
 itensorc fica desatualizada.

 []'s

 João

 [As partes desta mensagem que não continham texto foram removidas]

  



[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Ajuda com SQL

2009-08-21 Por tôpico Leandro
amigo aquele codigo q postei vc usa na hora q for atualizar a tabela
cadprodutos
assim qndo a atualizar ja ira atualizar a itensorc junto em um sql soh..

entendeu..

2009/8/21 Daniel Hiromy hirom...@gmail.com



 Ops! Fiz confusão e achei q estava respondendo pra lista de Firebird.
 Qual BD vc está usando?

 2009/8/21 Daniel Hiromy hirom...@gmail.com hiromyjp%40gmail.com


  Faça uma trigger.
 
  set term ^ ;
 
  create or alter trigger AU_CADPRODUTOS for CADPRODUTOS
  active after update position 0
  as
  begin
  update ITENSORC set descprod = new.descricao, fornprod = new.fornecedor
  where codprod = new.codprod;
  end ^
 
  set term ; ^
 
  2009/8/21 joao_jma 
  joao_...@itelefonica.com.brjoao_jma%40itelefonica.com.br
 
 
 
 
  Tenho 2 tabelas
 
 
  CADPRODUTOS
  codprod
  descricao
  fornecedor
 
  ITENSORC (Gravo a descrição e o fornecedor do produto nessa tabela tb)
  codprod
  descprod
  forprod
 
  PRECISO DE UM SQL, PRA FAZER DE FORMA RAPIDA A ATUALIZAÇÃO DOS DADOS NA
  TABELA ITENSORC
 
  Eu preciso atualizar as descrições e fornecedor da tabela itensorc, pois
  quando existe alteração nesses dados na tabela cadprodutos, a tabela
  itensorc fica desatualizada.
 
  []'s
 
  João
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 
 
 
 

 [As partes desta mensagem que não continham texto foram removidas]

  




-- 
Leandro, MuTukA


[As partes desta mensagem que não continham texto foram removidas]



RES: [delphi-br] Ajuda com SQL

2009-08-21 Por tôpico Cleiton - Yahoo
Então João, 

 

você não ta usando tabela MESTRE/DETALHE?

Esse comando é utilizado para o que você ta querendo.

 

Select ITENSORC.cadprod, ITENSORC.forprod, CADPRODUTOS.DESCRICAO from
ITENSORC

Left join CADPRODUTOS on (CADPRODUTOS.codprod = ITENSORC.codprod)

 

Mas se você não quer dessa forma usa o exemplo do colega Daniel Hiromy

abaixo, caso você esteja usando FIREBIRD, ou MySQL.

 

Faça uma trigger.

set term ^ ;

create or alter trigger AU_CADPRODUTOS for CADPRODUTOS
active after update position 0
as
begin
update ITENSORC set descprod = new.descricao, fornprod = new.fornecedor
where codprod = new.codprod;
end ^

set term ; ^

2009/8/21 joao_jma joao_...@itelefonica.com.br
mailto:joao_jma%40itelefonica.com.br 



 Tenho 2 tabelas

 CADPRODUTOS
 codprod
 descricao
 fornecedor

 ITENSORC (Gravo a descrição e o fornecedor do produto nessa tabela tb)
 codprod
 descprod
 forprod

 PRECISO DE UM SQL, PRA FAZER DE FORMA RAPIDA A ATUALIZAÇÃO DOS DADOS NA
 TABELA ITENSORC

 Eu preciso atualizar as descrições e fornecedor da tabela itensorc, pois
 quando existe alteração nesses dados na tabela cadprodutos, a tabela
 itensorc fica desatualizada.

 []'s

 João

 [As partes desta mensagem que não continham texto foram removidas]

 


[As partes desta mensagem que não continham texto foram removidas]





[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Ajuda com SQL

2009-03-27 Por tôpico Alisson
Eu já tive um problema parecido no Firebird. Quando o campo estava nulo não 
adiantava tentar somar o valor do campo. Eu tive que usar a função coalesce. 
Se o campo estiver com valor nulo, tente colocar valor 0,00 no campo pra ver 
se aparece alguma coisa. Se aparecer é o mesmo problema que eu tive. 

__
Faça ligações para outros computadores com o novo Yahoo! Messenger 
http://br.beta.messenger.yahoo.com/ 


[delphi-br] Ajuda com SQL

2009-02-03 Por tôpico Vinicius da Silva Pinto
Obrigado, tive que alterar alguns detalhes, não tem virgula antes de JOIN e
mudar o nome de alguns campos, mais funcionou 100%, valeu mesmo..
veja como ficou:

SELECT B.CDPRODUTO, C.DESCRICAO, COUNT(B.CDPRODUTO) AS QUANT, SUM(B.VALOR)
AS TOTAL
FROM BDPEDIDOS A JOIN BDSERVICOS B ON B.CDPEDIDO = A.CDPEDIDO
 JOIN TBPRODUTOS C ON C.CDPRODUTO = B.CDPRODUTO
WHERE EXTRACT(MONTH FROM A.DATAEVENTO) = 07
GROUP BY B.CDPRODUTO, C.DESCRICAO

Um forte abraço a todos da lista

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br]em
nome de omar l m rosa
Enviada em: terça-feira, 3 de fevereiro de 2009 08:15
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Transferir toda configuração do Delphi 6 e 7
para outra maquina/windows...


acho que deveria ser assim:


SELECT B.CDITEM, C.DESCRICAO, SUM(B.VALOR) AS TOTAL

FROM PEDIDOS A,
JOIN SERVICOS B
 ON B.CDPEDIDO = A.CDPEDIDO

JOIN TABSERVICO C
ON C.CDITEM = B.CDITEM


WHERE EXTRACT(MONTH FROM DATAPEDITO) = :MES

GROUP BY B.CDITEM, C.DESCRICAO






º.·´¯`·. º.·´¯`·. º.·´¯`·.
 Omar L. M. Rosa
º.·´¯`·. º.·´¯`·. º.·´¯`·.
   o...@conesul.inf.br



  - Original Message -
  From: Vinicius da Silva Pinto
  To: delphi-br@yahoogrupos.com.br
  Sent: Monday, February 02, 2009 8:31 PM
  Subject: RES: [delphi-br] Transferir toda configuração do Delphi 6 e 7
para outra maquina/windows...


  Boa tarde a todos, gostaria de uma ajuDa com uma query entre tres tabelas
e
  estou tendo alguns problemas, na verdade, estou meio enrolado...

  Tabela1
  CDPEDIDO DATAPEDIDO (outros campos)
  1 25/01/2009
  2 25/01/2009
  

  Tabela2
  CDPEDIDO CDITEM (outros campos)
  1 1
  1 5
  1 6
  2 1
  2 5
  

  Tabela3
  CDITEM DESCRICAO
  1 MESA
  2 CADEIRA
  3 LUMINARIA
  4 TELEFONE
  5 ESTOJO
  6 QQ

  Gostaria de um resultado que me desse o total de Itens vendidos em um
  7725determinado mes

  CDITEM DESCRICAO TOTAL
  1 MESA 2
  5 ESTOJO 2
  6 QQ 1

  O select que estou usando esta assim:

  SELECT B.CDITEM, C.DESCRICAO, B.VALOR AS TOTAL
  FROM PEDIDOS A,

  (SELECT CDITEM, SUM(VALOR) FROM SERVICOS GROUP BY CDITEM) B,


  TABSERVICO C,


  WHERE EXTRACT(MONTH FROM DATAPEDITO) = :MES AND B.CDPEDIDO = A.CDPEDIDO
AND
  C.CDITEM = B.CDITEM
  GROUP BY CDITEM DESCRICAO

  Já tentei assim, mais tbm não dá certo:

  Uso Delphi7 e InterBase.

  Agradeço antecipadamente qq ajuda.

  Vinicius








[delphi-br] Ajuda com SQL

2008-09-16 Por tôpico Adilson Nunes Fernandes
Pessoal


Preciso fazer um SELECT que me retorne algumas novas colunas 
em branco. Conforme abaixo:

Select Documento, NovaColuna em Branco, DtEmissao, NovaColuna em Branco, Valor, 
Total from TabelaN where ...


Com os dados que o select retornar eu preencherei posteriormente as colunas 
vazias via programação.

Vi alguns exemplos neste link, mas preciso para o Firebird.  

http://weblogs.foxite.com/andykramek/archive/2005/09/18/921.aspx

SELECT SPACE(30) AS newcol FROM nametable
SELECT *, SPACE(30) AS newstring FROM sample


Qualquer ajuda será bem vinda, muito obrigado!


Adilson



[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Ajuda com SQL

2008-09-16 Por tôpico Piracaia Soft
SELECT recebimentos.dt_emissao,
   '   '  as coluna1,
   '   ' as coluna2


FROM RECEBIMENTOS



Ats,
Alcione Guimarães

Piracaia Soft
(11)4036-6299
(11)9515-8707

  - Original Message - 
  From: Adilson Nunes Fernandes 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, September 16, 2008 7:28 AM
  Subject: [delphi-br] Ajuda com SQL


  Pessoal

  Preciso fazer um SELECT que me retorne algumas novas colunas 
  em branco. Conforme abaixo:

  Select Documento, NovaColuna em Branco, DtEmissao, NovaColuna em Branco, 
Valor, Total from TabelaN where ...

  Com os dados que o select retornar eu preencherei posteriormente as colunas 
vazias via programação.

  Vi alguns exemplos neste link, mas preciso para o Firebird. 

  http://weblogs.foxite.com/andykramek/archive/2005/09/18/921.aspx

  SELECT SPACE(30) AS newcol FROM nametable
  SELECT *, SPACE(30) AS newstring FROM sample

  Qualquer ajuda será bem vinda, muito obrigado!

  Adilson

  [As partes desta mensagem que não continham texto foram removidas]



   

[As partes desta mensagem que não continham texto foram removidas]



Res: [delphi-br] Ajuda com SQL

2008-09-16 Por tôpico Luciano Calenzani Simões
SELECT '   ' as nova_coluna, nm_pessoa FROM pessoa

 Luciano Calenzani Simões





- Mensagem original 
De: Adilson Nunes Fernandes [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Terça-feira, 16 de Setembro de 2008 7:28:48
Assunto: [delphi-br] Ajuda com SQL


Pessoal

Preciso fazer um SELECT que me retorne algumas novas colunas 
em branco. Conforme abaixo:

Select Documento, NovaColuna em Branco, DtEmissao, NovaColuna em Branco, Valor, 
Total from TabelaN where ...

Com os dados que o select retornar eu preencherei posteriormente as colunas 
vazias via programação.

Vi alguns exemplos neste link, mas preciso para o Firebird. 

http://weblogs. foxite.com/ andykramek/ archive/2005/ 09/18/921. aspx

SELECT SPACE(30) AS newcol FROM nametable
SELECT *, SPACE(30) AS newstring FROM sample

Qualquer ajuda será bem vinda, muito obrigado!

Adilson


  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua 
cara @ymail.com ou @rocketmail.com.
http://br.new.mail.yahoo.com/addresses

[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Ajuda com SQL

2008-09-11 Por tôpico tetraetila
Ajuda com SQL

Pessoal primeiramente bom dia!

Preciso recuperar dados comuns em 05 tabelas diferentes e não estou conseguindo.
Quero os campos da tabela A017 mas alguns das outras tabelas, ou seja,
busco o tipo
do documento nesta tabela A017.A017_TIPO e a descrição do tipo na
tabela de documentos, A014_DESC , só que quando uma ocorrência não é
satisfeita a
consulta não me retorna nada.


Documento   Tipo  DescriçãoFornecedor  Descrição
 Código plano   Descrição

000931-A 5Pagamentos Diversos  000564  Palmolive do Brasil
 l77Duplicatas



Vejam o comando SQL abaixo e se podem me ajudar, claro que deve ter
uma maneira mais
prática de fazer, mas não estou conseguindo. Qualquer ajuda será muito
bem vinda.



select

A017.A017_DOCU,

A017.A017_TIPO,  Busca o tipo do documento na tabela A014
A014_DESC as A014_DESC,  trás a descrição.

A017.A017_DTEM,
A017.A017_TPFO,

A017.A017_FORN,  Busca o código do fornecedor na tabela A001
A001_NOME as A001_NOME,  trás o nome do fornecedor.

A017.A017_HIST,
A017.A017_DTVN,
A017.A017_VAVN,
A017.A017_DTPG,
A017.A017_VAPG,
A017.A017_ATRA,
A017.A017_CDBX,

A017.A017_BANC,  Busca o código do banco na tabela A016
A016_DESC as A016_DESC,  trás a descrição do banco.

A017.A017_CHEQ,
A017.A017_HIS1,
A017.A017_DIGI,

A017.A017_PLAN,  Busca o código do plano de contas na tabela A011
A011_DESC as A011_DESC,  trás a descrição do plano de contas.

A017.A017_DUPL,
A017.A017_DOCU as CA017_DOCU,
A017.A017_TIPO as CA017_TIPO

from

A001017_TBL A017, A001014_TBL, A001001_TBL, A001016_TBL, A001011_TBL

where

(A017.A017_TIPO = A014_CHV or A017.A017_TIPO = 0) and
(A017.A017_TPFO = A001_TIPO or A017.A017_PLAN = 0) and
(A017.A017_FORN = A001_CHV or A017.A017_FORN =  0) and
(A017.A017_BANC = A016_CHV or A017.A017_BANC = 0) and
(A017.A017_PLAN = A011_REDU or A017.A017_PLAN = 0);




Muito obrigado, Adilson!


Res: [delphi-br] Ajuda com SQL

2008-09-11 Por tôpico Luciano Calenzani Simões
Você está fazendo inner join. Dá uma estudada em LEFT OUTER JOIN, dessa forma 
mesmo se não existir registro em uma sub-tabela a master-tabela será listada.
Por exemplo clientes com compras. Se você fizer inner join entre as duas só 
listará cliente que possuem compras, se você fizer LEFT OUTER JOIN listará 
todos os clientes, mesmo os que não tem compras.

 Luciano Calenzani Simões





- Mensagem original 
De: tetraetila [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 11 de Setembro de 2008 14:11:10
Assunto: [delphi-br] Ajuda com SQL


Ajuda com SQL

Pessoal primeiramente bom dia!

Preciso recuperar dados comuns em 05 tabelas diferentes e não estou conseguindo.
Quero os campos da tabela A017 mas alguns das outras tabelas, ou seja,
busco o tipo
do documento nesta tabela A017.A017_TIPO e a descrição do tipo na
tabela de documentos, A014_DESC , só que quando uma ocorrência não é
satisfeita a
consulta não me retorna nada.

Documento   Tipo  DescriçãoFornecedor  Descrição
Código plano   Descrição

000931-A 5Pagamentos Diversos  000564  Palmolive do Brasil
l77Duplicatas

Vejam o comando SQL abaixo e se podem me ajudar, claro que deve ter
uma maneira mais
prática de fazer, mas não estou conseguindo. Qualquer ajuda será muito
bem vinda.

select

A017.A017_DOCU,

A017.A017_TIPO,  Busca o tipo do documento na tabela A014
A014_DESC as A014_DESC,  trás a descrição.

A017.A017_DTEM,
A017.A017_TPFO,

A017.A017_FORN,  Busca o código do fornecedor na tabela A001
A001_NOME as A001_NOME,  trás o nome do fornecedor.

A017.A017_HIST,
A017.A017_DTVN,
A017.A017_VAVN,
A017.A017_DTPG,
A017.A017_VAPG,
A017.A017_ATRA,
A017.A017_CDBX,

A017.A017_BANC,  Busca o código do banco na tabela A016
A016_DESC as A016_DESC,  trás a descrição do banco.

A017.A017_CHEQ,
A017.A017_HIS1,
A017.A017_DIGI,

A017.A017_PLAN,  Busca o código do plano de contas na tabela A011
A011_DESC as A011_DESC,  trás a descrição do plano de contas.

A017.A017_DUPL,
A017.A017_DOCU as CA017_DOCU,
A017.A017_TIPO as CA017_TIPO

from

A001017_TBL A017, A001014_TBL, A001001_TBL, A001016_TBL, A001011_TBL

where

(A017.A017_TIPO = A014_CHV or A017.A017_TIPO = 0) and
(A017.A017_TPFO = A001_TIPO or A017.A017_PLAN = 0) and
(A017.A017_FORN = A001_CHV or A017.A017_FORN =  0) and
(A017.A017_BANC = A016_CHV or A017.A017_BANC = 0) and
(A017.A017_PLAN = A011_REDU or A017.A017_PLAN = 0);

Muito obrigado, Adilson!


  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua 
cara @ymail.com ou @rocketmail.com.
http://br.new.mail.yahoo.com/addresses

[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Ajuda com SQL

2008-09-11 Por tôpico Be free use Linux
Pessoal primeiramente bom dia!

Preciso recuperar dados comuns em 05 tabelas diferentes e não estou 
conseguindo.
Quero os campos da tabela A017 mas alguns das outras tabelas, ou seja,
busco o tipo
do documento nesta tabela A017.A017_TIPO e a descrição do tipo na
tabela de documentos, A014_DESC , só que quando uma ocorrência não é
satisfeita a
consulta não me retorna nada.


Documento   Tipo  DescriçãoFornecedor  Descrição
 Código plano   Descrição

000931-A 5Pagamentos Diversos  000564  Palmolive do Brasil
l77Duplicatas



Vejam o comando SQL abaixo e se podem me ajudar, claro que deve ter
uma maneira mais
prática de fazer, mas não estou conseguindo. Qualquer ajuda será muito
bem vinda.



select

A017.A017_DOCU,

A017.A017_TIPO,  Busca o tipo do documento na tabela A014
A014_DESC as A014_DESC,  trás a descrição.

A017.A017_DTEM,
A017.A017_TPFO,

A017.A017_FORN,  Busca o código do fornecedor na tabela 
A001
A001_NOME as A001_NOME,  trás o nome do fornecedor.

A017.A017_HIST,
A017.A017_DTVN,
A017.A017_VAVN,
A017.A017_DTPG,
A017.A017_VAPG,
A017.A017_ATRA,
A017.A017_CDBX,

A017.A017_BANC,  Busca o código do banco na tabela A016
A016_DESC as A016_DESC,  trás a descrição do banco.

A017.A017_CHEQ,
A017.A017_HIS1,
A017.A017_DIGI,

A017.A017_PLAN,  Busca o código do plano de contas na 
tabela A011
A011_DESC as A011_DESC,  trás a descrição do plano de contas.

A017.A017_DUPL,
A017.A017_DOCU as CA017_DOCU,
A017.A017_TIPO as CA017_TIPO

from

A001017_TBL A017, A001014_TBL, A001001_TBL, A001016_TBL, A001011_TBL

where

(A017.A017_TIPO = A014_CHV or A017.A017_TIPO = 0) and
(A017.A017_TPFO = A001_TIPO or A017.A017_PLAN = 0) and
(A017.A017_FORN = A001_CHV or A017.A017_FORN =  0) and
(A017.A017_BANC = A016_CHV or A017.A017_BANC = 0) and
(A017.A017_PLAN = A011_REDU or A017.A017_PLAN = 0);




Muito obrigado, Adilson!



Re: Res: [delphi-br] Ajuda com SQL

2008-09-11 Por tôpico Evandro Ricardo Silvestre
Recomendo esse artigo: http://www.codinghorror.com/blog/archives/000976.html

Evandro

Luciano Calenzani Simões wrote:
 Você está fazendo inner join. Dá uma estudada em LEFT OUTER JOIN, dessa forma 
 mesmo se não existir registro em uma sub-tabela a master-tabela será listada.
 Por exemplo clientes com compras. Se você fizer inner join entre as duas só 
 listará cliente que possuem compras, se você fizer LEFT OUTER JOIN listará 
 todos os clientes, mesmo os que não tem compras.

  Luciano Calenzani Simões

 - Mensagem original 
 De: tetraetila [EMAIL PROTECTED]
 Para: delphi-br@yahoogrupos.com.br
 Enviadas: Quinta-feira, 11 de Setembro de 2008 14:11:10
 Assunto: [delphi-br] Ajuda com SQL

 Ajuda com SQL

 Pessoal primeiramente bom dia!

 Preciso recuperar dados comuns em 05 tabelas diferentes e não estou 
 conseguindo.
 Quero os campos da tabela A017 mas alguns das outras tabelas, ou seja,
 busco o tipo
 do documento nesta tabela A017.A017_TIPO e a descrição do tipo na
 tabela de documentos, A014_DESC , só que quando uma ocorrência não é
 satisfeita a
 consulta não me retorna nada.

 Documento   Tipo  DescriçãoFornecedor  Descrição
 Código plano   Descrição

 000931-A 5Pagamentos Diversos  000564  Palmolive do Brasil
 l77Duplicatas

 Vejam o comando SQL abaixo e se podem me ajudar, claro que deve ter
 uma maneira mais
 prática de fazer, mas não estou conseguindo. Qualquer ajuda será muito
 bem vinda.

 select

 A017.A017_DOCU,

 A017.A017_TIPO,  Busca o tipo do documento na tabela A014
 A014_DESC as A014_DESC,  trás a descrição.

 A017.A017_DTEM,
 A017.A017_TPFO,

 A017.A017_FORN,  Busca o código do fornecedor na tabela A001
 A001_NOME as A001_NOME,  trás o nome do fornecedor.

 A017.A017_HIST,
 A017.A017_DTVN,
 A017.A017_VAVN,
 A017.A017_DTPG,
 A017.A017_VAPG,
 A017.A017_ATRA,
 A017.A017_CDBX,

 A017.A017_BANC,  Busca o código do banco na tabela A016
 A016_DESC as A016_DESC,  trás a descrição do banco.

 A017.A017_CHEQ,
 A017.A017_HIS1,
 A017.A017_DIGI,

 A017.A017_PLAN,  Busca o código do plano de contas na tabela A011
 A011_DESC as A011_DESC,  trás a descrição do plano de contas.

 A017.A017_DUPL,
 A017.A017_DOCU as CA017_DOCU,
 A017.A017_TIPO as CA017_TIPO

 from

 A001017_TBL A017, A001014_TBL, A001001_TBL, A001016_TBL, A001011_TBL

 where

 (A017.A017_TIPO = A014_CHV or A017.A017_TIPO = 0) and
 (A017.A017_TPFO = A001_TIPO or A017.A017_PLAN = 0) and
 (A017.A017_FORN = A001_CHV or A017.A017_FORN =  0) and
 (A017.A017_BANC = A016_CHV or A017.A017_BANC = 0) and
 (A017.A017_PLAN = A011_REDU or A017.A017_PLAN = 0);

 Muito obrigado, Adilson!

   Novos endereços, o Yahoo! que você conhece. Crie um email novo com a 
 sua cara @ymail.com ou @rocketmail.com.
 http://br.new.mail.yahoo.com/addresses

 [As partes desta mensagem que não continham texto foram removidas]

 

   

-- 
Evandro



[delphi-br] ajuda com sql

2007-07-10 Por tôpico Raphae Fonseca
bom dia amigos
estou precisando de uma ajudinha de vcs
estou precisando fazer uma query que pegue o valor de por exemplo um memo e 
acrescente na clausula and fazendo um in.
é o seguinte:
O usuário terá uma série de matrículas que pode ser 1 ou 10.
Como no processo eles não tem um critério exato a melhor forma que encontrei 
seria que eles pudessem digitar num edit e eu adicionar o conteudo no memo
ao final eu acrescentaria o conteudo do memo na cláusula do select.
Algum amigo tem alguma idéia que possa me passar???
Como posso fazer isso???
Raphael


  Flickr agora em português. Você cria, todo mundo vê.
http://www.flickr.com.br/

[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Ajuda com SQL

2007-05-17 Por tôpico BandaLemuel

Tenta assim...



SELECT PESSOAS.CODG_PESS, PESSOAS.CATG_PESS, PESSOAS.NOME_PESS, 
PESSOAS.NOME_FANT,
  PESSOAS.ENDR_PESS, PESSOAS.BARR_PESS, 
PESSOAS.CEP_PESS, PESSOAS.CODG_CIDD,
  PESSOAS.PONT_REFR, PESSOAS.TELF_PESS, 
PESSOAS.FAX_PESS, PESSOAS.CELL_PESS,
  PESSOAS.EMAIL_PESS, PESSOAS.HTTP_PESS, 
PESSOAS.DATA_CADS,PESSOAS.NASC_FUND,
  PESSOAS.DESATIVADO, PESSOAS.OBSR_PESS, 
PESSOAS.CPF_CNPJ_PESS, PESSOAS.RG_IE_PESS,
  PESSOAS.TIPO_PESS, PESSOAS.ENDR_ENTR, 
PESSOAS.BARR_ENTR, PESSOAS.CEP_ENTR, PESSOAS.CIDD_ENTR,
  PESSOAS.PONT_REFR_ENTR, PESSOAS.ENDR_COBR, 
PESSOAS.BARR_COBR,PESSOAS.CEP_COBR,
  PESSOAS.CIDD_COBR, CATG_PESS.NOME_CATG, 
CIDADES.NOME_CIDD, CIDADES.SIGL_ESTD,
  CIDADES.NOME_CIDD NOME_CIDD_ENTR, 
CIDADES.SIGL_ESTD ESTD_ENTR, CIDADES.NOME_CIDD ,
  NOME_CIDD_COBR, CIDADES.SIGL_ESTD ESTD_COBR 
FROM PESSOAS 

 INNER JOIN CATG_PESS ON ( CATG_PESS.CODG_CATG = 
PESSOAS.CATG_PESS )
 INNER JOIN CIDADES ON ( CIDADES.CODG_CIDD = PESSOAS.CODG_CIDD 
OR CIDADES.CODG_CIDD = PESSOAS.CIDD_ENTR OR CIDADES.CODG_CIDD = 
PESSOAS.CIDD_COBR  )

WHERE PESSOAS.CODG_PESS = :CODG_PESS


Wesley









  - Original Message - 
  From: Leandro - Grupos 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, May 16, 2007 4:53 PM
  Subject: [delphi-br] Ajuda com SQL


  E ai galera, blz...

  Estou com um problema em um SQL que estou utilizando para consultas. Estou
  utilizando o INNER JOIN para fazer o relacionamento entre duas tabelas
  (Pessoas e Cidades) porem tenho 3 campos na tabela de pessoas (CIDD_PESS,
  CIDD_COBR, CIDD_ENTR) que referenciam o mesmo campo na tabela de Cidades
  (CODG_CIDD).

  O problema acontece quando eu executo a consulta, ele me retorna somente o
  nome da cidade da ultima coluna da tabela de Pessoas (CIDD_ENTR).

  Alguém saberia me dizer se tem como contornar isso...

  Abaixo segue o SQL

  SELECT PESSOAS.CODG_PESS,

  PESSOAS.CATG_PESS,

  PESSOAS.NOME_PESS,

  PESSOAS.NOME_FANT,

  PESSOAS.ENDR_PESS,

  PESSOAS.BARR_PESS,

  PESSOAS.CEP_PESS,

  PESSOAS.CODG_CIDD,

  PESSOAS.PONT_REFR,

  PESSOAS.TELF_PESS,

  PESSOAS.FAX_PESS,

  PESSOAS.CELL_PESS,

  PESSOAS.EMAIL_PESS,

  PESSOAS.HTTP_PESS,

  PESSOAS.DATA_CADS,

  PESSOAS.NASC_FUND,

  PESSOAS.DESATIVADO,

  PESSOAS.OBSR_PESS,

  PESSOAS.CPF_CNPJ_PESS,

  PESSOAS.RG_IE_PESS,

  PESSOAS.TIPO_PESS,

  PESSOAS.ENDR_ENTR,

  PESSOAS.BARR_ENTR,

  PESSOAS.CEP_ENTR,

  PESSOAS.CIDD_ENTR,

  PESSOAS.PONT_REFR_ENTR,

  PESSOAS.ENDR_COBR,

  PESSOAS.BARR_COBR,

  PESSOAS.CEP_COBR,

  PESSOAS.CIDD_COBR,

  CATG_PESS.NOME_CATG,

  CIDADES.NOME_CIDD,

  CIDADES.SIGL_ESTD,

  CIDADES.NOME_CIDD NOME_CIDD_ENTR,

  CIDADES.SIGL_ESTD ESTD_ENTR,

  CIDADES.NOME_CIDD NOME_CIDD_COBR,

  CIDADES.SIGL_ESTD ESTD_COBR

  FROM PESSOAS INNER JOIN CATG_PESS ON CATG_PESS.CODG_CATG = PESSOAS.CATG_PESS

  INNER JOIN CIDADES ON CIDADES.CODG_CIDD = PESSOAS.CODG_CIDD

  INNER JOIN CIDADES ON CIDADES.CODG_CIDD = PESSOAS.CIDD_ENTR

  INNER JOIN CIDADES ON CIDADES.CODG_CIDD = PESSOAS.CIDD_COBR 

  WHERE PESSOAS.CODG_PESS = :CODG_PESS

  [As partes desta mensagem que não continham texto foram removidas]



   


--


  No virus found in this incoming message.
  Checked by AVG Free Edition. 
  Version: 7.5.467 / Virus Database: 269.7.1/805 - Release Date: 15/5/2007 10:47


[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Ajuda com SQL

2007-05-17 Por tôpico Anderson RB
Amigo, voce precisa fazer assim

INNER JOIN CIDADES1 ON CIDADES.CODG_CIDD = PESSOAS.CODG_CIDD

INNER JOIN CIDADES2 ON CIDADES.CODG_CIDD = PESSOAS.CIDD_ENTR

INNER JOIN CIDADES3 ON CIDADES.CODG_CIDD = PESSOAS.CIDD_COBR 

e la em cima onde voce referencia os campos faca:

CIDADE1.NOME DO CAMPO,
CIDADE2.NOME DO CAMPO,
CIDADE3.NOME DO CAMPO

espero ter ajudado

[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Ajuda com SQL

2007-05-16 Por tôpico Leandro - Grupos
E ai galera, blz...

 

Estou com um problema em um SQL que estou utilizando para consultas. Estou
utilizando o INNER JOIN para fazer o relacionamento entre duas tabelas
(Pessoas e Cidades) porem tenho 3 campos na tabela de pessoas (CIDD_PESS,
CIDD_COBR, CIDD_ENTR) que referenciam o mesmo campo na tabela de Cidades
(CODG_CIDD).

 

O problema acontece quando eu executo a consulta, ele me retorna somente o
nome da cidade da ultima coluna da tabela de Pessoas (CIDD_ENTR).

 

Alguém saberia me dizer se tem como contornar isso...

 

 

Abaixo segue o SQL

 

SELECT PESSOAS.CODG_PESS,

   PESSOAS.CATG_PESS,

   PESSOAS.NOME_PESS,

   PESSOAS.NOME_FANT,

   PESSOAS.ENDR_PESS,

   PESSOAS.BARR_PESS,

   PESSOAS.CEP_PESS,

   PESSOAS.CODG_CIDD,

   PESSOAS.PONT_REFR,

   PESSOAS.TELF_PESS,

   PESSOAS.FAX_PESS,

   PESSOAS.CELL_PESS,

   PESSOAS.EMAIL_PESS,

   PESSOAS.HTTP_PESS,

   PESSOAS.DATA_CADS,

   PESSOAS.NASC_FUND,

   PESSOAS.DESATIVADO,

   PESSOAS.OBSR_PESS,

   PESSOAS.CPF_CNPJ_PESS,

   PESSOAS.RG_IE_PESS,

   PESSOAS.TIPO_PESS,

   PESSOAS.ENDR_ENTR,

   PESSOAS.BARR_ENTR,

   PESSOAS.CEP_ENTR,

   PESSOAS.CIDD_ENTR,

   PESSOAS.PONT_REFR_ENTR,

   PESSOAS.ENDR_COBR,

   PESSOAS.BARR_COBR,

   PESSOAS.CEP_COBR,

   PESSOAS.CIDD_COBR,

   CATG_PESS.NOME_CATG,

   CIDADES.NOME_CIDD,

   CIDADES.SIGL_ESTD,

   CIDADES.NOME_CIDD NOME_CIDD_ENTR,

   CIDADES.SIGL_ESTD ESTD_ENTR,

   CIDADES.NOME_CIDD NOME_CIDD_COBR,

   CIDADES.SIGL_ESTD ESTD_COBR

FROM PESSOAS INNER JOIN CATG_PESS ON CATG_PESS.CODG_CATG = PESSOAS.CATG_PESS

 INNER JOIN CIDADES ON CIDADES.CODG_CIDD = PESSOAS.CODG_CIDD

 INNER JOIN CIDADES ON CIDADES.CODG_CIDD = PESSOAS.CIDD_ENTR

 INNER JOIN CIDADES ON CIDADES.CODG_CIDD = PESSOAS.CIDD_COBR 

WHERE PESSOAS.CODG_PESS = :CODG_PESS

 

 

 

 



[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Ajuda com SQL parte 2

2007-02-20 Por tôpico Tamara Clemente
Vai ai uma dica para o uso do between nas consultas sql: tome cuidado
com o tipo de dado declarado no seu banco de dados. O de costume é
criar campo para armazenamento deste tipo de dado com DateTime...
desta forma, se o usuario selecionar um intervalo para pesquisa
semelhante ao q se segue: 01/01/2000 a 01/01/2010 a consultra não
trará os dados de 01/01/2010... para tal, deve-se acrescentar 1 na
data final... ;o)

Espero ñ ter aprendido errado e ter acrescentado algo para vcs...rs..

Tamara Clemente
Analista Desenvolvedor

Em 19/02/07, Andrei Luís[EMAIL PROTECTED] escreveu:
 Os parâmetros você declara na propriedade Params do seu ADOQuery, e
 pra alimentá-los você faz assim:

 ADOQuery1.ParamByName('Data1').asDate := StrToDate(MaskEdit1.Text);
 ADOQuery1.ParamByName('Data2').asDate := StrToDate(MaskEdit2.Text);

 []
 Andrei

 Em 19/02/07, Elizeu jaime Martins Chiogna[EMAIL PROTECTED] escreveu:
  Conforme dica do Guilherme já consegui contar os registros iguais com
  ADOQuery no BD access, blz. Mas agora se inverteu nao consigo filtrar
  entre datas falta declarar Data1 e Data2 não estou conseguindo com
  MasKEdit1.
 
  Bom até agora se eu inserir a data no código dá certo assim:
 
  ADOQuery1.SQL.Add('WHERE DataDevolucao BETWEEN #01/01/2007# and
  #18/02/2007#');
  mas não é isso... eu quero tipo+ou- assim:
  ADOQuery1.SQL.Add('WHERE (DataDevolucao Between '+QuotedStr
  (MaskEdit1.Text)+' And '+QuotedStr(MaskEdit2.Text)+')'); mas não dá
  certo então
  ADOQuery1.SQL.Add('WHERE DataDevolucao Between :Data1 and Data2);//
  assim tem que declarar Data1 e Data2 usando parametro e linkar com os
  MaskEdit alguem pode me ajudar



Re: [delphi-br] Ajuda com SQL parte 2

2007-02-20 Por tôpico Eduardo Silva dos Santos
Oi *Tamara, *não sei a qual banco de dados vc se referiu, mas no mySQL o
Between tras o intervalo completo, sem precisar colocar +1 na data final.


Em 20/02/07, Tamara Clemente [EMAIL PROTECTED] escreveu:

   Vai ai uma dica para o uso do between nas consultas sql: tome cuidado
 com o tipo de dado declarado no seu banco de dados. O de costume é
 criar campo para armazenamento deste tipo de dado com DateTime...
 desta forma, se o usuario selecionar um intervalo para pesquisa
 semelhante ao q se segue: 01/01/2000 a 01/01/2010 a consultra não
 trará os dados de 01/01/2010... para tal, deve-se acrescentar 1 na
 data final... ;o)

 Espero ñ ter aprendido errado e ter acrescentado algo para vcs...rs..

 Tamara Clemente
 Analista Desenvolvedor

 Em 19/02/07, Andrei Luís[EMAIL PROTECTED]compuvale.software%40gmail.com
 escreveu:
  Os parâmetros você declara na propriedade Params do seu ADOQuery, e
  pra alimentá-los você faz assim:
 
  ADOQuery1.ParamByName('Data1').asDate := StrToDate(MaskEdit1.Text);
  ADOQuery1.ParamByName('Data2').asDate := StrToDate(MaskEdit2.Text);
 
  []
  Andrei
 
  Em 19/02/07, Elizeu jaime Martins Chiogna[EMAIL 
  PROTECTED]novoelizeu%40yahoo.com.br
 escreveu:
   Conforme dica do Guilherme já consegui contar os registros iguais com
   ADOQuery no BD access, blz. Mas agora se inverteu nao consigo filtrar
   entre datas falta declarar Data1 e Data2 não estou conseguindo com
   MasKEdit1.
  
   Bom até agora se eu inserir a data no código dá certo assim:
  
   ADOQuery1.SQL.Add('WHERE DataDevolucao BETWEEN #01/01/2007# and
   #18/02/2007#');
   mas não é isso... eu quero tipo+ou- assim:
   ADOQuery1.SQL.Add('WHERE (DataDevolucao Between '+QuotedStr
   (MaskEdit1.Text)+' And '+QuotedStr(MaskEdit2.Text)+')'); mas não dá
   certo então
   ADOQuery1.SQL.Add('WHERE DataDevolucao Between :Data1 and Data2);//
   assim tem que declarar Data1 e Data2 usando parametro e linkar com os
   MaskEdit alguem pode me ajudar
 
 




-- 
Eduardo Silva dos Santos
DRD Sistemas.
(27) 3218-4201
MSN: [EMAIL PROTECTED]
Site: http://www.drdsistemas.com/


[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Ajuda com SQL parte 2

2007-02-20 Por tôpico Edison DRP
Sem entrar no mérito do uso do between, mas apenas com relação ao que voce
disse refernete a acrescentar um a data, voce pode resolver isto de forma
mais elegante e segura  tomando a seguinte precaução: antes de enviar a
dataou o parâmentro contendo a data, fazer o seguinte:
  ... dataminima := DateOf(Campo DateTime);(DateOf é uma função contida
na Unit DateUtils do Delphi)
o problema da comparação de datas quando os campos são Datetime e que eles
contem tambem a hora e se voce quizer fazer a comparação, voce teria que
indicar a data e a hora ( acho que o defult da hora é 00:00:00).  Mas se
voce usar DateOf(DataDesejada) vai funcionar perfeitamente sem a necessidade
de aumentar 1.
Edison

- Original Message - 
From: Tamara Clemente [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, February 20, 2007 5:41 PM
Subject: Re: [delphi-br] Ajuda com SQL parte 2


Vai ai uma dica para o uso do between nas consultas sql: tome cuidado
com o tipo de dado declarado no seu banco de dados. O de costume é
criar campo para armazenamento deste tipo de dado com DateTime...
desta forma, se o usuario selecionar um intervalo para pesquisa
semelhante ao q se segue: 01/01/2000 a 01/01/2010 a consultra não
trará os dados de 01/01/2010... para tal, deve-se acrescentar 1 na
data final... ;o)

Espero ñ ter aprendido errado e ter acrescentado algo para vcs...rs..

Tamara Clemente
Analista Desenvolvedor

Em 19/02/07, Andrei Luís[EMAIL PROTECTED] escreveu:
 Os parâmetros você declara na propriedade Params do seu ADOQuery, e
 pra alimentá-los você faz assim:

 ADOQuery1.ParamByName('Data1').asDate := StrToDate(MaskEdit1.Text);
 ADOQuery1.ParamByName('Data2').asDate := StrToDate(MaskEdit2.Text);

 []
 Andrei

 Em 19/02/07, Elizeu jaime Martins Chiogna[EMAIL PROTECTED]
escreveu:
  Conforme dica do Guilherme já consegui contar os registros iguais com
  ADOQuery no BD access, blz. Mas agora se inverteu nao consigo filtrar
  entre datas falta declarar Data1 e Data2 não estou conseguindo com
  MasKEdit1.
 
  Bom até agora se eu inserir a data no código dá certo assim:
 
  ADOQuery1.SQL.Add('WHERE DataDevolucao BETWEEN #01/01/2007# and
  #18/02/2007#');
  mas não é isso... eu quero tipo+ou- assim:
  ADOQuery1.SQL.Add('WHERE (DataDevolucao Between '+QuotedStr
  (MaskEdit1.Text)+' And '+QuotedStr(MaskEdit2.Text)+')'); mas não dá
  certo então
  ADOQuery1.SQL.Add('WHERE DataDevolucao Between :Data1 and Data2);//
  assim tem que declarar Data1 e Data2 usando parametro e linkar com os
  MaskEdit alguem pode me ajudar



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Links do Yahoo! Grupos






Re: [delphi-br] Ajuda com SQL parte 2

2007-02-20 Por tôpico Tamara Clemente
Bom saber do DateOf..rs..

Quanto ao banco de dados, seria na utilização de MS SQL, Firebird e
Oracle... pelo menos foi trabalhando com estes bancos q me
ensinaram...rs...

Tamara Clemente
Analista Desenvolvedora

Em 20/02/07, Edison DRP[EMAIL PROTECTED] escreveu:
 Sem entrar no mérito do uso do between, mas apenas com relação ao que voce
 disse refernete a acrescentar um a data, voce pode resolver isto de forma
 mais elegante e segura  tomando a seguinte precaução: antes de enviar a
 dataou o parâmentro contendo a data, fazer o seguinte:
   ... dataminima := DateOf(Campo DateTime);(DateOf é uma função contida
 na Unit DateUtils do Delphi)
 o problema da comparação de datas quando os campos são Datetime e que eles
 contem tambem a hora e se voce quizer fazer a comparação, voce teria que
 indicar a data e a hora ( acho que o defult da hora é 00:00:00).  Mas se
 voce usar DateOf(DataDesejada) vai funcionar perfeitamente sem a necessidade
 de aumentar 1.
 Edison

 - Original Message -
 From: Tamara Clemente [EMAIL PROTECTED]
 To: delphi-br@yahoogrupos.com.br
 Sent: Tuesday, February 20, 2007 5:41 PM
 Subject: Re: [delphi-br] Ajuda com SQL parte 2


 Vai ai uma dica para o uso do between nas consultas sql: tome cuidado
 com o tipo de dado declarado no seu banco de dados. O de costume é
 criar campo para armazenamento deste tipo de dado com DateTime...
 desta forma, se o usuario selecionar um intervalo para pesquisa
 semelhante ao q se segue: 01/01/2000 a 01/01/2010 a consultra não
 trará os dados de 01/01/2010... para tal, deve-se acrescentar 1 na
 data final... ;o)

 Espero ñ ter aprendido errado e ter acrescentado algo para vcs...rs..

 Tamara Clemente
 Analista Desenvolvedor

 Em 19/02/07, Andrei Luís[EMAIL PROTECTED] escreveu:
  Os parâmetros você declara na propriedade Params do seu ADOQuery, e
  pra alimentá-los você faz assim:
 
  ADOQuery1.ParamByName('Data1').asDate := StrToDate(MaskEdit1.Text);
  ADOQuery1.ParamByName('Data2').asDate := StrToDate(MaskEdit2.Text);
 
  []
  Andrei
 
  Em 19/02/07, Elizeu jaime Martins Chiogna[EMAIL PROTECTED]
 escreveu:
   Conforme dica do Guilherme já consegui contar os registros iguais com
   ADOQuery no BD access, blz. Mas agora se inverteu nao consigo filtrar
   entre datas falta declarar Data1 e Data2 não estou conseguindo com
   MasKEdit1.
  
   Bom até agora se eu inserir a data no código dá certo assim:
  
   ADOQuery1.SQL.Add('WHERE DataDevolucao BETWEEN #01/01/2007# and
   #18/02/2007#');
   mas não é isso... eu quero tipo+ou- assim:
   ADOQuery1.SQL.Add('WHERE (DataDevolucao Between '+QuotedStr
   (MaskEdit1.Text)+' And '+QuotedStr(MaskEdit2.Text)+')'); mas não dá
   certo então
   ADOQuery1.SQL.Add('WHERE DataDevolucao Between :Data1 and Data2);//
   assim tem que declarar Data1 e Data2 usando parametro e linkar com os
   MaskEdit alguem pode me ajudar
 


 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

 Links do Yahoo! Grupos







[delphi-br] Ajuda com SQL parte 2

2007-02-19 Por tôpico Elizeu jaime Martins Chiogna
Conforme dica do Guilherme já consegui contar os registros iguais com 
ADOQuery no BD access, blz. Mas agora se inverteu nao consigo filtrar 
entre datas falta declarar Data1 e Data2 não estou conseguindo com 
MasKEdit1.

Bom até agora se eu inserir a data no código dá certo assim:

ADOQuery1.SQL.Add('WHERE DataDevolucao BETWEEN #01/01/2007# and 
#18/02/2007#');
mas não é isso... eu quero tipo+ou- assim:
ADOQuery1.SQL.Add('WHERE (DataDevolucao Between '+QuotedStr
(MaskEdit1.Text)+' And '+QuotedStr(MaskEdit2.Text)+')'); mas não dá 
certo então
ADOQuery1.SQL.Add('WHERE DataDevolucao Between :Data1 and Data2);// 
assim tem que declarar Data1 e Data2 usando parametro e linkar com os 
MaskEdit alguem pode me ajudar



Re: [delphi-br] Ajuda com SQL parte 2

2007-02-19 Por tôpico Andrei Luís
Os parâmetros você declara na propriedade Params do seu ADOQuery, e
pra alimentá-los você faz assim:

ADOQuery1.ParamByName('Data1').asDate := StrToDate(MaskEdit1.Text);
ADOQuery1.ParamByName('Data2').asDate := StrToDate(MaskEdit2.Text);

[]
Andrei

Em 19/02/07, Elizeu jaime Martins Chiogna[EMAIL PROTECTED] escreveu:
 Conforme dica do Guilherme já consegui contar os registros iguais com
 ADOQuery no BD access, blz. Mas agora se inverteu nao consigo filtrar
 entre datas falta declarar Data1 e Data2 não estou conseguindo com
 MasKEdit1.

 Bom até agora se eu inserir a data no código dá certo assim:

 ADOQuery1.SQL.Add('WHERE DataDevolucao BETWEEN #01/01/2007# and
 #18/02/2007#');
 mas não é isso... eu quero tipo+ou- assim:
 ADOQuery1.SQL.Add('WHERE (DataDevolucao Between '+QuotedStr
 (MaskEdit1.Text)+' And '+QuotedStr(MaskEdit2.Text)+')'); mas não dá
 certo então
 ADOQuery1.SQL.Add('WHERE DataDevolucao Between :Data1 and Data2);//
 assim tem que declarar Data1 e Data2 usando parametro e linkar com os
 MaskEdit alguem pode me ajudar


[delphi-br] Ajuda com SQL

2007-01-16 Por tôpico blcksun954
 Tenho uma tabela listando contas, e uma outra com os valores 
lançados em cada conta e as datas de lançamento e pagamento.
 Quero listar todas as contas e os valores totais lançados em cada 
uma, mesmo quando não haja nenhum valor (quando o valor seria 0).
 Até aqui, um LEFT JOIN resolve, o problema é que também preciso 
filtrar por data, para ter a movimentação num certo período. Quando 
faço isso, todas as contas que não tenham tido lançamentos 
desaparecem do resultado.
 Estou usando o banco de dados Firebird.
 Agradeço se alguém puder ajudar



Re: [delphi-br] Ajuda com SQL

2007-01-16 Por tôpico Gabriel Filho
Qual o banco o vc esta usando???

Em 16/01/07, blcksun954 [EMAIL PROTECTED] escreveu:

Tenho uma tabela listando contas, e uma outra com os valores
 lançados em cada conta e as datas de lançamento e pagamento.
 Quero listar todas as contas e os valores totais lançados em cada
 uma, mesmo quando não haja nenhum valor (quando o valor seria 0).
 Até aqui, um LEFT JOIN resolve, o problema é que também preciso
 filtrar por data, para ter a movimentação num certo período. Quando
 faço isso, todas as contas que não tenham tido lançamentos
 desaparecem do resultado.
 Estou usando o banco de dados Firebird.
 Agradeço se alguém puder ajudar

  



[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Ajuda com SQL

2007-01-16 Por tôpico Andrei Luís
adicione ao seu SQL:   OR DATA IS NULL
onde data é o seu campo data.

Ex.:

select f.filial, p.registro_id, p.data, p.filial_id
from filiais f
left join propostas p on p.filial_id=f.registro_id
where p.data between '01.01.2006' and '10.01.2006'
or p.data is null

[]
Andrei

Em 16/01/07, blcksun954[EMAIL PROTECTED] escreveu:
  Tenho uma tabela listando contas, e uma outra com os valores
 lançados em cada conta e as datas de lançamento e pagamento.
  Quero listar todas as contas e os valores totais lançados em cada
 uma, mesmo quando não haja nenhum valor (quando o valor seria 0).
  Até aqui, um LEFT JOIN resolve, o problema é que também preciso
 filtrar por data, para ter a movimentação num certo período. Quando
 faço isso, todas as contas que não tenham tido lançamentos
 desaparecem do resultado.
  Estou usando o banco de dados Firebird.
  Agradeço se alguém puder ajudar


Re: [delphi-br] Ajuda com SQL

2007-01-16 Por tôpico Luiz Escobar
put´s num leu a mensagem inteira e já vai respondendo com outra pergunta que a 
resposta esta na primeira pergunta !!!???.

é firebird... ta no final da mensagem dele... hhehehehehehe

abaixo tem um exemplo em mysql num sei se vai servir...
só colocar um or campodata is null  ex:
bla bla bla OR tabela.data IS NULL

Luiz Escobar
Analista/Desenvolvedor:
WEB - HTML/JavaScript/PHP/MySQL 
WINDOWS - Delphi/MyDAC/ASSEMBLER/MySQL/xBase
DOS - Clipper/Assembler xBase
SERVIDORES - NetWare4.11, LINUX-REDHAT9, WINDOWS-2k
LINUX - LAZARUS/Kylix/MySQL;
http://www.megasistema.com.br

  - Original Message - 
  From: Gabriel Filho 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, January 16, 2007 1:58 PM
  Subject: Re: [delphi-br] Ajuda com SQL


  Qual o banco o vc esta usando???

  Em 16/01/07, blcksun954 [EMAIL PROTECTED] escreveu:
  
   Tenho uma tabela listando contas, e uma outra com os valores
   lançados em cada conta e as datas de lançamento e pagamento.
   Quero listar todas as contas e os valores totais lançados em cada
   uma, mesmo quando não haja nenhum valor (quando o valor seria 0).
   Até aqui, um LEFT JOIN resolve, o problema é que também preciso
   filtrar por data, para ter a movimentação num certo período. Quando
   faço isso, todas as contas que não tenham tido lançamentos
   desaparecem do resultado.
   Estou usando o banco de dados Firebird.
   Agradeço se alguém puder ajudar
  
   
  

  [As partes desta mensagem que não continham texto foram removidas]



   

[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Ajuda com SQL

2007-01-16 Por tôpico Tamara Clemente
Só acrescentando  um detalhe: cuidado com a utilização do beetwen em
select, certifique-se de que eh gravado no banco apenas a data e ñ
como de costume data e hora... se estiver gravado data e o hora, ñ
esqueça de acrescentar +1 no q seria o data até para q englobe td o
periodo do dia... ;o)

Tamara Clemente
Analista Desenvolvedora

Em 16/01/07, Luiz Escobar[EMAIL PROTECTED] escreveu:
 put´s num leu a mensagem inteira e já vai respondendo com outra pergunta que
 a resposta esta na primeira pergunta !!!???.

 é firebird... ta no final da mensagem dele... hhehehehehehe

 abaixo tem um exemplo em mysql num sei se vai servir...
 só colocar um or campodata is null  ex:
 bla bla bla OR tabela.data IS NULL

 Luiz Escobar
 Analista/Desenvolvedor:
 WEB - HTML/JavaScript/PHP/MySQL
 WINDOWS - Delphi/MyDAC/ASSEMBLER/MySQL/xBase
 DOS - Clipper/Assembler xBase
 SERVIDORES - NetWare4.11, LINUX-REDHAT9, WINDOWS-2k
 LINUX - LAZARUS/Kylix/MySQL;
 http://www.megasistema.com.br

   - Original Message -
   From: Gabriel Filho
   To: delphi-br@yahoogrupos.com.br
   Sent: Tuesday, January 16, 2007 1:58 PM
   Subject: Re: [delphi-br] Ajuda com SQL


   Qual o banco o vc esta usando???

   Em 16/01/07, blcksun954 [EMAIL PROTECTED] escreveu:
   
Tenho uma tabela listando contas, e uma outra com os valores
lançados em cada conta e as datas de lançamento e pagamento.
Quero listar todas as contas e os valores totais lançados em cada
uma, mesmo quando não haja nenhum valor (quando o valor seria 0).
Até aqui, um LEFT JOIN resolve, o problema é que também preciso
filtrar por data, para ter a movimentação num certo período. Quando
faço isso, todas as contas que não tenham tido lançamentos
desaparecem do resultado.
Estou usando o banco de dados Firebird.
Agradeço se alguém puder ajudar
   
   
   

   [As partes desta mensagem que não continham texto foram removidas]





 [As partes desta mensagem que não continham texto foram removidas]





Re: [delphi-br] Ajuda com SQL (Firebird)

2006-06-12 Por tôpico Andre Luis
SELECT IDCONTA, (select substring(razaosocial from 1 for 22) from
cliente where idcliente = cr.idcliente) as CLIENTE, (select
descricao from MODOCOBRANCA where IDTIPOCOBRANCA =
contasreceber.idtipocobranca) as COBR ,DATAVENCIMENTO AS DATA_VCTO,
DATAPAGAMENTO AS DATA_PGTO, VALORPARCELA AS VALOR, VALORJUROSMULTA,
--Case When Baixa_Manual not null then 'BLX' else '' end as BLX
Adapte de acordo com as suas necessidades.
AS JUROS_MULTA, VALORDESCONTO AS DESCONTO, CUSTOCOBRANCA AS
CUSTO_COBR, (select valorparcela-valordesconto+valorjurosmulta from
contasreceber where idconta = cr.idconta and datapagamento is not
null) as valor_pago, (select first 1 idbloqueto from bloqueto where
idconta = cr.idconta order by dataemissao desc) as Bloqueto,
NUMERODOC AS DOCUMENTO, HISTORICOCOMPL AS complemento
FROM CONTASRECEBER cr


___ 
Abra sua conta no Yahoo! Mail: 1GB de espaço, alertas de e-mail no celular e 
anti-spam realmente eficaz. 
http://mail.yahoo.com.br/


-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Ajuda com SQL

2006-03-04 Por tôpico Luis Carlos Quinhone
Eu não tô dando conta nem de fazer a SQL que dirá SP, nunca fiz uma hehehehe
Eu tô usando o MySQL

Mesmo assim valeu...

Att

Luis Carlos


  - Original Message - 
  From: elazar 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, March 03, 2006 8:33 AM
  Subject: RES: [delphi-br] Ajuda com SQL


  Luis Carlos

  Se voce usa o firebird. faz uma StoredProcedure


  Atenciosamente;
  Elazar

  -Mensagem original-
  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
  Em nome de Luis Carlos Quinhone
  Enviada em: quinta-feira, 2 de março de 2006 20:20
  Para: delphi-br@yahoogrupos.com.br
  Assunto: [delphi-br] Ajuda com SQL


  Galera, preciso de ajuda em uma SQL, tenho uma tabela com os seguintes
  campos:

  PLACA - Placa do carro
  DATA - data de abastecimento
  KM - kilometragem
  QDE - Quantidade abastecida
  VALOR - valor por litro

  o que eu preciso? Preciso filtrar entre uma data inicial e uma data
  final de uma determinada placa somar a quantidade, depois de filtrado eu
  tenho que pagar a primeira  e a última kilometragem, diminuir a maior da
  menor pra ver o consumo por litro do veículo correspondente à aquela
  placa.

  Alguém pode ajudar esse pobre coitado...


  Att

  Quinhone

  [As partes desta mensagem que não continham texto foram removidas]



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





  Yahoo! Grupos, um serviço oferecido por:
  PUBLICIDADE





  Links do Yahoo! Grupos

  Para visitar o site do seu grupo na web, acesse:
  http://br.groups.yahoo.com/group/delphi-br/

  Para sair deste grupo, envie um e-mail para:
  [EMAIL PROTECTED]

  O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço
  do Yahoo!. 


  
  ___
  Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora!
  http://br.acesso.yahoo.com 


  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE

   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



[As partes desta mensagem que não continham texto foram removidas]



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




[delphi-br] Ajuda com SQL

2006-03-02 Por tôpico Luis Carlos Quinhone
Galera, preciso de ajuda em uma SQL, tenho uma tabela com os seguintes campos:

PLACA - Placa do carro
DATA - data de abastecimento
KM - kilometragem
QDE - Quantidade abastecida
VALOR - valor por litro

o que eu preciso? Preciso filtrar entre uma data inicial e uma data final de 
uma determinada placa somar a quantidade, depois de filtrado eu tenho que pagar 
a primeira  e a última kilometragem, diminuir a maior da menor pra ver o 
consumo por litro do veículo correspondente à aquela placa.

Alguém pode ajudar esse pobre coitado...


Att

Quinhone

[As partes desta mensagem que não continham texto foram removidas]



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




[delphi-br] Ajuda com SQL

2005-11-16 Por tôpico Emerson Moreno
Caros amigos, estou com um probleminha e conto com a ajuda de vocês,
tenho uma tabela onde preciso recuperar a quantidade acumulada de
entrada data por um certo usuário, mas queria que ele organizasse em
ordem cardinal e não estou conseguindo. Alguém pode me ajudar?? Veja e
SQL abaixo.

SELECT CODIGO_USUARIO_ENT, NOME_USUARIO_ENT, COUNT(ENTRADA_USUARIO) 
AS QTD FROM ENTRADAS WHERE CODIGO_USUARIO_ENT = CODIGO_USUARIO_US
GROUP BY CODIGO_USUARIO_ENT, NOME_USUARIO_ENT

Ele retorna o resultado correto, mas o problema é que ele não organiza
pelo resultado do Count. Sei que estou agrupando pelo codigo e pelo
nome, tentei agrupar pelo resultado do Count e não conseguir. Fico
imensamente agradecido pela a auda de todos.

--
Anteciosamente
Emerson Moreno
O grande sábio aprende por ensinar!


-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Ajuda com SQL

2005-11-16 Por tôpico André Luis de Oliveira
Use a opção order by, ele organiza uma coluna.

Sintaxe:
order by [campo] - ordena crescente
order by [campo] desc - ordena descrecente

Exemplo:
SELECT CODIGO_USUARIO_ENT, NOME_USUARIO_ENT, COUNT(ENTRADA_USUARIO) 
AS QTD FROM ENTRADAS WHERE CODIGO_USUARIO_ENT = CODIGO_USUARIO_US
GROUP BY CODIGO_USUARIO_ENT, NOME_USUARIO_ENT
ORDER BY CODIGO_USUARIO_ENT
  - Original Message - 
  From: Emerson Moreno 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, November 16, 2005 9:29 AM
  Subject: [delphi-br] Ajuda com SQL


  Caros amigos, estou com um probleminha e conto com a ajuda de vocês,
  tenho uma tabela onde preciso recuperar a quantidade acumulada de
  entrada data por um certo usuário, mas queria que ele organizasse em
  ordem cardinal e não estou conseguindo. Alguém pode me ajudar?? Veja e
  SQL abaixo.

  SELECT CODIGO_USUARIO_ENT, NOME_USUARIO_ENT, COUNT(ENTRADA_USUARIO) 
  AS QTD FROM ENTRADAS WHERE CODIGO_USUARIO_ENT = CODIGO_USUARIO_US
  GROUP BY CODIGO_USUARIO_ENT, NOME_USUARIO_ENT

  Ele retorna o resultado correto, mas o problema é que ele não organiza
  pelo resultado do Count. Sei que estou agrupando pelo codigo e pelo
  nome, tentei agrupar pelo resultado do Count e não conseguir. Fico
  imensamente agradecido pela a auda de todos.

  --
  Anteciosamente
  Emerson Moreno
  O grande sábio aprende por ensinar!


  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE

   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



[As partes desta mensagem que não continham texto foram removidas]



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Ajuda com SQL

2005-11-16 Por tôpico Denise
tente usar o order by nomedocamp
depois do group by
  - Original Message - 
  From: Emerson Moreno 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, November 16, 2005 9:29 AM
  Subject: [delphi-br] Ajuda com SQL


  Caros amigos, estou com um probleminha e conto com a ajuda de vocês,
  tenho uma tabela onde preciso recuperar a quantidade acumulada de
  entrada data por um certo usuário, mas queria que ele organizasse em
  ordem cardinal e não estou conseguindo. Alguém pode me ajudar?? Veja e
  SQL abaixo.

  SELECT CODIGO_USUARIO_ENT, NOME_USUARIO_ENT, COUNT(ENTRADA_USUARIO) 
  AS QTD FROM ENTRADAS WHERE CODIGO_USUARIO_ENT = CODIGO_USUARIO_US
  GROUP BY CODIGO_USUARIO_ENT, NOME_USUARIO_ENT

  Ele retorna o resultado correto, mas o problema é que ele não organiza
  pelo resultado do Count. Sei que estou agrupando pelo codigo e pelo
  nome, tentei agrupar pelo resultado do Count e não conseguir. Fico
  imensamente agradecido pela a auda de todos.

  --
  Anteciosamente
  Emerson Moreno
  O grande sábio aprende por ensinar!


  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE

   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



[As partes desta mensagem que não continham texto foram removidas]



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Ajuda com SQL

2005-11-16 Por tôpico Emerson Moreno
Muito obrigado a todos que me ajudaram, testei aqui e deu certo muito
obrigado mesmo. Um grande abraço a todos.

Em 16/11/05, Alencar - Philler Informatica [EMAIL PROTECTED] escreveu:

 
  SELECT CODIGO_USUARIO_ENT, NOME_USUARIO_ENT, COUNT(ENTRADA_USUARIO)
  AS QTD FROM ENTRADAS WHERE CODIGO_USUARIO_ENT = CODIGO_USUARIO_US
  GROUP BY CODIGO_USUARIO_ENT, NOME_USUARIO_ENT
 

 order by 3 /* ordena pelo terceiro valor retornado, no caso a QTD


 ---
 Philler Informatica Ltda
 Jose Alencar Philereno
 ICQ 13458351
 Messenger/Skype (voz): alencar

 Feliz aquele que transfere o que sabe
 e aprende o que ensina Cora Coralina


 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





   *Yahoo! Grupos, um serviço oferecido por:*   PUBLICIDADE

 http://br.rd.yahoo.com/SIG=12fbb0jbm/M=380335.7481167.8369105.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1132149965/A=3107499/R=2/id=noscript/SIG=12c39trgo/*http://ad.br.doubleclick.net/clk;22846485;12120066;a?http://www.hoteis.com
 --
 *Links do Yahoo! Grupos*

- Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
- Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED][EMAIL PROTECTED]
- O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
Serviço do Yahoo! http://br.yahoo.com/info/utos.html.




--
[]'s

Emerson Moreno
O grande sábio aprende por ensinar!


[As partes desta mensagem que não continham texto foram removidas]



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Ajuda com SQL

2005-05-03 Por tôpico Artur Guerra
Select PESSOAFISICA.NOME, PESSOAFISICA.FONE FROM PESSOAFISICA
 LEFT OUTER JOIN GRUPO ON PESSOAFISICA.COD_GRUPO=GRUPO.CODGRUPO
UNION ALL
Select PESSOAJURIDICA.NOME, PESSOAJURIDICA.FONE FROM PESSOAJURIDICA
 LEFT OUTER JOIN GRUPO ON PESSOAJURIDICA.COD_GRUPO=GRUPO.CODGRUPO

Simples e doce ...

On 5/2/05, Carlos Alberto Phelippe [EMAIL PROTECTED] wrote:
 Olá pessoal,
 estou tentando, ainda sem sucesso, criar uma consulta SQL. Tenhos três 
 tabelas:
 
 GRUPO(COD_GRUPO, NOME_GRUPO)
 
 PESSOAFISICA(COD_PESSOA, COD_GRUPO, NOME, FONE, ...)
 
 PESSOAJURIDICA(COD_PESSOA, COD_GRUPO, NOME, FONE, ...)
 
 Tenho que fazer uma consulta SQL que me retorne as pessoas físicas e 
 jurídicas JUNTAS  e organizadas pelo GRUPO.
 
 Como fazer?
 
 [As partes desta mensagem que não continham texto foram removidas]
 
 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
 Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages
 
 Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
 Links do Yahoo! Grupos
 
 
 
 
 


-- 


Artur Rodrigo Guerra
mail: [EMAIL PROTECTED]



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Ajuda com SQL

2005-05-03 Por tôpico Eduardo
Desta maneira vc cria um campo fixo dentro de cada union, assim vc pode ordenar 
pelo campo fixo. 
Um exmplo facil seria o total de receita ficando na ultima linha.

Select * from (
select Nome as Nome, Data, Valor from receita
union all
select 'Total' as Nome, Sum(Valor) from receita)
order by 1

Assim eu tenho o o total na ultima linha, sem o risco de ficar no meio do 
resultado.

QQ Duvida posta ai.

Eduardo
ps.: Depois disso adapte ao q vc quiser, as combinações são n.

  - Original Message - 
  From: Carlos Alberto Phelippe 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, May 02, 2005 3:07 PM
  Subject: Re: [delphi-br] Ajuda com SQL


  Desculpe,
  mas não entendi a sua colocação.

  - Original Message - 
  From: Eduardo [EMAIL PROTECTED]
  To: delphi-br@yahoogrupos.com.br
  Sent: Monday, May 02, 2005 2:57 PM
  Subject: Re: [delphi-br] Ajuda com SQL


   crie um campo fixo.
  
   select 1 AS TIPO BLAH, BLAH ...
   UNION ALL
   select 2 AS TIPO BLAH, BLAH ...
  
   Acho q isso deve t ajudar.
  
   Eduardo
  
- Original Message - 
From: Carlos Alberto Phelippe
To: delphi-br@yahoogrupos.com.br ; Delphi Lista MPS
Sent: Monday, May 02, 2005 2:40 PM
Subject: Re: [delphi-br] Ajuda com SQL
  
  
Pessoal,
com o SQL abaixo:
  
SELECT G.NOME_GRUPO, F.TRATAMENTO, F.NOME, F.FONE_RESIDENCIAL,
F.FONE_COMERCIAL,
F.FONE_CELULAR, F.EMAIL, F.
  
FROM PESSOAFISICA F, GRUPO G WHERE F.COD_GRUPO = G.COD_GRUPO
  
UNION ALL
  
SELECT G.NOME_GRUPO, J.CNPJ TRATAMENTO, J.NOME, J.FONE FONE_RESIDENCIAL,
J.FONE_FAX
FONE_COMERCIAL, J.FONE_CEL FONE_CELULAR, J.EMAIL, J.HOME_PAGE
  
FROM PESSOAJURIDICA J, GRUPO G WHERE J.COD_GRUPO = G.COD_GRUPO
  
ORDER BY 1, 3;
  
Tem como eu saber o que vem de cada tabela. Tipo criar um CAMPO VIRTUAL
que me ajudasse a definir se o registro exibido é da tabela PESSOA FÍSICA 
   ou
da tabela PESSOA JURÍDICA.
  
  
  
  
  
-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
  
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
  
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
  
  
  
  Yahoo! Grupos, um serviço oferecido por:
PUBLICIDADE
  
  
  
  
   
--
Links do Yahoo! Grupos
  
  a.. Para visitar o site do seu grupo na web, acesse:
  http://br.groups.yahoo.com/group/delphi-br/
  
  b.. Para sair deste grupo, envie um e-mail para:
  [EMAIL PROTECTED]
  
  c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do 
   Serviço do Yahoo!.
  
  
  
   [As partes desta mensagem que não continham texto foram removidas]
  
  
  
   -- 
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
  
   Para ver as mensagens antigas, acesse:
   http://br.groups.yahoo.com/group/delphi-br/messages
  
   Para falar com o moderador, envie um e-mail para:
   [EMAIL PROTECTED] ou [EMAIL PROTECTED]
  
   Links do Yahoo! Grupos
  
  
  
  
  
  
  
  
  
  
   




  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE

   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



[As partes desta mensagem que não continham texto foram removidas]



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





[delphi-br] Ajuda com SQL

2005-05-02 Por tôpico Carlos Alberto Phelippe
Olá pessoal,
estou tentando, ainda sem sucesso, criar uma consulta SQL. Tenhos três tabelas:

GRUPO(COD_GRUPO, NOME_GRUPO)

PESSOAFISICA(COD_PESSOA, COD_GRUPO, NOME, FONE, ...)

PESSOAJURIDICA(COD_PESSOA, COD_GRUPO, NOME, FONE, ...)

Tenho que fazer uma consulta SQL que me retorne as pessoas físicas e jurídicas 
JUNTAS  e organizadas pelo GRUPO.

Como fazer?

[As partes desta mensagem que não continham texto foram removidas]



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Ajuda com SQL

2005-05-02 Por tôpico Carlos Alberto Phelippe
Pessoal,
com o SQL abaixo:

SELECT G.NOME_GRUPO, F.TRATAMENTO, F.NOME, F.FONE_RESIDENCIAL, 
F.FONE_COMERCIAL,
F.FONE_CELULAR, F.EMAIL, F.

FROM PESSOAFISICA F, GRUPO G WHERE F.COD_GRUPO = G.COD_GRUPO

UNION ALL

SELECT G.NOME_GRUPO, J.CNPJ TRATAMENTO, J.NOME, J.FONE FONE_RESIDENCIAL, 
J.FONE_FAX
FONE_COMERCIAL, J.FONE_CEL FONE_CELULAR, J.EMAIL, J.HOME_PAGE

FROM PESSOAJURIDICA J, GRUPO G WHERE J.COD_GRUPO = G.COD_GRUPO

ORDER BY 1, 3;

Tem como eu saber o que vem de cada tabela. Tipo criar um CAMPO VIRTUAL 
que me ajudasse a definir se o registro exibido é da tabela PESSOA FÍSICA ou 
da tabela PESSOA JURÍDICA.





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Ajuda com SQL

2005-05-02 Por tôpico Eduardo
crie um campo fixo.

select 1 AS TIPO BLAH, BLAH ...
UNION ALL
select 2 AS TIPO BLAH, BLAH ...

Acho q isso deve t ajudar.

Eduardo

  - Original Message - 
  From: Carlos Alberto Phelippe 
  To: delphi-br@yahoogrupos.com.br ; Delphi Lista MPS 
  Sent: Monday, May 02, 2005 2:40 PM
  Subject: Re: [delphi-br] Ajuda com SQL


  Pessoal,
  com o SQL abaixo:

  SELECT G.NOME_GRUPO, F.TRATAMENTO, F.NOME, F.FONE_RESIDENCIAL, 
  F.FONE_COMERCIAL,
  F.FONE_CELULAR, F.EMAIL, F.

  FROM PESSOAFISICA F, GRUPO G WHERE F.COD_GRUPO = G.COD_GRUPO

  UNION ALL

  SELECT G.NOME_GRUPO, J.CNPJ TRATAMENTO, J.NOME, J.FONE FONE_RESIDENCIAL, 
  J.FONE_FAX
  FONE_COMERCIAL, J.FONE_CEL FONE_CELULAR, J.EMAIL, J.HOME_PAGE

  FROM PESSOAJURIDICA J, GRUPO G WHERE J.COD_GRUPO = G.COD_GRUPO

  ORDER BY 1, 3;

  Tem como eu saber o que vem de cada tabela. Tipo criar um CAMPO VIRTUAL 
  que me ajudasse a definir se o registro exibido é da tabela PESSOA FÍSICA ou 
  da tabela PESSOA JURÍDICA.





  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE

   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



[As partes desta mensagem que não continham texto foram removidas]



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Ajuda com SQL

2005-05-02 Por tôpico Carlos Alberto Phelippe
Resolvido, ficou assim:
SELECT G.NOME_GRUPO, F.TRATAMENTO, F.NOME, F.FONE_RESIDENCIAL, 
F.FONE_COMERCIAL,
F.FONE_CELULAR, F.EMAIL, F.BAIRRO, 1 AS TIPO_PESSOA

FROM PESSOAFISICA F, GRUPO G WHERE F.COD_GRUPO = G.COD_GRUPO

UNION ALL

SELECT G.NOME_GRUPO, J.CNPJ TRATAMENTO, J.NOME, J.FONE FONE_RESIDENCIAL, 
J.FONE_FAX
FONE_COMERCIAL, J.FONE_CEL FONE_CELULAR, J.EMAIL, J.HOME_PAGE BAIRRO, 2 AS 
TIPO_PESSOA

FROM PESSOAJURIDICA J, GRUPO G WHERE J.COD_GRUPO = G.COD_GRUPO

ORDER BY 1, 3;

Obrigado a todos



- Original Message - 
From: Eduardo [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Monday, May 02, 2005 2:57 PM
Subject: Re: [delphi-br] Ajuda com SQL


 crie um campo fixo.

 select 1 AS TIPO BLAH, BLAH ...
 UNION ALL
 select 2 AS TIPO BLAH, BLAH ...

 Acho q isso deve t ajudar.

 Eduardo

  - Original Message - 
  From: Carlos Alberto Phelippe
  To: delphi-br@yahoogrupos.com.br ; Delphi Lista MPS
  Sent: Monday, May 02, 2005 2:40 PM
  Subject: Re: [delphi-br] Ajuda com SQL


  Pessoal,
  com o SQL abaixo:

  SELECT G.NOME_GRUPO, F.TRATAMENTO, F.NOME, F.FONE_RESIDENCIAL,
  F.FONE_COMERCIAL,
  F.FONE_CELULAR, F.EMAIL, F.

  FROM PESSOAFISICA F, GRUPO G WHERE F.COD_GRUPO = G.COD_GRUPO

  UNION ALL

  SELECT G.NOME_GRUPO, J.CNPJ TRATAMENTO, J.NOME, J.FONE FONE_RESIDENCIAL,
  J.FONE_FAX
  FONE_COMERCIAL, J.FONE_CEL FONE_CELULAR, J.EMAIL, J.HOME_PAGE

  FROM PESSOAJURIDICA J, GRUPO G WHERE J.COD_GRUPO = G.COD_GRUPO

  ORDER BY 1, 3;

  Tem como eu saber o que vem de cada tabela. Tipo criar um CAMPO VIRTUAL
  que me ajudasse a definir se o registro exibido é da tabela PESSOA FÍSICA 
 ou
  da tabela PESSOA JURÍDICA.





  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por:
  PUBLICIDADE




 --
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do 
 Serviço do Yahoo!.



 [As partes desta mensagem que não continham texto foram removidas]



 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

 Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

 Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]

 Links do Yahoo! Grupos










 




-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Ajuda com SQL

2005-05-02 Por tôpico Carlos Alberto Phelippe
Desculpe,
mas não entendi a sua colocação.

- Original Message - 
From: Eduardo [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Monday, May 02, 2005 2:57 PM
Subject: Re: [delphi-br] Ajuda com SQL


 crie um campo fixo.

 select 1 AS TIPO BLAH, BLAH ...
 UNION ALL
 select 2 AS TIPO BLAH, BLAH ...

 Acho q isso deve t ajudar.

 Eduardo

  - Original Message - 
  From: Carlos Alberto Phelippe
  To: delphi-br@yahoogrupos.com.br ; Delphi Lista MPS
  Sent: Monday, May 02, 2005 2:40 PM
  Subject: Re: [delphi-br] Ajuda com SQL


  Pessoal,
  com o SQL abaixo:

  SELECT G.NOME_GRUPO, F.TRATAMENTO, F.NOME, F.FONE_RESIDENCIAL,
  F.FONE_COMERCIAL,
  F.FONE_CELULAR, F.EMAIL, F.

  FROM PESSOAFISICA F, GRUPO G WHERE F.COD_GRUPO = G.COD_GRUPO

  UNION ALL

  SELECT G.NOME_GRUPO, J.CNPJ TRATAMENTO, J.NOME, J.FONE FONE_RESIDENCIAL,
  J.FONE_FAX
  FONE_COMERCIAL, J.FONE_CEL FONE_CELULAR, J.EMAIL, J.HOME_PAGE

  FROM PESSOAJURIDICA J, GRUPO G WHERE J.COD_GRUPO = G.COD_GRUPO

  ORDER BY 1, 3;

  Tem como eu saber o que vem de cada tabela. Tipo criar um CAMPO VIRTUAL
  que me ajudasse a definir se o registro exibido é da tabela PESSOA FÍSICA 
 ou
  da tabela PESSOA JURÍDICA.





  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por:
  PUBLICIDADE




 --
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do 
 Serviço do Yahoo!.



 [As partes desta mensagem que não continham texto foram removidas]



 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

 Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

 Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]

 Links do Yahoo! Grupos










 




-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





RES: [delphi-br] Ajuda com SQL

2005-05-02 Por tôpico Cleriston
sim, adiciona 

  _  

De: Carlos Alberto Phelippe [mailto:[EMAIL PROTECTED] 
Enviada em: segunda-feira, 2 de maio de 2005 14:40
Para: delphi-br@yahoogrupos.com.br; Delphi Lista MPS
Assunto: Re: [delphi-br] Ajuda com SQL


Pessoal,
com o SQL abaixo:

SELECT  'FISICO' 'TIPO',  G.NOME_GRUPO, F.TRATAMENTO, F.NOME,
F.FONE_RESIDENCIAL, 
F.FONE_COMERCIAL,
F.FONE_CELULAR, F.EMAIL, F.

FROM PESSOAFISICA F, GRUPO G WHERE F.COD_GRUPO = G.COD_GRUPO

UNION ALL

SELECT 'JURIDI'  'TIPO' ,  G.NOME_GRUPO, J.CNPJ TRATAMENTO, J.NOME, J.FONE
FONE_RESIDENCIAL, 
J.FONE_FAX
FONE_COMERCIAL, J.FONE_CEL FONE_CELULAR, J.EMAIL, J.HOME_PAGE

FROM PESSOAJURIDICA J, GRUPO G WHERE J.COD_GRUPO = G.COD_GRUPO

ORDER BY 1, 3;

Tem como eu saber o que vem de cada tabela. Tipo criar um CAMPO VIRTUAL 
que me ajudasse a definir se o registro exibido é da tabela PESSOA FÍSICA ou

da tabela PESSOA JURÍDICA.





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]




Yahoo! Grupos, um serviço oferecido por:

PUBLICIDADE
 
http://br.rd.yahoo.com/SIG=12ad7fcpk/M=264379.5078783.6203979.1588051/D=brc
lubs/S=2137111264:HM/EXP=1115062840/A=2332652/R=0/id=noscript/SIG=119058f8i/
*http://br.download.yahoo.com/messenger/   

  _  

Links do Yahoo! Grupos


*   Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  

*   Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
mailto:[EMAIL PROTECTED] 
  

*   O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
Serviço do Yahoo! http://br.yahoo.com/info/utos.html . 




[As partes desta mensagem que não continham texto foram removidas]



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html