Boa noite
Estou criando sistema de vendas em Access 2007 para controle. O banco está em anexo para análise.
Criei uma tabela tbl_CadProdutos e um formulário fml_CadProdutos para o cadastro de produtos com os campos:
ID (Numeração automática)
COD_PRODUTO
DESCRICAO_PRODUTO
NOME_FORNECEDOR (caixa de combinação para buscar os fornecedores na tabela de fornecedores)
Criei uma tabela tbl_CadCompras e um formulário fml_CadCompras, onde eu registro a compra de produtos. No formulário fml_CadCompras, o cabeçalho tem os campos da tabela tbl_CadCompras.
Criei uma tabela tbl_CadComprasDetalhes com os campos dos detalhes da compra, onde eu lanço os produtos. Ela tem:
ID
COD_ME_tbl_CadCompras (para relacionar com ID da tbl_CadCompras)
COD_PRODUTO (caixa de combinação para buscar os códigos dos produtos na tabela de produtos)
DESC_PRODUTO
QUANTIDADE
PRECO_COMPRA
No formulário fml_CadCompras eu criei um subformulário fml_CadComprasDetalhes com os campos da tbl_CadComprasDetalhes.
Até aqui OK, eu crio uma nova compra, e no subformulário eu uso a caixa de combinação para preencher o código do produto.
Mas eu quero que o sistema preencha o campo DESC_PRODUTO no subformulário automaticamente após eu preencher o código. Para isso, no subformulário, campo COD_PRODUTO, eu criei um procedimento do evento AfterUpdate com DLookup para isso, assim:
Me.DESC_PRODUTO = DLookup("[DESCRICAO_PRODUTO]", "[tbl_CadProdutos]", "[COD_PRODUTO]=[COD_PRODUTO]")
Então, quando eu preencho o campo COD_PRODUTO ele busca o DESCRICAO_PRODUTO, mas mesmo eu escolhendo códigos diferente, o sistema traz sempre a descrição do primeiro produto que eu cadastrei. Ele não traz a descrição exatamente de acordo com o código, mas pelo menos está fazendo algo parecido com o que eu desejo.
Muito obrigado.
Enio Eltz Filho.
Estou criando sistema de vendas em Access 2007 para controle. O banco está em anexo para análise.
Criei uma tabela tbl_CadProdutos e um formulário fml_CadProdutos para o cadastro de produtos com os campos:
ID (Numeração automática)
COD_PRODUTO
DESCRICAO_PRODUTO
NOME_FORNECEDOR (caixa de combinação para buscar os fornecedores na tabela de fornecedores)
Criei uma tabela tbl_CadCompras e um formulário fml_CadCompras, onde eu registro a compra de produtos. No formulário fml_CadCompras, o cabeçalho tem os campos da tabela tbl_CadCompras.
Criei uma tabela tbl_CadComprasDetalhes com os campos dos detalhes da compra, onde eu lanço os produtos. Ela tem:
ID
COD_ME_tbl_CadCompras (para relacionar com ID da tbl_CadCompras)
COD_PRODUTO (caixa de combinação para buscar os códigos dos produtos na tabela de produtos)
DESC_PRODUTO
QUANTIDADE
PRECO_COMPRA
No formulário fml_CadCompras eu criei um subformulário fml_CadComprasDetalhes com os campos da tbl_CadComprasDetalhes.
Até aqui OK, eu crio uma nova compra, e no subformulário eu uso a caixa de combinação para preencher o código do produto.
Mas eu quero que o sistema preencha o campo DESC_PRODUTO no subformulário automaticamente após eu preencher o código. Para isso, no subformulário, campo COD_PRODUTO, eu criei um procedimento do evento AfterUpdate com DLookup para isso, assim:
Me.DESC_PRODUTO = DLookup("[DESCRICAO_PRODUTO]", "[tbl_CadProdutos]", "[COD_PRODUTO]=[COD_PRODUTO]")
Então, quando eu preencho o campo COD_PRODUTO ele busca o DESCRICAO_PRODUTO, mas mesmo eu escolhendo códigos diferente, o sistema traz sempre a descrição do primeiro produto que eu cadastrei. Ele não traz a descrição exatamente de acordo com o código, mas pelo menos está fazendo algo parecido com o que eu desejo.
Muito obrigado.
Enio Eltz Filho.
- Anexos
- banco.zip
- Você não tem permissão para fazer download dos arquivos anexados.
- (249 Kb) Baixado 10 vez(es)