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


    [Resolvido]Ajuda com Controle de estoque

    avatar
    socgyn
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 118
    Registrado : 01/05/2013

    [Resolvido]Ajuda com Controle de estoque Empty [Resolvido]Ajuda com Controle de estoque

    Mensagem  socgyn 11/4/2014, 07:32

    Boa Noite, antes de mais nada, já tentei a adequação de vários códigos e exemplos deste fórum; como não obtive êxito, venho mais uma vezes solicitar ajuda.

    Vejamos tenho um controle de estoque no qual gostaria de restringir a saída caso não tenha saldo suficiente. Outro ponto: gostaria que no formulário EntProd e SaiProd, em suas respectivas caixa de texto colocadas acima puxasse o saldo de estoque.


    Criei uma consulta a qual mostra a descrição as entradas, saídas e Estoque. Não consigo puxar a informação do estoque para os formulários mencionados;
    Referente a saldo negativo, como disse antes tentei adequar os códigos aqui postados e não consegui.

    Caso possam me ajudar segue o banco anexo;
    Anexos
    [Resolvido]Ajuda com Controle de estoque AttachmentContEstoque.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (1.4 Mb) Baixado 98 vez(es)
    avatar
    Convidado
    Convidado


    [Resolvido]Ajuda com Controle de estoque Empty Re: [Resolvido]Ajuda com Controle de estoque

    Mensagem  Convidado 11/4/2014, 14:02

    Olá, qual o formulário que desejas fazer a restrição se não tiver estoque suficiente, é o formulário SaiProd?
    avatar
    socgyn
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 118
    Registrado : 01/05/2013

    [Resolvido]Ajuda com Controle de estoque Empty Ajuda com Controle de estoque

    Mensagem  socgyn 11/4/2014, 14:21

    Bom dia, Exatamente, quando for utilizar o formulário saiProd e o item selecionado para saída for 0 (zero) ou menor que o saldo atual, não permitir tal situação. Através de alguma mensagem informando que o saldo é insuficiente. Ah, outra questão que notei agora pouco é que quando lanço a entrada de um item pelo form EntProd, a consulta csProd não mostra o valor lançado, só aparece quando dou baixa em algum valor do mesmo item. ex entrada pneu 4, no csprod (consulta) não aparece o saldo, só aparece se eu fizer uma saída. Ex. entrada pneu 4 saída 2. aí ele faz o calculo e aparece o estoque no csProd.

    Se é um item que já tem algum saldo e lança mais uma entrada, também não aparece o total, aparece só o que já estava. Só faz o cálculo se eu fizer alguma saída pelo form saiProd. Aí ele atualiza.


    Desde já agradeço pela força
    avatar
    Convidado
    Convidado


    [Resolvido]Ajuda com Controle de estoque Empty Re: [Resolvido]Ajuda com Controle de estoque

    Mensagem  Convidado 11/4/2014, 15:14

    Primeira coisa que tens a fazer é mudar a consulta csProd, ela deve mostrar todos os produtos mesmo que tenha estoque zero ou negativo para poder fazer a restrição no formulário, entra no modo SQL dessa consulta, apaga todo o conteúdo atual e cola isso:
    SELECT Produtos.CodP, Produtos.DescP, IIf(IsNull([CodP]),0,DSum("[QTDE]","Entradas","[CodP]=" & [CodP])) AS Entrada, IIf(IsNull([CodP]),0,DSum("[QTDE]","Saídas","[CodP]=" & [CodP])) AS Saida, Nz([Entrada])-Nz([Saida]) AS Estoque
    FROM Produtos
    GROUP BY Produtos.CodP, Produtos.DescP
    ORDER BY Produtos.DescP;

    no formulário SaiProd para mostrar o estoque atual coloca no evento após atualizar da combo "Combinação30" isso:
    Me.Texto55 = DLookup("[Estoque]", "csProd", "[CodP] =" & Me.Texto20)

    E para fazer a restrição da quantidade, coloca no evento antes de atualizar do campo Qtde isso:
    Dim strResposta As String
     If Me.Qtde > DLookup("[Estoque]", "csProd", "[CodP] =" & Me.Texto20) Then
                 
       strResposta = MsgBox("Produto com estoque insuficiente " & " = " & DLookup("[Estoque]", _
       "csProd", "[CodP] =" & Me.Texto20) & " " & "Unidade(s)" & vbCrLf & "Deseja dar baixa assim mesmo?", _
       vbYesNo + vbCritical, "Alerta")
       If strResposta = vbNo Then
       Me.Undo
       Cancel = True
       End If
         
     End If
     Exit Sub
    avatar
    socgyn
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 118
    Registrado : 01/05/2013

    [Resolvido]Ajuda com Controle de estoque Empty Ajuda com Controle de estoque

    Mensagem  socgyn 11/4/2014, 19:18

    Boa tarde, grato pela força.
    Algumas coisa funcionaram, a consulta csProd ficou perfeito, Sai o saldo correto. Já o formulário
    SaiProd - não. Fiz Conforme explicado, na hora que vou executar uma nova saída e clico na combo para
    selecionar o produto sai a mensagem :

    Erro em tempo de execução 3075
    Erro de sintaxe (operador faltando) na expressão de consulta '[CodP]='
    avatar
    Convidado
    Convidado


    [Resolvido]Ajuda com Controle de estoque Empty Re: [Resolvido]Ajuda com Controle de estoque

    Mensagem  Convidado 11/4/2014, 20:05

    Amigo, me desculpa, mas vc não fez como eu instrui a fazer não, se tivesse feito não daria nenhum erro, baixa o exemplo e faz o teste. A restrição é quando fores digitar a quantidade na saída, se o estoque for insuficiente vai disparar a msg te dando as opções de sim para dar baixa mesmo sem estoque e não para não dar baixa.
    avatar
    socgyn
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 118
    Registrado : 01/05/2013

    [Resolvido]Ajuda com Controle de estoque Empty Ajuda com Controle de estoque

    Mensagem  socgyn 11/4/2014, 20:24

    Muito obrigado pela ajuda, ficou perfeito. Cada dia vou aprendendo graças a boa vontade de todos deste site. Espero poder contribuir com os conhecimentos já adquiridos e ajudar a outros também.

    Sandro
    Goiânia Go
    avatar
    Convidado
    Convidado


    [Resolvido]Ajuda com Controle de estoque Empty Re: [Resolvido]Ajuda com Controle de estoque

    Mensagem  Convidado 11/4/2014, 20:42

    Ok, Saudações do fórum pelo retorno e fechamento do tópico

    Conteúdo patrocinado


    [Resolvido]Ajuda com Controle de estoque Empty Re: [Resolvido]Ajuda com Controle de estoque

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 7/11/2024, 21:43