inserir campo de tabela Y em tabela X

04/12/2003

0

Oi pessoal, estou trabalhando com tabelas paradox, no delphi 7...
Criei o seguinte banco de dados:

tabela produto
cod
produto
preco

tabela vendas
cod
produtos
qtd
total

O que eu gostaria de fazer é o seguinte no campo produtos da tabela vendas, inserir os produtos (com respectivos precos) q. a pessoa comprou q. estão cadastrados na tabela produto para no final dar o total da venda e imprimir/e/ou gravar para posterior consulta...
Como faço?

Atenciosamente,
Diana


Diana

Diana

Responder

Posts

04/12/2003

Jdasg

O mais fácil é vc fazer um relacionamento entre as duas tabelas via master source.
Porém vc pode pesquisar o produto na tabela de produtos e quando salvar salvar na tabela de vendas. Veja abaixo um modelo simples:
Codigo <Pesquisa em Produto>

Preço <no onenter deste campo > If <Nome da Tabela>.findkey([<codigo do produto> ]) Then
preco := ([<Nome da Tabela><Campo valor do produto>.value ])
.
.
.
Total := qtd*preco

Qq dúvida me mande um email.


Responder

Que tal ter acesso a um e-book gratuito que vai te ajudar muito nesse momento decisivo?

Ver ebook

Recomendado pra quem ainda não iniciou o estudos.

Eu quero
Ver ebook

Recomendado para quem está passando por dificuldades nessa etapa inicial

Eu quero

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar