Gostaria de saber como posso criar uma query que me retorne as ultimas compras 
de um produto com seus fornecedores.

Quero que me retorne todos os fornecedores de um determinado produto com suas 
respectivas datas de ultima compra.

Tenho a seguinte consulta:

SELECT    DISTINCT            prod.COD_PRODUTO, prod.COD_PRODUTO_SE, 
prod.DESCRICAO, pf.COD_FORNEC, forn.DESCRICAO AS Expr1, forn.CNPJ, 
forn.ENDERECO, 
                      forn.NUMERO, forn.CEP, forn.COMPLEMENTO, forn.BAIRRO, 
forn.CIDADE, forn.UF, forn.FONE, forn.FAX, forn.PESSOA_CONTATO, 
                      MAX(dbo.T0160.DTRECNF_RM) AS Expr2, dbo.T0161.PRECOUNNF_ 
AS Expr3
FROM         dbo.T0161 INNER JOIN
                      dbo.T0160 ON dbo.T0161.CODNF_RM01 = dbo.T0160.CODNF_RM01 
INNER JOIN
                      dbo.CF_PRODUTO prod INNER JOIN
                      dbo.CF_PROD_FORNEC pf ON prod.COD_PRODUTO = pf.COD_PROD 
INNER JOIN
                      dbo.CF_FORNECEDOR forn ON pf.COD_FORNEC = forn.COD_FORN 
ON dbo.T0161.ITEMNF_RM0 = prod.COD_PRODUTO_SE
WHERE     (prod.COD_PRODUTO <= 115) AND (prod.COD_PRODUTO >= 115)
GROUP BY dbo.T0161.PRECOUNNF_,prod.COD_PRODUTO_SE, prod.DESCRICAO, 
pf.COD_FORNEC, forn.DESCRICAO, forn.CNPJ, forn.ENDERECO, forn.NUMERO, forn.CEP, 
                      forn.COMPLEMENTO, forn.BAIRRO, forn.CIDADE, forn.UF, 
forn.FONE, forn.FAX, forn.PESSOA_CONTATO, prod.COD_PRODUTO

Mas ela me retorna todas as compras que tenho na tabela de compras e items de 
compras.

A tabela T0160 é a tabela de Compras e a T0161 é a de itens de compra.
  ----- Original Message ----- 
  From: Osmar de Souza Júnior 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, December 23, 2004 2:43 PM
  Subject: [delphi-br] Re: Linhas num Grid



  não sei se o gride padrão do Delphi faz isso...

  eu utilizo o gride dos componentes InfoPower 
  (http://www.woll2woll.com/infopower)

  ele permite uma extensibilidade enorme para os grids. coloca 
  combobox dentro dos grides, colunas que ajustam a largura 
  automaticamente, etc...


  --- Em delphi-br@yahoogrupos.com.br, "Eduardo Buffara Junior" 
  <[EMAIL PROTECTED]> escreveu
  > 
  > Olá pessoal td bem??? 
  > 
  > Estou com o seguinte problema....tenho um grid...este grid esta 
  ligado numa tabela cujo o campo texto alem de ser um pouquinho 
  grande....tem quebra de linhas..... 
  > Tenho duas opções.... 
  > * Não sei como posso fazer para que o dbgrid quebre as linhas ou 
  seja...moste varias linhas de um unico registro...tipo excel qd vc 
  aumenta o espaço da celula.... 
  > * Pegar somente a primeira linha da string...mais tb não sei como 
  fazer isso..... 
  > 
  > Preciso de uma solução urgente.... 
  > 
  > Ate agora obrigado 
  > 
  > T+
  > ________________________________
  > Eduardo Buffara Junior - Programador Delphi
  > [EMAIL PROTECTED]
  > (41) 9149.5756 - Paranaguá - PR
  > 
  > [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]



        Yahoo! Grupos, um serviço oferecido por: 
             
                    São Paulo Rio de Janeiro Curitiba Porto Alegre Belo 
Horizonte Brasília  
             
       


------------------------------------------------------------------------------
  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!. 




------------------------------------------------------------------------------


  No virus found in this incoming message.
  Checked by AVG Anti-Virus.
  Version: 7.0.296 / Virus Database: 265.6.2 - Release Date: 20/12/2004


  ----------

No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.296 / Virus Database: 265.6.2 - Release Date: 20/12/2004


[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

 



Responder a