[Resolvido]Atualizar Estoque quantidades de pesos com vírgula

oi pessoal,

Estou com um problema de baixa de estoque com peso onde a pessoa precisa baixar por exemplo 1k e 200 gramas.

Porque quando digito inteiros normal, o estoque é baixado normalmente mas ao quebrar os valores dá problema (Erro Depuração).

na quantidade digito 1,200 e dá erros de depuração.

Quantidade de 1,255 kg????

Podem me ajudar por favor?

Grato

Campos

Segue anexo modelo para teste.

Bom dia Campos, qual erro acontece?
Cite um passo a passo para que eu possa reproduzir aqui.

Cumprimentos.

HARYSOHN como vai!

Então já tinha dado por esquecido este tópico pois não obtive nenhuma resposta, até que você se diponibilizou.

Grato!


Então, ao digitar quantidades como 2,560
da erro na depuração porque não consegue atualizar quebrado.

Se lançar na quantidade 1,2,3,4,5,6,10,100,200,238,456 sem vírgula normal, mas digitou 1,250(Um quilo duzentos e cinquenta gramas), por exemplo, não consegue atualizar.
Parece ser uma série de fatores;

Mas já configurei na tabela pra decimais, dentro do textbox e nada, até no código mas não consegui êxito.

está dando erro na linha update, segue o arquivo.


Dê uma olhada neste simples exemplo,

Grato,


Campos.

Na consulta UPDATE faça a substitua a virgula por ponto...

Suponha que o valor esteja em uma caixa texto: txtExemplo

CurrentDb.Execute "UPDATE tblXXXX Set SeuCampo = " & txtExemplo & ""


Utilize o replace para corrigir:


CurrentDb.Execute "UPDATE tblXXXX Set SeuCampo = " & Replace(txtExemplo,",",".") & ""


Cumprimentos.

Bom dia HARYSOHN,

fico grato pela sua disposição,

vou estar testando, logo retorno,

Campos.

HARYSOHN bom dia!

fiz os testes mas ainda nada, continua o enigma.

Estou deixando o arquivo modelo(Não é o programa), se quiser dar uma olhada?

Cite um exemplo de como inserir uma entrada para que eu reproduza aqui.

Cumprimentos.

Bom dia HARYSOHN!!

Estou te passando um exemplo simples de como acontece o erro.

Quando abrir o arquivo já estará no formulário do erro,

Siga as flechas de orientação, não é necessário você fazer todo cadastro, somente digite o nome do produto e no subformulário abaixo digite primeiro uma quantidade inteira para adicionar o estoque depois digite decimais nas linhas debaixo no mesmo campo(Qtde)

Grato pela disposição,


Campos.

Boa tsrde Campos, converta em 2007 ou 2003 por gentileza.

Cumprimentos.

Bom dia HARYSOHN!
 
 
Aí vai em versão 2003, ok
 
Um abraço.
 
Campos.

Está colocando o Replace no campo errado, eis o correto:

CurrentDb.Execute "update [lista de produtos] set ESTOQUE = ESTOQUE+" & Replace(Me.Qtde, ",", ".") & " where cadprod=" & Me.cadprod.Value & ""

Cumprimentos.

HARYSOHN, como vai,


Olha, passou desapercebido mesmo este detalhe.

fixei muito na questão das vírgulas e pontos, bem observado em mestre!

Agora tá redondo,

Mais uma vez fico muito grato pela força.


Campos.

O Fórum agradece o Retorno.

HARYSOHN, como vai,

Não sei se é contra regra,

Estou com um probleminha no tópico relatório,

Dá pra dar uma olhada por favor?


https://www.maximoaccess.com/t24659-organizar-aba-detalhes-do-relatorio

Grato,

Campos.