MaximoAccess

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

Obrigado

Administração do MaximoAccess

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

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

    [Resolvido]retornar menor preço

    avatar
    Raigley
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 10
    Registrado : 09/07/2016

    [Resolvido]retornar menor preço Empty [Resolvido]retornar menor preço

    Mensagem  Raigley em Sex Maio 19, 2017 1:35 pm

    boa tarde!

    estou com um problema novamente.

    tenho uma tabela de produtos alimentada por um formulário.
    na tabela tenho o campo codProduto, Produto, Fornecedor, Fabricante e PreçoUnit
    pois bem, tenho 3 produtos iguais porém com códigos diferentes, pois cada um pertence a um(1) fornecedor.
    preciso ao clicar no listbox me retorne o Preço Unitário de cada fornecedor com o mesmo produto e em seguida retornar o fornecedor com o
    menor preço.
    è possível?

    Desde já agradeço!
    Anexos
    [Resolvido]retornar menor preço AttachmentApresentacaoELT.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (369 Kb) Baixado 12 vez(es)
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 6905
    Registrado : 15/03/2013

    [Resolvido]retornar menor preço Empty Re: [Resolvido]retornar menor preço

    Mensagem  ahteixeira em Dom Maio 21, 2017 4:01 am

    Olá Raigley,

    Crie uma consulta, edite no modo SQL ,cole a instrução abaixo e teste:
    Código:
    SELECT Produtos.Produto, First(Produtos.Fabricante) AS PrimeiroDeFabricante, First(Produtos.Fornecedor) AS PrimeiroDeFornecedor, Min(Produtos.PrecoUnit) AS MinDePrecoUnit FROM Produtos GROUP BY Produtos.Produto;

    Nota, está a fazer o agrupamento pela descrição, se algum produto for criado com a descrição mal não vai funcionar.
    O ideal era você ter um campo tipo "codProdutoUnico" em que era repetido nos produtos iguais de vários fornecedores.

    Abraço
    tauron
    tauron
    VIP
    VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1224
    Registrado : 07/12/2011

    [Resolvido]retornar menor preço Empty Re: [Resolvido]retornar menor preço

    Mensagem  tauron em Dom Maio 21, 2017 4:54 am

    Alvaro, eu já havia pensado nisso. Observe que o formulario possui campos para o resultado.
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 6905
    Registrado : 15/03/2013

    [Resolvido]retornar menor preço Empty Re: [Resolvido]retornar menor preço

    Mensagem  ahteixeira em Dom Maio 21, 2017 5:49 am

    Olá Emerson Laranjo,

    Será adicionar no fim do código do evento lstProduto_Click()

    Código:
    txtPrecoMin = DMin("[PrecoUnit]", "Produtos", "[Produto] = '" & Me.lstProduto.Column(1) & "'")
    txtFornEnc = DLookup("[Fornecedor]", "Produtos", "[Produto] = '" & Me.lstProduto.Column(1) & "' AND [PrecoUnit] = " & Replace(CCur(txtPrecoMin), ",", "."))

    Ficamos aguardar retorno do colega.
    Abraço a todos
    tauron
    tauron
    VIP
    VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1224
    Registrado : 07/12/2011

    [Resolvido]retornar menor preço Empty Re: [Resolvido]retornar menor preço

    Mensagem  tauron em Dom Maio 21, 2017 12:17 pm

    Alvaro, aqui funcionou perfeitamente, entao ficamos no aguardo do amigo.
    avatar
    Raigley
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 10
    Registrado : 09/07/2016

    [Resolvido]retornar menor preço Empty Resolvido

    Mensagem  Raigley em Seg Maio 22, 2017 9:43 am

    Boa tarde!

    galera, muito obrigado pela atenção de vocês!

    funcionou perfeitamente, tanto a consulta no modo sql quanto o código no evento click da caixa de listagem.
    agora vou seguir o conselho e fazer com um código único para cada produto.


    resolvidíssimo. Very Happy Very Happy

    assim que terminar posto o bd finalizado.

    abraço!
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 6905
    Registrado : 15/03/2013

    [Resolvido]retornar menor preço Empty Re: [Resolvido]retornar menor preço

    Mensagem  ahteixeira em Sex Jun 02, 2017 4:32 am

    Olá a todos,
    Raigley, obrigado pelo retorno, o fórum agradece.
    Abraço

      Data/hora atual: Ter Out 20, 2020 1:47 pm