MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Consulta usando chave secundária

    Compartilhe

    MPC
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 36
    Registrado : 27/12/2015

    [Resolvido]Consulta usando chave secundária

    Mensagem  MPC em 1/3/2018, 13:07

    Bom dia.

    Necessito fazer uma consulta que me mostre quais serviços estão em aberto, isto é, não pagos.

    Para facilitar, anexo a imagem do diagrama MER para ficar mais claro.

    Para um mesmo serviço, podem haver vários pagamentos.

    Mas não consigo fazer que serviços com mais de um pagamento e que estejam pagos não apareçam na consulta, uma vez que necessito somar os pagamentos e comparar com o valor do serviço.

    Para serviços pagos e com apenas um pagamento funciona ok.

    Alguém poderia me ajudar indicando como poderia ser feita tal consulta? Ou seria possível apenas usando VBA?

    Muito obrigado.
    avatar
    cleverson_manaus
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 890
    Registrado : 23/09/2011

    Re: [Resolvido]Consulta usando chave secundária

    Mensagem  cleverson_manaus em 2/3/2018, 21:27

    MPC

    Na tabela tServicos, acrescente um campo chamado ValorPago.

    Este campo receberá todos os valores pagos parcialmente do referido serviço, oriundos do campo ValorPagamento da tabela tPagamentos.

    Assim vc pode montar um consulta com essa tabela e criar uma campo calculado, por exemplo:
    = A Pagar: ValorServico - ValorPago.

    Em seguida vc monta um relatório, tendo como critério para esse campo calculado somente os valores acima de Zero.

    Se vc postar sua base fica mais fácil para todos ajudar.

    Tendo dúvidas, manda aí.


    .................................................................................
    [Você precisa estar registrado e conectado para ver esta imagem.]

    "É fazendo que se aprende a fazer aquilo que se deve aprender a fazer."(Aristóteles)
    - Dúvida resolvida!!! Marcar o tópico como resolvido!!!

    MPC
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 36
    Registrado : 27/12/2015

    Re: [Resolvido]Consulta usando chave secundária

    Mensagem  MPC em 4/3/2018, 20:37

    Cleverson,

    muito obrigado pela sua contribuição.

    Não tive tempo para implementar ainda, mas sua solução é muito lógica.

    Na verdade eu estava tentando ver se era possível fazer "diretamente" pelas consultas.

    Da maneira que sugeriu tenho que modificar o VBA nos lançamentos dos pagamentos para atualizar o campo ValorPago.

    Mas sua ajuda foi muito útil.

    Obrigado.
    avatar
    cleverson_manaus
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 890
    Registrado : 23/09/2011

    Re: [Resolvido]Consulta usando chave secundária

    Mensagem  cleverson_manaus em 4/3/2018, 23:12

    Apenas algumas linhas de código VBA.


    .................................................................................
    [Você precisa estar registrado e conectado para ver esta imagem.]

    "É fazendo que se aprende a fazer aquilo que se deve aprender a fazer."(Aristóteles)
    - Dúvida resolvida!!! Marcar o tópico como resolvido!!!

    MPC
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 36
    Registrado : 27/12/2015

    Re: [Resolvido]Consulta usando chave secundária

    Mensagem  MPC em 5/3/2018, 14:37

    Ok Cleverson.

    Problema resolvido.

    Obrigado.

      Data/hora atual: 16/11/2018, 04:02