MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Código ao fechar mesa Deleta registros inseridos na tabela.

    Compartilhe

    Lupércio
    VIP
    VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1134
    Registrado : 07/05/2011

    [Resolvido]Código ao fechar mesa Deleta registros inseridos na tabela.

    Mensagem  Lupércio em Dom 21 Set 2014, 13:40

    Bom dia pessoal ninja do Ms Access!

    Estou adaptando esse Bd do Gilberlandio, que está dando um pequeno erro ao fechar as mesas!
    1º - Clico em fechar uma mesa aberta exemplo mesa: 25 fecho ela normal até ai tudo bem.
    Clico em caixa abro o relatório está la a venda da mesa 25, mas quando fecho outra mesa exemplo
    a mesa 22, quando abro o caixa e clico para ver as vendas ele excluiu a venda da mesa 25 e aparece só a ultima venda.
    Necessito da ajuda dos senhores, se puderem ficarei agradecido, abraço a todos.

    Private Sub BtnConcluir_Click()
    If MsgBox("CONCLUIR LANÇAMENTO?", vbYesNo, "") = vbNo Then

    Me.Undo
    Else
    Dim strSQL As String
    strSQL = ("UPDATE TBL_DET_MESA SET SEL_PAG=true WHERE [COD_MESA_DET] = Forms!Frm_Fechar_Mesa!TxtCOD_MESA;")
    DoCmd.RunSQL strSQL
    Me.Refresh
    End If
    DoCmd.Close
    End Sub

    Ele está usando esse código que fecha a mesa acrescenta a venda mais exclui a anterior.
    Anexos
    BD RESTAURANTE.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (2 Mb) Baixado 33 vez(es)


    .................................................................................
    Quando tua dúvida for resolvida, de o retorno de agradecimento á aqueles que gastaram seu tempo para te ajudar.
    Clique no botão “Resolvido” logo acima do botão “Enviar” ao lado direito. Todos nós agradecemos.[Você precisa estar registrado e conectado para ver esta imagem.][Você precisa estar registrado e conectado para ver esta imagem.]

    gilberlanio
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 597
    Registrado : 30/08/2010

    Re: [Resolvido]Código ao fechar mesa Deleta registros inseridos na tabela.

    Mensagem  gilberlanio em Dom 21 Set 2014, 19:21

    Creio que esse erro é porque no Frm_Pgto botão finalizar tem código de impressão automática.
    Entre no evento do botão finalizar procure a linha a baixo e exclua. Depois faça os teste.

    DoCmd.OpenReport "Cupom_Pgto", acViewNormal, "", "", acNormal


    Sucesso.


    .................................................................................
    VIDEO CURSO DE ACCESS - Criando um sistema de vendas

    [Você precisa estar registrado e conectado para ver este link.]

    Loja virtual - Gilberlânio Rocha

    Lupércio
    VIP
    VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1134
    Registrado : 07/05/2011

    Código ao Fechar mesa Deleta registros inseridos na tabela.

    Mensagem  Lupércio em Seg 22 Set 2014, 00:03

    Grande Gilberlandio.
    Abraço amigo, acertou na mosca, tópico resolvido e parabéns pelo bd.


    .................................................................................
    Quando tua dúvida for resolvida, de o retorno de agradecimento á aqueles que gastaram seu tempo para te ajudar.
    Clique no botão “Resolvido” logo acima do botão “Enviar” ao lado direito. Todos nós agradecemos.[Você precisa estar registrado e conectado para ver esta imagem.][Você precisa estar registrado e conectado para ver esta imagem.]

    gilberlanio
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 597
    Registrado : 30/08/2010

    Re: [Resolvido]Código ao fechar mesa Deleta registros inseridos na tabela.

    Mensagem  gilberlanio em Seg 22 Set 2014, 04:01

    Valeu pelo retorno.

    Sucesso.


    .................................................................................
    VIDEO CURSO DE ACCESS - Criando um sistema de vendas

    [Você precisa estar registrado e conectado para ver este link.]

    Loja virtual - Gilberlânio Rocha

      Data/hora atual: Dom 04 Dez 2016, 12:11