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


3 participantes

    [Resolvido]Ajuda com o DLookup para verificar saldo em estoque

    avatar
    lpdias
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 177
    Registrado : 11/01/2016

    [Resolvido]Ajuda com o DLookup para verificar saldo em estoque Empty [Resolvido]Ajuda com o DLookup para verificar saldo em estoque

    Mensagem  lpdias 17/9/2023, 21:15

    Boa tarde prezados,

    Estou adaptando algumas funções em um sistema de entradas e saídas e neste momento estou tendo problemas com a função DLookup, pois ela não está obedecendo os parâmetros.

    Segue abaixo:


    Private Sub txtQtde_BeforeUpdate(Cancel As Integer)
    Dim varestoque As Integer
    varestoque = DLookup("[estoque]", "CsestoqueLoja", "[txtCodProduto]= " & Me![txtCodProduto] & "")

    If txtQtde.Value > varestoque Then
    MsgBox ("Estoque insuficiente. Estoque atual desse produto: " & varestoque & ""), vbInformation, "Estoque de insuficiente"
    DoCmd.CancelEvent
    End If



    End Sub


    Csestoque é uma consulta que dá o saldo no campo [estoque]
    txtcodproduto é o id do produto que estou selecionando e esperando comparar o saldo.


    O que tem acontecido é que ele deixa eu passar do campo qtde mesmo que eu coloque um valor cujo saldo não exista.
    Ele está apontando sempre o saldo do primeiro produto na lista da consulta.

    Gostaria de ajuda para saber onde estou errando.

    Obrigado
    Cláudio Machado
    Cláudio Machado
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Ajuda com o DLookup para verificar saldo em estoque Empty Re: [Resolvido]Ajuda com o DLookup para verificar saldo em estoque

    Mensagem  Cláudio Machado 18/9/2023, 13:46

    Bom dia.

    Vamos por partes:

    Esse campo txtCodProduto é numérico?

    Se for, tente assim:

    Código:


    varestoque = DLookup("estoque", "CsestoqueLoja", "txtCodProduto= " & txtCodProduto)



    Aqui pra ele não passar de campo, experimente:

    Código:


    If txtQtde.Value > varestoque Then
    MsgBox ("Estoque insuficiente. Estoque atual desse produto: " & varestoque & ""), vbInformation, "Estoque insuficiente"
    Me.txtQtde.SetFocus
    Me.txtQtde = 0
    End If


    Qualquer coisa, poste esta parte do seu sistema pra gente analisar, fica mais fácil.



    .................................................................................
    " 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]Ajuda com o DLookup para verificar saldo em estoque 90dssg para agradecer a dica que solucionou seu problema.
    avatar
    lpdias
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 177
    Registrado : 11/01/2016

    [Resolvido]Ajuda com o DLookup para verificar saldo em estoque Empty Re: [Resolvido]Ajuda com o DLookup para verificar saldo em estoque

    Mensagem  lpdias 18/9/2023, 17:37

    Boa tarde Cláudio!

    O campo é texto curto.
    Cláudio Machado
    Cláudio Machado
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Ajuda com o DLookup para verificar saldo em estoque Empty Re: [Resolvido]Ajuda com o DLookup para verificar saldo em estoque

    Mensagem  Cláudio Machado 18/9/2023, 17:58

    Boa tarde.

    Então veja esse tópico.

    Vai te ajudar, porquê você está usando errado o DLookUp


    https://www.maximoaccess.com/t1533-funcao-dlookup-explicacao#91427



    .................................................................................
    " 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]Ajuda com o DLookup para verificar saldo em estoque 90dssg para agradecer a dica que solucionou seu problema.
    avatar
    lpdias
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 177
    Registrado : 11/01/2016

    [Resolvido]Ajuda com o DLookup para verificar saldo em estoque Empty Re: [Resolvido]Ajuda com o DLookup para verificar saldo em estoque

    Mensagem  lpdias 18/9/2023, 19:18

    Claudio, tentei achar a solução pelo link, mas infelizmente algo ainda passa batido.
    Estou enviando o arquivo para analise, pois tenho certeza que de olhar você vai achar o erro.
    Infelizmente ainda não possuo tanto conhecimento para esse analise.

    Agradeço e estarei tentando em paralelo.
    Anexos
    [Resolvido]Ajuda com o DLookup para verificar saldo em estoque AttachmentCompraVenda.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (388 Kb) Baixado 25 vez(es)
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3947
    Registrado : 21/04/2011

    [Resolvido]Ajuda com o DLookup para verificar saldo em estoque Empty Re: [Resolvido]Ajuda com o DLookup para verificar saldo em estoque

    Mensagem  Marcelo David 19/9/2023, 19:09

    Olá pessoal!
    Baixei o arquivo e fiz uns testes e deu tudo certo.
    (Ou eu não entendi o problema)

    [Resolvido]Ajuda com o DLookup para verificar saldo em estoque Estoqu10


    .................................................................................
    [Resolvido]Ajuda com o DLookup para verificar saldo em estoque Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]Ajuda com o DLookup para verificar saldo em estoque Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]Ajuda com o DLookup para verificar saldo em estoque Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]Ajuda com o DLookup para verificar saldo em estoque Marcel11
    avatar
    lpdias
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 177
    Registrado : 11/01/2016

    [Resolvido]Ajuda com o DLookup para verificar saldo em estoque Empty Re: [Resolvido]Ajuda com o DLookup para verificar saldo em estoque

    Mensagem  lpdias 19/9/2023, 20:34

    Boa tarde Marcelo!

    Agradeço desde já o tempo em poder me ajudar.

    Então... o que está acontecendo é que o Dlookup está gravando na variavel "varestoque" sempre o primeiro item do formulário de produtos.
    A ceveja neste caso tem 1.000 unidades em estoque, mas tirar 501 bloqueia porque está referenciando o saldo do refrigerante que é de 500.

    O amigo Cláudio Machado indicou algum problema no filtro do Dlookup, mas eu li e não consegui entender como fazer.
    O campo de [codproduto] é texto e me parece que o filtro está para números pq em outro sistema que peguei de exemplo é número.

    Resumindo... me parece que o problema está no filtro da linha do dlookup.
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3947
    Registrado : 21/04/2011

    [Resolvido]Ajuda com o DLookup para verificar saldo em estoque Empty Re: [Resolvido]Ajuda com o DLookup para verificar saldo em estoque

    Mensagem  Marcelo David 20/9/2023, 00:02

    Ah, fiz uns teste aqui e descobri o erro.

    Seu Dlookup:
    DLookup("[estoque]", "CsestoqueLoja", "txtCodProduto = '" & Form_FormVendas!txtCodProduto & "'")
    "txtCodProduto = '" & Form_FormVendas!txtCodProduto & "'"

    Você está comparando o campo txtCodProduto com txtCodProduto. Enquanto que deverá comparar CodProd com txtCodProduto.

    Seu Dlookup deve estar assim:

    DLookup("[estoque]", "CsestoqueLoja", "CodProd = '" & Me.txtCodProduto & "'")

    Obs.: Form_FormVendas!txtCodProduto não é necessário já que está no próprio formulário. Basta fazer
    assim: Me.txtCodProduto

    Teste por favor.


    .................................................................................
    [Resolvido]Ajuda com o DLookup para verificar saldo em estoque Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]Ajuda com o DLookup para verificar saldo em estoque Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]Ajuda com o DLookup para verificar saldo em estoque Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]Ajuda com o DLookup para verificar saldo em estoque Marcel11
    avatar
    lpdias
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 177
    Registrado : 11/01/2016

    [Resolvido]Ajuda com o DLookup para verificar saldo em estoque Empty Re: [Resolvido]Ajuda com o DLookup para verificar saldo em estoque

    Mensagem  lpdias 20/9/2023, 00:10

    Boa noite Marcelo,

    Deu certo! Very Happy

    Eu já estava endoidando de tanto trocar aspas e demais sinais de lugar.
    Agradeço imensamente a ajuda que me deu.

    Forte abraço

    Marcelo David gosta desta mensagem

    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3947
    Registrado : 21/04/2011

    [Resolvido]Ajuda com o DLookup para verificar saldo em estoque Empty Re: [Resolvido]Ajuda com o DLookup para verificar saldo em estoque

    Mensagem  Marcelo David 20/9/2023, 00:53

    Que ótimo que deu certo!
    Não deixe de ver o artigo sobre Dlookup que @Cláudio Machado
    indicou. Se já leu, releia para entender bem os conceitos do Dlookup. Smile

    Gratos pelo retorno.


    .................................................................................
    [Resolvido]Ajuda com o DLookup para verificar saldo em estoque Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]Ajuda com o DLookup para verificar saldo em estoque Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]Ajuda com o DLookup para verificar saldo em estoque Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]Ajuda com o DLookup para verificar saldo em estoque Marcel11

    Conteúdo patrocinado


    [Resolvido]Ajuda com o DLookup para verificar saldo em estoque Empty Re: [Resolvido]Ajuda com o DLookup para verificar saldo em estoque

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 21/11/2024, 19:20