[Resolvido]Selecionar para vender

Ola amigos,queria neste bd no form "FrmpontodeVenda" ao clicar duas vezes na list ao lado o produto ja ficasse selecionado para a venda.
Alguém da uma analisada pra mim.
Abçs.


https://dl.dropboxusercontent.com/u/90217826/PDV.rar

No evento ao clicar 2x da lista239 coloque o código

Código:

Me.codbarras = Me.Lista239.Column(1)
codbarras_AfterUpdate


Grande formiga,perfeito,só mais uma lidinha se conseguir,que ta dificil de dar certo,após a venda do produto dar baixa no estoque desse produto.
abç.

Isto após os dois clicks e o produto ir para a lista kaynan?

Isso formiga,antes eu digito a quantidade e depois se eu não souber o código do produto ai eu procuro na list.

Um detalhe no código acima é adicionar um condição à quantidade senão, vai para a lista com quantidade null


If Me.txtQtd = Null Then

Me.txtQtd = 1

End If

Me.codbarras = Me.Lista239.Column(1)
Me.Texto56 = Nz(Me.Texto56) + FormatCurrency(Me.Lista239.Column(3))
codbarras_AfterUpdate

Substitui o código por esse outro mas não deu certo não baixa do estoque,e quando clico 2 vzs na list da erro.

Já já lhe envio o bd dando baixa terminando de responder uns emails aqui.

Pronto meu amigo já está dando baixa no estoque algo mais?

Ps. Ao Excluir um item da lista a quantidade é reposta ao total do estoque.

Link

Não veio formiga.

Seu bd está n Link acima.
Abraço meu amigo.

Formiga,aqui ainda não esta dando baixa,e agora ao efetuar as vendas os valores não aparecem nas caixa texto "código de barras e e total compra",que sera.

Talvez eu tenha lhe enviado o bd antigo segue o link novamente.

Link

Ps. Aqui está tudo ok tanto na parte do estoque quanto na parte do total R$ dos itens adicionados à venda.

Agora sim formiga,mas só da baixa se eu selecionar na list com 2 clik,se colocar direto o código do produto ja não baixa.

Formiga agora não esta mostrando a quantidade dos produtos vendidos na listagem a esquerda.

Fala amigo tudo na paz?
Chegando agora vou ajeitar umas coisas aqui e vejo o bd.
Se diz a quantidade de itens vendidos isto?

Ola formiga,poderia ver porque não aparece a quantidade e o subtotal na listagem a esquerda após a venda.
Abç.

Tranquilo acabar de ajeitar umas coisas aqui e vejo.

Veja como esta formiga...

https://dl.dropboxusercontent.com/u/90217826/PDV1.rar

Kaynan o bd que postou acima não é o mesmo que lhe enviei ele não está fazendo a soma dos produtos vendido. Veja no link acima que postei o bd que está fazendo a soma.

É verdade formiga,agora eu andei dando uma outra mexida neste que to te enviando agora,o problema é que se eu vender com o código direto ele da a baixa da quantidade certa que eu por, mas se eu usar o produto da list clicando 2 vzs ele baixa o dobro da quantidade que coloco.
Faça uma venda clicando 2 vzs no primeiro item da list "Conserto TVC 29...."tem 100 no estoque e veja como diminui.



https://dl.dropboxusercontent.com/u/90217826/TESTEPDV.rar

blz terminar de atender uma pessoa aqui e vejo

Formiga meu amigo,colocando o código da list assim deu certo ta baixando do estoque certinho.

