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


2 participantes

    [Resolvido]3 cotações em um form de compras

    avatar
    bernardweger
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 101
    Registrado : 22/12/2014

    [Resolvido]3 cotações em um form de compras Empty [Resolvido]3 cotações em um form de compras

    Mensagem  bernardweger 20/5/2015, 12:59

    Pessoal, Bom dia, estou precisando de uma luz para fazer um formulário de cotação de material.

    Bom, vou tentar explicar o que preciso, eu tenho uma tabela de requisição de materiais onde o meu estoque faz o orçamento, até ai ele funciona perfeitamente.

    Agora eu gostaria de fazer um formulário de compras, aonde eu puxe o que foi solicitado da miha tbl_requisição, agora neste form de compras eu gostaria de fazer 3 cotações, eu tenho uma tabela de cadastro de fornecedores e gostaria de colocar 3 combobox no mesmo formulário, até ai tudo bem também, só que quando eu faço as relações com minha tabela de compras, na tbl de compras eu tenho 3 campos"forn1, forn2 e forn3", nas relações ele cria como Tbl_fornededor,Tbl_fornecedor1, Tbl fornecedor2, pelo menos até a funciona Smile

    agora que na minha opinião vem o mais complicado, eu gostaria que quando eu selecionasse tal fornecedor ele já preenchesse o valor do produto neste fornecedor no meu subformulário.

    por favor, alguem poderia me dar uma luz de como posso fazer isso? sou bem iniciante
    avatar
    Convidado
    Convidado


    [Resolvido]3 cotações em um form de compras Empty Re: [Resolvido]3 cotações em um form de compras

    Mensagem  Convidado 20/5/2015, 13:21

    Boa tarde,

    Para podermos ajudar seria mais fácil postar aqui sua BD (formato .ZIP).
    Caso existe muitos forms e tabelas, queira dizer em que formulário pretende as alterações.

    Abraço... Cool
    avatar
    bernardweger
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 101
    Registrado : 22/12/2014

    [Resolvido]3 cotações em um form de compras Empty Re: [Resolvido]3 cotações em um form de compras

    Mensagem  bernardweger 20/5/2015, 13:29

    Amigo, nunca consigo colocar o zip aqui

    más hospeidei no 4shared
    http://www.4shared.com/rar/Xy60mfq_ce/Sys_Estoque.html?
    http://www.4shared.com/rar/vO4J00B5ce/Sys_Estoque_be.html?

    Você terá que importar as tabelas do estoque_be
    e abra com o shift pois tem um sistema de login.

    Bom, eu não consegui fazer nada ainda, tenho a tbl_requisição que é a requisição feita pelo estoque
    e criei a tbl_compras que forneceria o código da requisição, que também não consegui fazer algo para isto.
    e tbl_forn que forneceria os dados para cada fornecedor da Tbl_compras

    Obrigado
    avatar
    Convidado
    Convidado


    [Resolvido]3 cotações em um form de compras Empty Re: [Resolvido]3 cotações em um form de compras

    Mensagem  Convidado 20/5/2015, 13:36

    Boa tarde,

    Podes enviar pro meu email?

    roberto.cardoso@riopele.pt

    ou....

    https://www.wetransfer.com/
    avatar
    bernardweger
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 101
    Registrado : 22/12/2014

    [Resolvido]3 cotações em um form de compras Empty Re: [Resolvido]3 cotações em um form de compras

    Mensagem  bernardweger 8/6/2015, 21:05

    Amigo, Não Obtive sua resposta, já enviei os dados ao seu e-mail...
    Dilson
    Dilson
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1743
    Registrado : 11/11/2009

    [Resolvido]3 cotações em um form de compras Empty Re: [Resolvido]3 cotações em um form de compras

    Mensagem  Dilson 12/6/2015, 21:40

    Dá uma olhada nesse exemplo anexo:
    https://www.dropbox.com/s/j0np2b5p73z6j8a/Cotacao.rar?dl=0

    Ele foi postado aqui no fórum se não me engano pelo Avelino Sampaio. A estrutura tá fácil de adaptar se for o seu caso.
    avatar
    bernardweger
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 101
    Registrado : 22/12/2014

    [Resolvido]3 cotações em um form de compras Empty Re: [Resolvido]3 cotações em um form de compras

    Mensagem  bernardweger 25/6/2015, 15:07

    Amigo, seria quase isso, só que eu gostaria que tivesse uma caixa de texto que verificasse o fornecedor no form e o prod no sub formulário e me desse o valor do produto

    se quiser posso lhe enviar a BD para que você consiga entender melhor
    Dilson
    Dilson
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1743
    Registrado : 11/11/2009

    [Resolvido]3 cotações em um form de compras Empty Re: [Resolvido]3 cotações em um form de compras

    Mensagem  Dilson 25/6/2015, 16:12

    Posso dá uma olhada sim. No entanto, enviar para um usuário especifico não é a melhor prática.

    Faça assim:

    Use o DropBox www.dropbox.com

    Ou

    https://mega.co.nz/#

    e disponibiliza o link para que qualquer membro do fórum possa auxiliar.

    Aguardamos
    avatar
    bernardweger
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 101
    Registrado : 22/12/2014

    [Resolvido]3 cotações em um form de compras Empty Re: [Resolvido]3 cotações em um form de compras

    Mensagem  bernardweger 25/6/2015, 16:57

    Amigo, segue o link, Dropbox...

    https://www.dropbox.com/s/7462d7kenj9i710/Estoque.accdb?dl=0

    Seria o Frm_compras
    Senha para o usuário marcos(admim):3040
    senha para o usuário estoque:estoque

    Desde já agradeço o seu retorno
    Dilson
    Dilson
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1743
    Registrado : 11/11/2009

    [Resolvido]3 cotações em um form de compras Empty Re: [Resolvido]3 cotações em um form de compras

    Mensagem  Dilson 25/6/2015, 17:58

    Está bem confuso a normalização aqui.

    Você citou que quer que autopreencha valores de produtos por fornecedor. A pergunta é:

    Dá onde, de qual tabela esses valores serão puxados ?

    avatar
    bernardweger
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 101
    Registrado : 22/12/2014

    [Resolvido]3 cotações em um form de compras Empty Re: [Resolvido]3 cotações em um form de compras

    Mensagem  bernardweger 25/6/2015, 18:08

    Tem uma tabela chamada Tbl_ValorProd/Forn, nesta tabela eu lançaria o fornecedor, o produto e valor

    se houvesse também uma forma de eu conseguir lançar no formulário de compras, ficaria melhor.
    Dilson
    Dilson
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1743
    Registrado : 11/11/2009

    [Resolvido]3 cotações em um form de compras Empty Re: [Resolvido]3 cotações em um form de compras

    Mensagem  Dilson 25/6/2015, 18:29

    Humm! já tá melhorando o entendimento.

    Então você que ir buscar os valores correspondentes de codproduto da Tbl_requisiçãoDet que alimenta parcialmente o subformulários compras e com referencia a esse codproduto ir buscar valores na tabela Tbl_ValorProd/Forn referenciando codprod considerando também o fornecedor selecionado na combobox em que fornecedor 1 liga a forn 1 e assim sucessivamente.

    é assim ?
    avatar
    bernardweger
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 101
    Registrado : 22/12/2014

    [Resolvido]3 cotações em um form de compras Empty Re: [Resolvido]3 cotações em um form de compras

    Mensagem  bernardweger 25/6/2015, 18:38

    Sim amigo, seria exatamente isso
    Dilson
    Dilson
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1743
    Registrado : 11/11/2009

    [Resolvido]3 cotações em um form de compras Empty Re: [Resolvido]3 cotações em um form de compras

    Mensagem  Dilson 25/6/2015, 18:54

    OK. entendido.

    Há solução, no entanto não poderei lhe construir o código nesse momento, pois tenho que ir na roça agora.

    Façamos assim, amanhã irei lhe mostrar uma saída, daí você testa e analisa.

    Adiantando para atiçar sua imaginação, a solução teoricamente é a seguinte:

    Após selecionar o fornecedor, você guarda em variáveis o n° da requisição e o n° do fornecedor. Daí você faz um loop na tabela que alimenta o sub form sobre os registros iguais ao n° da requisição; A cada passada de registro, você vai lá na tabela que contém os preços e consulta se há preço coincidente ao código do fornecedor e código de produto. Se for coincidente, você preenche, se não for passa a frente.

    Bom, se tentar e não conseguir amanhã lhe trago um código.

    Até!


    Última edição por Dilson em 25/6/2015, 18:57, editado 1 vez(es)
    avatar
    bernardweger
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 101
    Registrado : 22/12/2014

    [Resolvido]3 cotações em um form de compras Empty Re: [Resolvido]3 cotações em um form de compras

    Mensagem  bernardweger 25/6/2015, 18:56

    Tudo bem amigo, muito obrigado

    amanhã eu dou um up informando se consegui ou não
    Dilson
    Dilson
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1743
    Registrado : 11/11/2009

    [Resolvido]3 cotações em um form de compras Empty Re: [Resolvido]3 cotações em um form de compras

    Mensagem  Dilson 26/6/2015, 17:32

    Abra o VBA do formulário e copie e cole a Sub PreencheCotacao:

    Private Sub PreencheCotacao(argComboForn As String, argCampoForn As String)
    Dim rsX As DAO.Recordset
    Dim sqlX As String
    Dim valorX As Currency
    sqlX = "SELECT * FROM Tbl_requisiçãoDet WHERE CodVendas=" & CodRequisição
    Set rsX = CurrentDb.OpenRecordset(sqlX)
    rsX.MoveLast
    rsX.MoveFirst
      If rsX.RecordCount > 0 Then
         Do While Not rsX.EOF
            valorX = Nz(DLookup("[Valor Unitário]", "Tbl_ValorProd/Forn", "" _
            & "CodForn = Forms!Frm_compras!" & argComboForn & " AND CodProd =" & rsX!CodProdutos))
            rsX.Edit
                rsX("" & argCampoForn & "") = valorX
            rsX.Update
            rsX.MoveNext
         Loop
         Me.Frm_comprassub.Requery
      End If
    rsX.Close
    Set rsX = Nothing
    'Sub Criada em 26/06/2015 por Dilson - Fórum MaximoAccess
    'Objetivo: Autotransportar e preencher valores de cotação
             'da tabela Tbl_ValorProd/Forn para Tbl_requisiçãoDet
    End Sub


    Modo de uso:
    Call PreencheCotacao(NomeDoControle, NomeDoCampo)

    Simplificando: Depois que colar a Sub em qualquer lugar do VBA do Form, bastará ir no evento Após Atualizar das combforn1, 2 e 3 e colocar:
    ->combforn1:
    Call PreencheCotacao(Me.combforn1.Name, "Forn1")

    ->combforn2:
    Call PreencheCotacao(Me.combforn2.Name, "Forn2")

    ->combforn3:
    Call PreencheCotacao(Me.combforn3.Name, "Forn3")

    Pronto. Rode e veja o autopreenchimento.

    Aguardamos o resultado, aperte Resolvido se resolver.
    avatar
    bernardweger
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 101
    Registrado : 22/12/2014

    [Resolvido]3 cotações em um form de compras Empty Re: [Resolvido]3 cotações em um form de compras

    Mensagem  bernardweger 26/6/2015, 19:31

    Amigo, Muito Obrigado, funcionou perfeitamente, não sei nem como lhe agradecer!

    Fique com Deus e que ele te abençoe
    Dilson
    Dilson
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1743
    Registrado : 11/11/2009

    [Resolvido]3 cotações em um form de compras Empty Re: [Resolvido]3 cotações em um form de compras

    Mensagem  Dilson 26/6/2015, 19:56

    Fique (tranquilis), já tá agradecido. Disponha.

    Só uma ressalva: Evite usar nomes de campos separados e com acentos como é o caso do "Valor Unitário" e o uso de caracteres especiais como a barra no nome de tabela. Dê uma pesquisada sobre normalização de tabelas envolvendo entidades e atributos.

    Abraço!

    Conteúdo patrocinado


    [Resolvido]3 cotações em um form de compras Empty Re: [Resolvido]3 cotações em um form de compras

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 28/4/2024, 08:17