[Resolvido]Problema Com Estoque

Boa Noite Pessoal

Estou tendo um probleminha com o meu Banco de Vendas que é o seguinte.

Exemplo: Dou entrada em uma mercadoria no dia 21/02/2015
             Depois entro com a mesma mercadoria no dia 22/02/2015
Dai o sistema não esta somando as quantidades, e além de não somar e não me deixar vender o novo iten, me volta com mensagem de erro dizendo que não tenho estoque suficiente, sendo que estou visualizando o estoque.
Observação: A entrada destes itens não sei se tem alguma coisa haver, mais elas são feitas por um arquivo excel.

Segue abaixo o Link do Banco.
Sistema de Vendas GRX

Desde já agradeço pela ajuda.

Ora viva
Com um pouco de calma pesquise aqui no forum exemplos de actualizacao com excel, ha muitos

Boa Noite

Fui orientando e rever todos os posts referentes a Estoque que tem por aqui para saber se por um acaso encontro algum exemplo relacionado ao meu problema.
Bom infelizmente não encontrei nenhum. Nada que pudesse me ajudar a solucionar o mesmo.
Se por um acaso tiver alguém que possa me orientar, me dar um direcionamento ficarei muito grato.

O fórum tem me ajudado bastante em minhas pesquisas, tudo que consegui montar até agora foi com a ajuda de vocês.
Então só tenho a agradecer e continuar buscando mais conhecimento.



Ratificando o Tópico com mais informações pertinentes ao meu questionamento.

O meu caso é o seguinte.

O meu Estoque por
Exemplo:

CodMercadoria: 159

Data da entrada
21/02/2015

Entrada Saída Estoque
21/02/2015

Havia estoque até ai blz, porém quando eu dou entrada com a mercadoria do mesmo código o sistema entra com ela porém não me deixa vender, pois diz que o saldo é insuficiente. Sem falar que quando vou tirar relatório ele não esta somando os itens. se eu colocar o item em um pedido de venda que eu dei entrada nele por duas vezes o sistema lança ele duas vezes para o cliente.

O código que estou usando para quantidade de estoque é o seguinte.

Código:

Option Compare Database


Private Sub txtQtd_BeforeUpdate(Cancel As Integer)
    Dim i As Integer
    If IsNull(Me!txtIdProd) Then    'Para evitar conflitos, verifico se o produto foi informado
        MsgBox "Produto não informado!", vbExclamation, "Falta dados"    'Caso não tenha sido informado, desfaça as ações
        Me.Undo
        Cancel = True
    Else    'Se o produto estiver informado corretamente
        i = DLookup("Estoque", "cs_Estoque", "codProduto=" & Me!txtIdProd)    'Guardo a quantidade atual do estoque do produto na variável i

        If i < Me!txtQtd Then    'Verifico se a quantidade do estoque é menor que a informada na compra
            'Informo que não há estoque suficiente com detalhes
            MsgBox "Não é possível realizar a venda desse produto na quantidade especificada." _
                & vbNewLine & "Quantidade atual em estoque: " & i & "" & vbNewLine & "Quantidade informada para " _
                & "venda: " & Me!txtQtd & "" & vbNewLine & "Diferença: " & Me!txtQtd - i & "", vbExclamation, "Estoque insuficiente!"
            Me.Undo    'Desfaço as alterações
            Cancel = True    'cancela a atualização do registro
        End If
    End If
    Me.ValorUnit = Nz(Me.PrecoVenda)
End Sub

Segue em anexo o meu Banco para quem puder de uma olhadinha e veja o que eu fiz de errado.
Banco de Dados
Desde já agradeço pela ajuda e compreensão de todos.

Olá Deison, veja exemplos abaixo:
http://maximoaccess.forumeiros.com/search?search_keywords=estoque&sid=&q=&domains=maximoaccess.forumeiros.com&sitesearch=maximoaccess.forumeiros.com&client=&forid=1&channel=3119321536&ie=utf-8&oe=utf-8&hl=pt&cof=GALT%3A%23166187%3BGL%3A1%3BDIV%3A%23ffffff%3BVLC%3A%23344455%3BAH%3Acenter%3BBGC%3A%23f7f7f7%3BLBGC%3A%23ffffff%3BALC%3A%23166187%3BLC%3A%23166187%3BT%3A%23222222%3BGFNT%3A%23166187%3BGIMP%3A%23166187%3BFORID%3A11&search_terms=any&search_author=&search_where=f7&search_time=0&show_results=topics&sort_by=0&sort_dir=DESC&google=

Em especial este:
http://maximoaccess.forumeiros.com/t3197-cadastro-de-produtos-e-alteracao-no-estoque?highlight=estoque

Abraço

Bom Dia

Não encontrei exemplo pertinente a minha dúvida ou questionamento.



eu já havia baixado todos estes exemplos.
não sei como chegar ao que foi feito.

Olá Dilson, veja este http://maximoaccess.forumeiros.com/t17492-sistema-completo-de-estoque?highlight=estoque
Está muito simples e agradável.
Nota password do ADMIN é 321
Abraço

Bom Dia

Graças a Deus eu consegui.

O erro estava em minhas consultas de entrada é saída, pois eu estava colocando a data na consulta.
Quando eu tirei a data ele funcionou, tanto para as vendas quanto para os relatórios para o cliente.

Muito obrigado!

Olá Deison, ainda bem que conseguiu!
Obrigado pelo retorno, qualquer coisa cá estamos.
Abraço