MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    Localizar registros relacionados a tabela

    Compartilhe

    biligo
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 181
    Registrado : 10/04/2014

    Localizar registros relacionados a tabela

    Mensagem  biligo em Dom 18 Set 2016, 08:44

    Boas pessoal,

    Tenho uma seguinte sequencia:

    tblPedido.................tblPedidoDetalhe..................tblPedidoDetalheObs
    PEDIDO 1..............DETALHE DO PEDIDO 1...............OBSERVACAO 1
    PEDIDO 1..............DETALHE DO PEDIDO 1...............OBSERVACAO 2
    PEDIDO 1..............DETALHE DO PEDIDO 2
    PEDIDO 1..............DETALHE DO PEDIDO 3...............OBSERVACAO 3

    Como podem ver um pedido pode ter vários detalhes e um detalhe pode ter varias observações ou nenhuma observação.
    Tenho que localizar todas as observações de todos os detalhes de um pedido.
    Os relacionamentos estão assim:

    tblPedido.................tblPedidoDetalhe..................tblPedidoDetalheObs
    IdPedido.....................IdentPedido
    ..................................IdDetalhe........................IdentPedidoDetalhe

    Como eu poderia concluir esta consulta?

    idDeta = Nz(DLookup("IdDetalhe", "tblPedidoDetalhe", "IdentPedido = " & Me.IdPedido & ""), "-1")

    Set rsObs = CurrentDb.OpenRecordset("SELECT Comentario FROM tblPedidoDetalheObs WHERE IdentPedidoDetalhe = " & idDeta & And ??? & "")

    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 5889
    Registrado : 05/11/2009

    Re: Localizar registros relacionados a tabela

    Mensagem  Alexandre Neves em Dom 18 Set 2016, 21:59

    Boa noite,
    SELECT IdPedido, IdDetalhe, Comentario FROM (tblPedido LEFT JOIN tblPedidoDetalhe ON tblPedido.IdPedido=tblPedidoDetalhe.IdentPedido) LEFT JOIN tblPedidoDetalheObs ON tblPedidoDetalhe.IdDetalhe=tblPedidoDetalheObs.IdentPedidoDetalhe


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo

    biligo
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 181
    Registrado : 10/04/2014

    Re: Localizar registros relacionados a tabela

    Mensagem  biligo em Seg 19 Set 2016, 13:50

    Bom dia Alexandre,

    Grato pela atenção.
    Infelizmente não consegui adaptar sua ajuda. Estou tentando mas sem resultados.
    Segue o exemplo, se puder dar uma olhada agradeço.
    BD

    Grato.

    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 5889
    Registrado : 05/11/2009

    Re: Localizar registros relacionados a tabela

    Mensagem  Alexandre Neves em Seg 19 Set 2016, 20:12

    Boa noite,
    Exemplifique o que pretende obter


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo

      Data/hora atual: Qui 08 Dez 2016, 14:03