MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

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

4 participantes

    [Resolvido]Ao selecionar um produto, inserir no form o fornecedor com menor cotação

    avatar
    Vanderlei
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 219
    Registrado : 20/01/2011

    [Resolvido]Ao selecionar um produto, inserir no form o fornecedor com menor cotação Empty [Resolvido]Ao selecionar um produto, inserir no form o fornecedor com menor cotação

    Mensagem  Vanderlei 6/2/2016, 22:07

    Olá pessoal
    Faz tempo que passei por aqui solucionando minhas duvidas, mas o bom filho a casa volta.

    Estou fazendo manutenção em um sistema de Oticas, já em funcionamento e agora me fizeram uma solicitação quem não estou conseguindo solucionar

    No formulario de cadastro de pedido para confecção da lente do cliente, no campo Lente Solicitada (combo): ao selecionar a lente desejada, o programa inserisse automaticamente em um campo no formulario o fornecedor com menor preço

    Tablente:
    CodLente - autonum - chave,
    Nomelente - texto

    TabLaboratorio:
    CodLab - autonum - chave,
    Codlente - numero
    NomeLab - texto,
    ValorServiço - moeda

    Form: FrmPedidoLente:
    NomeCliente
    DataPedido
    Vendedor
    LenteSolicitada:(selecionar a lente em uma combo), inserir o laboratorio com menor preço no form

    Observação: as Tabelas: Tablente e Tablaboratrio estão relacionadas e a lentes estão cadastradas com os respectivos laboratorios e seus preços, ou seja, para cada lente, terei 3 laboratorios (são sempre os mesmo, só mudando os valores)
    Cláudio Machado
    Cláudio Machado
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1621
    Registrado : 17/03/2011

    [Resolvido]Ao selecionar um produto, inserir no form o fornecedor com menor cotação Empty Re: [Resolvido]Ao selecionar um produto, inserir no form o fornecedor com menor cotação

    Mensagem  Cláudio Machado 11/2/2016, 21:09

    Boa noite.
    Se for trabalhar com 4 campos de Preços utilize este código na consulta:

    MenorValor: fncMenorValor([Lab01];[Lab02];[Lab03];[Lab04])

    Em seguida cole este código em um módulo qualquer ou crie um:

    Public Function fncMenorValor(c1, c2, c3, c4)
    Dim k

    If c1 <= Nz(c2) Then If (c1) <= (c3) Then If c1 <= c4 Then k = Format(c1, "##,##0.00")
    If c2 <= Nz(c1) Then If (c2) <= (c3) Then If c2 <= c4 Then k = Format(c2, "##,##0.00")
    If c3 <= Nz(c1) Then If (c3) <= (c2) Then If c3 <= c4 Then k = Format(c3, "##,##0.00")
    If c4 <= Nz(c1) Then If (c4) <= (c2) Then If c4 <= c3 Then k = Format(c4, "##,##0.00")
    fncMenorValor = k

    End Function


    Agora se for trabalhar com um único campo vindo da tabela. Coloque na consulta no campo Total: Mín

    Espero que ajude.


    .................................................................................
    " Nunca cruze os braços diante de qualquer problema ou dificuldade, pois o maior homem do mundo Jesus,  morreu de braços abertos."

    Agradeça e feche o tópico clicando no botão Resolvido. Se não sabe como, veja  AQUI.
    Não esqueça de clicar no Joinha [Resolvido]Ao selecionar um produto, inserir no form o fornecedor com menor cotação 90dssg para agradecer a dica que solucionou seu problema.
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3743
    Registrado : 04/04/2010

    [Resolvido]Ao selecionar um produto, inserir no form o fornecedor com menor cotação Empty Re: [Resolvido]Ao selecionar um produto, inserir no form o fornecedor com menor cotação

    Mensagem  Avelino Sampaio 12/2/2016, 08:26

    Olá!

    Uma solução neste tópico:

    http://www.redeaccess.com.br/viewtopic.php?f=4&t=537

    Sucesso!


    .................................................................................
    Vídeos, livros, kit MontaRibbons e acesso irrestrito ao site UsandoAcces  
    Clique AQUI e analise o custo beneficio do material oferecido.
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3329
    Registrado : 22/11/2016

    [Resolvido]Ao selecionar um produto, inserir no form o fornecedor com menor cotação Empty Re: [Resolvido]Ao selecionar um produto, inserir no form o fornecedor com menor cotação

    Mensagem  DamascenoJr. 2/11/2021, 13:02

    Vanderlei, conseguiu resolver?

    Aguardamos...


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    avatar
    Vanderlei
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 219
    Registrado : 20/01/2011

    [Resolvido]Ao selecionar um produto, inserir no form o fornecedor com menor cotação Empty Re: [Resolvido]Ao selecionar um produto, inserir no form o fornecedor com menor cotação

    Mensagem  Vanderlei 2/11/2021, 17:41

    resolvido

      Data/hora atual: 29/11/2021, 23:47