MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    INSERT em duas tabelas com dados específicos

    Compartilhe

    itarimit
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 8
    Registrado : 01/06/2017

    INSERT em duas tabelas com dados específicos

    Mensagem  itarimit em Dom 03 Set 2017, 22:25

    Olá.

    Tenho um DB para controlar vendas por tipo de pagamento e clientes que marcam em caderneta, para um restaurante.

    Preciso criar uma função de pagamento que insira na tabela Venda e Vendadetalhe (que estão relacionadas) dados específicos desse pagamento.
    Adicionar um registro, para ser exato, que constará a data atual, a forma de pagamento (dinheiro por exemplo), o nome do cliente, a descrição (pagamento ou recebimento de caderneta) e o valor pago.

    Este é o Form de venda, junto com o SubForm detalhe de venda.
    [Você precisa estar registrado e conectado para ver esta imagem.]

    Seriam basicamente os seguintes dados que preciso:
    Na tabela Venda, a Data = Data(), Forma de Pagamento = (exemplo: Dinheiro) e Cliente = (nome que aparece na consulta, imagem 2).
    Na sub, o Produto = (receberá o nome para identificar, exemplo: "pagamento caderneta"), Quantidade = (Saldo devido) conforme a segunda imagem. Os demais campos serão preenchidos automaticamente.

    [Você precisa estar registrado e conectado para ver esta imagem.]

    Estava testando essa linha de comando:

    CurrentDb.Execute "INSERT INTO venda (data,nome) VALUES ('" & Me.sdata & "','" & Me.snome & "')"

    MsgBox ("Receber pagamento de  " & Me.snome & "!")


    para gravar em uma tabela, funcionou, porém, preciso que grave em duas e que fiquem relacionados.

    Agradeço desde já a atenção.

      Data/hora atual: Ter 19 Set 2017, 12:44