[Resolvido]Preço atualiza vendas antigas

Bom Dia, a todos.

Sou iniciante em Access, recentemente consegui através de vídeo aulas e muita dificuldade desenvolver três tabelas com formulários, uma de produtos, clientes e vendas.
Até então funcionando bem se não fosse um pequeno incomodo, toda vez que altero o preço no cadastro de produtos acaba alterando o valor das vendas já finalizadas.
E EU não tenho experiência para resolver este problema e solicitado a todos que puderem me ajudar, se fosse possível da maneira mais simples que puder sem muitos códigos, pois tenho grande dificuldades com códigos.

Outra dificuldade que tenho e em anexar banco para analise neste fórum.

Gratos a todos que puderem me ajudar!!!

Isso está acontecendo porque

Numa venda digamos no caixa , terá que ter duas tabelas

Uma para os dados do caixa como idCaixa, dia, etc..

e outra para os detalhes da venda: idCaixa id produto, descrição, valorUnitario, quantidades , subTotal(ValorUnitario * quantidade

Dessa maneira , quando alterar o valor unitário do estoque, isso não irá refletir na tabela destalhes da venda (produtos ja vendidos).

[ ]'s

Ass.:

Noob

Você consegue me passar detalhes de como devo proceder.
Pois como disse sou bem leigo.

Marcio

Antes, explique como faz as vendas.

Obrigado por seu esforço em me ajudar.
Me passa um email para eu te enviar o BD, seria mais simples.

Não entendi bem a pergunta: escolho o cliente, depois escolho o produto ai ele já mostra o preço ai digito a quantidade.

Boa Tarde.

Tenho três tabelas: vendas, clientes e produtos.
O Problema é que quando altero o preço no cadastro de produtos altera nas vendas já finalizadas.

Alguém??

Maxxi,

Sem conhecer a estrutura de seu banco de dados não dá para resolver. Se possível disponibilize sua base para que possamos entender melhor ou dê mais detalhes sobre.

Abraços,

Dica.
Utilize função vba como dlookup para buscar o valor do produto da tabela produto referente ao produto a ser vendido e ao salvar na tabela detalhevenda utilize a instrução insert para inserir os dados e desfaça "caso esteja relacionado" a propagar atualização dos campos relacionados.

Marcio

Você já tinha aberto outro tópico sobre o mesmo assunto.
E eu já estava respondendo tuas dúvidas.
Não teve paciência de esperar por respostas e abriu outro tópico.
Dessa vez, eu uni os dois tópicos.
Por favor, que isso não venha a se repetir no futuro.

Quanto a estrutura, não da pra fugir da citada por mim na mensagens nº 2

Bom Dia, Uilson Brasil.
E quem mais sentir de ajudar.


Segue link Dropbox
https://www.dropbox.com/s/6czwcyk3ykmi1em/Sistema%20de%20Vendas%20Parte%208.accdb?dl=0

Bom Dia, Formiga10x.

Estou a 30 dias de inicio no Access, nem sei como consegui fazer as três tabelas.
A sua explicação me parece muito boa para quem tem o mínimo de conhecimento.

Segue link, vê o que pode fazer para me ajudar.


Segue link Dropbox
https://www.dropbox.com/s/6czwcyk3ykmi1em/Sistema%20de%20Vendas%20Parte%208.accdb?dl=0

Boa tarde colegas do forum!

Marcio, veja o exemplo que postei na mensagem nº13 do seguinte tópico:

https://www.maximoaccess.com/t22242-resolvidoalteracao-nos-precos-de-uma-tabela

As duvidas são as seguintes:

-vou ter que usar todos estes códigos:

Option Compare Database
Option Explicit
Function Existe_ProdCodi(lngProdCodi As Long) As Boolean

Dim rst As Recordset, frm As Form
Set frm = Forms!frm_Pedido!sfrm_DetalhePedido.Form
'Clone do RecordSet do sub sfrm_DetalhePedido
Set rst = frm.RecordsetClone

'Procura por um produto igual já cadastrado
rst.FindFirst "[ProdCodi] = " & Str(lngProdCodi)
If Not rst.NoMatch Then 'Se existe
frm.Undo 'Cancela a inclusão do registro
'Sincroniza o formulário com o RecordSet
frm.Bookmark = rst.Bookmark
'Insere mais 1 no campo DetQtde
rst.Edit
rst!DetQtde = rst!DetQtde + 1
rst.Update
Existe_ProdCodi = True
Else
Existe_ProdCodi = False
End If

If Not IsNull(frm!cbo_ProdCodi) And frm.NewRecord Then
frm!DetValorUnit = frm!cbo_ProdCodi.Column(2)
End If

End Function

-Não consegui entender, a suas tabelas é parecida com as minhas e porque na minha o preço se altera e na sua mantém, é por causa desses códigos?
Você já olhou o meu exemplo?

Alguém sabe me explicar como finalizar um tópico, como não resolvido.
Obrigado.

Pessoal, Bom Dia.

Gostaria de postar um novo tópico.
Porem como faço para fechar este tópico ou como sei que já esta fechado?
Alguém me ensina como finalizar?

Marcio

Veja bem

Eu vi teu aplicativo e quando vi que nosso amigo Fernando Bueno disponibilizou
um exemplo que por sinal é muito bom, fiquei quieto.

Mas agora vou dizer:

Veja teu aplicativo e compare com o exemplo dado por ele, e verá
que o teu tem várias coisa equivocadas, siga esse exemplo, veja o que tem no
exemplo que o teu não tem e modifique.
De outra maneira, não irá conseguir solucionar o teu problema.

[ ]'s

Entendi.
É que preferi deixar o preço para o cliente digitar manualmente nas vendas, quando tiver com mais tempo eu vou estudar esta parte com bastante cautela.
Agora tenho outras duvidas e preciso posta-las, por isto preciso aprender a finalizar um tópico.
Agradeço a disposição de todos que me ajudaram.

Uma duvida, para abrir um tópico é preciso finalizar o outro mesmo que seja duvidas diferentes, ou pode se abrir mais de um tópico?

Você pode abrir mais de um tópico desde que não seja para a mesma dúvida.

Para "fechar" um tópico, coloque o "resolvido" no título do tópico, mesmo
que na realidade não esteja.
Para fazer isso,  na página onde digita a mensagem , embaixo, do lado direito, acima do botão enviar,
tem o botão Resolvido que deve apertar.

Agradeço a todos pela ajuda.
Vou estudar o Banco do Fernando Bueno, e qualquer novidade eu posto aqui.