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

    [Resolvido]Conflito de Gravacao

    Compartilhe

    fazerbem
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 164
    Registrado : 05/03/2017

    [Resolvido]Conflito de Gravacao

    Mensagem  fazerbem em 9/8/2018, 21:47

    Tenho 2 Formularios A e B, um chama o outro ( B) , espera sua execucao e depois termina, neste caso o (A).

    No Form B eu altero 2 campos da Tabela QNT e Validade
    Ao Terminar e Fechar este Form B, Volta ao Form A e termina sua Execucao. Mas aparece a seguinte Mensagem de Errom:

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

    Nao quero que apareca isso, pelo que entendi o Form B ainda estaria em execucao, mas ao sair do FORM B, eu coloquei um comando pra fechar o Form B.

    Se escolho a pimeira opcao cancelo as alteracoes feitas no FORM B, se escolho a Terceira opcao , mantenho as alteracoes feitas no form B.

    Como fazer pra nao aparecer esta mensagem de conflito ?

    Andre
    avatar
    toyebom
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 1049
    Registrado : 18/07/2012

    Conflito de Gravacao

    Mensagem  toyebom em 9/8/2018, 23:27

    O problema é que não actualizas o registo quando sais de um e vais para outro formulário.
    Pesquisa as funções

    Docmd.refreshrecord
    Me.Require


    .................................................................................
    Gente Simples, fazendo coisas pequenas, em lugares pouco importantes, consegue mudanças extraordinárias.

    fazerbem
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 164
    Registrado : 05/03/2017

    Re: [Resolvido]Conflito de Gravacao

    Mensagem  fazerbem em 10/8/2018, 14:08

    Ola,

    DoCmd.RefreshRecord
    Me.Requery

    Coloquei este no Form B ( que e acionado pelo Form A ), mas deu o mesmo problema

    Nesta linha: DoCmd.OpenForm "A6_Validade_Compras", , , , , acDialog, aciono o Form B
    Apos entrar no Form B a QNT e Validade, este ao fechar volta ao Form A. Este Form A apresenta em QNT a QNT entrada em Form B e puxa tb seu preco de custo, entao se eu alterar seu preco de custo e colocar seu novo preco de custo, aparece esta mensagem.

    Código:

    Private Sub CodigoProduto_AfterUpdate()

     DoCmd.SetWarnings False
    If Forms![Frm_Compras]![Frm_ComprasSub].Form.nomeProduto.Value = "Valor de Frete" Then
    Me.QntCompra = 1
    Me.PrecoCompra.SetFocus
    Exit Sub
    End If

    DoCmd.OpenForm "A3_Menu", acNormal
    Forms![A3_menu].Form.txt_CodBarra.Value = Me.CodigoBarra.Value

      DoCmd.OpenForm "A6_Validade_Compras", , , , , acDialog

    Me.QntCompra.SetFocus
    Me.QntCompra.Value = CDbl(Forms![Frm_Compras].Form.Teste.Value)
    Me.PrecoCompra.SetFocus

    End Sub


    fazerbem
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 164
    Registrado : 05/03/2017

    Re: [Resolvido]Conflito de Gravacao

    Mensagem  fazerbem em 10/8/2018, 16:58

    andei pesquisando aui pelo forum, e encontrei varios relacionados com este tema, mas em nehum consegui solucionar meu problema, Certo que aqui alguem podera me ajudar.

    Andre
    avatar
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3485
    Registrado : 06/11/2009

    Re: [Resolvido]Conflito de Gravacao

    Mensagem  Assis em 10/8/2018, 18:03

    fazerbem

    Quer postar só os formulários em questão e as respetivas tabelas ?

    Aguardo


    .................................................................................
    *** Só sei que nada sei ***

    fazerbem
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 164
    Registrado : 05/03/2017

    Re: [Resolvido]Conflito de Gravacao

    Mensagem  fazerbem em 10/8/2018, 18:05

    tentar postar aqui um pouco bz amigao.

    fazerbem
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 164
    Registrado : 05/03/2017

    Re: [Resolvido]Conflito de Gravacao

    Mensagem  fazerbem em 10/8/2018, 20:32

    Assis: esta no anexo

    1 - Abra o Form Compras, preencha os dados acima.
    2- escolha um dos cod barras, isso abrira o Form A6_Validaes
    3 - Apos este Form aberto, a6_Validade, entre a QNT que sera somada ao Estoque, feito isto adicione a Validade , Depois clicar em Botao OK
    4 - Feito isto o Form A6_Validade se fecha e volta ao Form Compras.

    OBS; Gostaria que ficasse ja focado o Form, pois ele ainda nao esta focado. so depois de clicar nele ele se focara.

    OBS 2 : apos precionar TAB para finalizar esta linha e abrir outra linha , dara a mensagem de erro.

    Quero acabar com ela , e as modificoes feitas em A6-Validade se manterem. E se por acaso eu modificar o valor de custo esta tb ser atendida.

    Grato pela sua ajuda

    Andre
    Anexos
    compras1.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (447 Kb) Baixado 5 vez(es)
    avatar
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3485
    Registrado : 06/11/2009

    Re: [Resolvido]Conflito de Gravacao

    Mensagem  Assis em 11/8/2018, 15:38

    fazerbem

    Fiz o meu melhor, mas atenção não importe estes dados para o seu projeto porque:

    Criei relação entre tabelas que não tinha.

    Alterei a tabela " Tbl_DetalhesCompras " , meti o campo nome do produto e Unidades. A BD ia captar estes valores de outra maneira e por isso criava o conflito de escrita (erro)

    E alterei também o VBA claro

    Teste e retorne.
    Anexos
    comprasAssis.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (876 Kb) Baixado 2 vez(es)


    .................................................................................
    *** Só sei que nada sei ***

    fazerbem
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 164
    Registrado : 05/03/2017

    Re: [Resolvido]Conflito de Gravacao

    Mensagem  fazerbem em 11/8/2018, 15:54

    Ola Assis, testei aqui seu exemplo, vou fuçar agora pra fazer as modificacoes no meu.

    Mas faltou uma coisa, ao fechar o A6_Validade e retornar ao Compras, tenho que clicar no Form pra ativar o mesmo e entao usar o TAB pra pular a linha.

    Tem como ao retorna ao Compras este form ja estar ativado e aoo precionar o TAb, ja que esta focado em cima do valor de custo, ja pular de campo e em seguida pular de linha ?

    Grato

    Andre
    avatar
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3485
    Registrado : 06/11/2009

    Re: [Resolvido]Conflito de Gravacao

    Mensagem  Assis em 11/8/2018, 16:10

    Fazerbem

    No formulário "A6_Validade_Compras"

    Altere no click do Botão Verde

    A ultima linha está assim

    Forms![Frm_Compras]![Frm_ComprasSub].Form.precoCompra.SetFocus

    Altere para

    Forms![Frm_Compras].SetFocus ' meta esta nova
    Forms![Frm_Compras]![Frm_ComprasSub].Form.precoCompra.SetFocus


    .................................................................................
    *** Só sei que nada sei ***

    fazerbem
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 164
    Registrado : 05/03/2017

    Re: [Resolvido]Conflito de Gravacao

    Mensagem  fazerbem em 11/8/2018, 16:27

    Obrigado Assis, mais tarde eu testo sim e volto aqui e te digo e ai fecho o topico.

    Muito Obrigado mesmo amigo.

    Andre

    fazerbem
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 164
    Registrado : 05/03/2017

    Re: [Resolvido]Conflito de Gravacao

    Mensagem  fazerbem em 11/8/2018, 17:31

    Assis, deu certo sim, muito grato.

    Abraços.

      Data/hora atual: 19/8/2018, 08:39