[Resolvido]Notificação quando produto da venda não possui em estoque

Boa noite,

Estou com um grande problema em um sistema de vendas que estou criando.
Preciso que o formulário Vendas apresente uma mensagem quando o estoque do produto selecionado estiver em 0 e limpe o campo CodBarras do Produto para ser selecionado um novo produto.

É possui visualizar o Estoque da minha BD através de uma consulta chamada "cs_estoque" que tem origem da tabela comprasdet e vendasdet.

Bom dia.
Seja bem vindo ao fórum.
Se onde você escolhe o produto for uma Combo, inclua este código no Ao sair do seu Campo Quantidade:

Código:


If Me.NomeDaSuaCombo.Collumn(2) = 0 Then
  Msgbox"Estoque Menor que a quantidade solicitada.
  Me.CodBarras = Null
Else
  Aqui ele continua com seu código.
End If


No aguardo.

Então Cláudio Machado, ele teria que fazer referencia à minha consulta de Estoque.

Assim que eu chegar em casa vou upar meu BD para você visualizar como ele está, acho que fica mais fácil né.


Mas resumindo, ele possui as seguintes tabelas:

Tbl_Prod
- CodBarras (Chave Primária) - Texto
- Descrição - Texto
- Unidade - Texto
- PrecoCompra - Moeda
- PrecoVenda - Moeda


Tbl_Vendas
- CodVendas (Chave Primária) - Numeração automática
- DataVenda - Data / Hora
- NomeVendedor (Ele tem consulta referencia à minha tabela Vendedor)

Tbl_VendasDet
- CodVendasDet (Chave Primária) - Numeração Automática
- CodVenda (Está Relacionado ao CodVendas da tabela Tbl_Vendas) - Número
- Produto (Ele tem consulta referencia à minha Tabela Produto)
- Quantidade - Número
- ValorUnit - Moeda
- Desconto - Moeda
- Debito - Moeda
- Credito - Moeda
- Dinheiro - Moeda


Para eu saber quantos eu tenho de Estoque, eu criei uma consulta de nome Cs_Estoque e essa consulta foi criada através do item Produto, Quantidade de Venda e Quantidade Compras aonde o mesmo Estoque é a subtração de Quantidade Compras - Quantidade Venda.


Meu formulário de vendas possui a tbl_vendas com o subformulário da tbl_vendasDet, em meu subformulário eu quero que após eu atualizar o campo Produto (é um campo de caixa de combinação que faz referencia à minha tabela produto aonde contem os campos: CodBarras, Produto e PrecoVenda) e assim sim, ele visualizar lá na minha consulta se o produto selecionado possui estoque acima de 0.


Estou iniciando agora, não sei muita coisa. Vi que uma maneira de fazer isso seria através do comando SELECT, porém eu vi que ele faz referencia por tabela e eu não entendi muito bem o que pode ser feito através deste comando.



aaaah, esse banco de dados foi criado através da vídeo aula do Gilberlânio Rocha que vi pelo YouTube

Beleza amigo, fico no aguardo pra poder te ajudar.
Grande abraço.

Segue minha BD.

Ah, estou com outro problemas no formulário. Eu preciso diferenciar vendas por débito, crédito e dinheiro,
Fiz uma alternativa neste BD mas ao testar não deu certo :/

Pessoal, me desculpe caso eu não tenha aberto outro tópico para solicitar este auxilio.

Ops, faltou o anexo rs

Boa tarde.
No form "Frm_VendasDet" aumente a quantidade de colunas do campo produto para 4;
Depois ainda neste na propriedade Largura das colunas altere para: 0cm;2,542cm;0cm;0cm

Em seguida, cole o código abaixo no após atualizar do seu campo produto

Código:


If Me.Produto.Column(3) = 0 Then
    MsgBox "Produto não possui no estoque", vbCritical, "Atenção"
    Me.Undo
Else
  Me.txtValorUnit.Value = Me.Produto.Column(2)
End If


Acho que é isso que deseja.
No aguardo.

Amigo, tentei incluir esse comando, porém ainda não deu certo. Selecionei o produto com estoque zerado, porém ele não emite a mensagem de quem o produto selecionado não possui em estoque

Acredito que o código deve ser colocado no evento após atualizar da quantidade do produto.

Acabei de testar aqui e tbém não deu certo Ney Santos :/

não tbm nao deu ceeto

Segue alterado.
No aguardo.

Cláudio Machado, este deu certo.

Mas acho estranho pq eu fiz exatamente o que falou e o meu não deu certo :s

Isso é normal de acontecer ?
Você apenas incluiu aquele código que mencionou na resposta anterior ?

Exatamente, como havia dito antes.
Talvez, alguma colocação errada, pontuação, nome de campos ou qualquer outra coisa pode causar erros.
Mas se resolveu, isso é o que importa.
Se não tiver mais dúvidas, por favor feche o tópico.
Boa tarde.

Muito Obrigada

Por nada.
O fórum agradece o retorno.
Abraço