Dim barras As Integer
Me.codbarras = Me.Lista239.Column(1)
codbarras_AfterUpdate
CurrentDb.Execute "Update Tab_Produto Set QuantidadeEstoque = QuantidadeEstoque -(""" & Me.txtQtd & """) Where CódigoBarras ='" & Me.codbarras & "'"

E agora pra colocar um campo com a quantidade do estoque no form de vendas e cada vez que adicionar um produto pra vender aparecer a quantidade neste campo,é possivel.

Segue o bd agora baixando o estoque tanto clicando 2x na lista como inserindo o código

Link

Formiga esse que me enviou ficou muito estranho,pelo menos aqui em meu pc, se eu digito direto o código ele diz que esse produto não existe,se clico 2 vezes na list,aparece varios outros produtos que ja tinham sido digitados,ele não inicia nova venda,só se exclua a venda que fez,ficou doidão.

Fo mal mandei o bd errado kkk to cansado rs pera atender o tel e lhe mando o correto

heheheh vou te pagar umas cervejas pra vc descansar e relaxar um pouco.

E será que é possível colocar um campo com a quantidade do estoque no form de vendas e cada vez que adicionar um produto pra vender aparecer a quantidade neste campo.

Veja ai amigão agora é o bd certo rsrs

Link

Perfeito,perfeito amigo véio muito bom mesmo,amanhã mesmo vou ai te pagar umas cervejas rsrs.
Mas abusando um pouquinho mais da tua inteligência e pra finalizar essa lida,tem como no "rlcupomFiscal" aparecer a quantidade paga e o troco após finalizar a venda.
Depois eu deixo vc descançar rsrs

Foi mau meu amigo estava quebradinho fui dormir rs um dia vamos beber uma cerveja mas a minha é preta rs

Abraço fui trampar

Link

Grande formiga, me resolveu uns problemas que pra mim tava complicado,mais uma vez muito obrigado amigo véio.
Fica com Deus.Valeu mesmo.

De nada meu amigo.

Formiga mais um detalhezinho não sei se é possível, quando eu colocar o código do produto pra efetuar uma venda e clicar enter o produto ficar selecionado na list,assim eu saberia na hora quantos da quele produto tem em estoque entende.
Abç.

Baixei aqui o arquivo do dropbox e estou lhe enviando.
Após atualizar será exibido a quantidade em estoque junto com o nome do produto vendido. Agora resta saber se vc tem alguma rotina já pronta dentro do teu programa para a verificação de estoque mínimo.

Link

Tentei,mas meus neuronios estão todos de férias......

Quando chegar em casa dou uma olhada blz?

Ok amigo.

Veja o link acima Kaynan

É bem isso ai formiga,falta só eu ir ai pra tomar umas cerveja preta rrs
Mais uma vez obrigado amigo.

Tranquilo meu amigo um dia nós bebe umas juntos abraço

Boa noite formiga,aproveitando esse mesmo tópico,ja que é em relação ao mesmo bd.
Como poderíamos fazer para só poder aceitar fazer vendas se o estoque estiver positivo,ou seja acima de zero.
Abç e desculpa ai o encomodo.

Boa noite formiga,aproveitando esse mesmo tópico,ja que é em relação ao mesmo bd.
Como poderíamos fazer para só poder aceitar fazer vendas se o estoque estiver positivo,ou seja acima de zero.
Abç e desculpa ai o encomodo.

Olá kaynan.
faça a busca no estoque baseado no código do produto utilizando a função dlookup e armazenando numa variável e então utiliza uma condição para comparar.

Amigo como seria essa função,confesso tenho bastante dificuldade em códigos,to aprendendo muito com vc.

Baixei vou fazer aqui e lhe envio dai se ve

Ai amigo.

Código:

Dim CodBarrax, StqMin, QuantVenda, QtdEtq As Integer

If Me.txtQtd = "" Then
Me.txtQtd = 1
End If

QuantVenda = Me.txtQtd
CodBarrax = Me.CodBarras
QtdEtq = DLookup("QuantidadeEstoque", "Tab_Produto", "CódigoBarras ='" & CodBarrax & "'")
StqMin = DLookup("EstoqueMinimo", "Tab_Produto", "CódigoBarras ='" & CodBarrax & "'")

If QuantVenda > QtdEtq Then
MsgBox ("Quantidade da Venda Maior que o Estoque Disponível. Verifique! Quantidade Atual no Estoque:  " & QtdEtq & ""), vbExclamation, "Atenção"
CodBarras = ""
txtQtd = ""
CodBarras.SetFocus
Exit Sub
End If


If StqMin <= QuantVenda Or QtdEtq <= StqMin Then

MsgBox ("Estoque Mínimo Atingido. Limite: " & StqMin & " "), vbInformation, "Atenção"

End If


Formiga vc sabe das coisas mesmo,vou guardar esses códigos a oito chaves rsrsrs, ficou perfeito.
Sabe o colega Silvio ta me dando umas dicas no listbox que tem no form de vendas,eu quero que os dados desta lis fique oculto e so apareçam quando eu for fazer uma consulta pra achar o produto a ser vendido,e volte a ficar oculto quando terminar a pequisa entende,mas não ta dando certo,ate fiz ficar oculto maas não consigo que ele volte a ser visualizado quando procuro o produto caixa texto.Sera dificil pra vc ver isso.

Só os dados ou a lista em si?

Os dados só.

Link