MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

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


3 participantes

    [Resolvido]Conflito de Gravacao

    avatar
    fazerbem
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Conflito de Gravacao Empty [Resolvido]Conflito de Gravacao

    Mensagem  fazerbem 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:

    [Resolvido]Conflito de Gravacao Erro13

    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
    toyebom
    toyebom
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Conflito de Gravacao Empty Conflito de Gravacao

    Mensagem  toyebom 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.
    avatar
    fazerbem
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Conflito de Gravacao Empty Re: [Resolvido]Conflito de Gravacao

    Mensagem  fazerbem 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

    avatar
    fazerbem
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Conflito de Gravacao Empty Re: [Resolvido]Conflito de Gravacao

    Mensagem  fazerbem 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
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Conflito de Gravacao Empty Re: [Resolvido]Conflito de Gravacao

    Mensagem  Assis 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 ***
    avatar
    fazerbem
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Conflito de Gravacao Empty Re: [Resolvido]Conflito de Gravacao

    Mensagem  fazerbem 10/8/2018, 18:05

    tentar postar aqui um pouco bz amigao.
    avatar
    fazerbem
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Conflito de Gravacao Empty Re: [Resolvido]Conflito de Gravacao

    Mensagem  fazerbem 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
    [Resolvido]Conflito de Gravacao Attachmentcompras1.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (447 Kb) Baixado 28 vez(es)
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Conflito de Gravacao Empty Re: [Resolvido]Conflito de Gravacao

    Mensagem  Assis 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.


    .................................................................................
    *** Só sei que nada sei ***
    avatar
    fazerbem
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Conflito de Gravacao Empty Re: [Resolvido]Conflito de Gravacao

    Mensagem  fazerbem 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
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Conflito de Gravacao Empty Re: [Resolvido]Conflito de Gravacao

    Mensagem  Assis 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 ***
    avatar
    fazerbem
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Conflito de Gravacao Empty Re: [Resolvido]Conflito de Gravacao

    Mensagem  fazerbem 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
    avatar
    fazerbem
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Conflito de Gravacao Empty Re: [Resolvido]Conflito de Gravacao

    Mensagem  fazerbem 11/8/2018, 17:31

    Assis, deu certo sim, muito grato.

    Abraços.

    Conteúdo patrocinado


    [Resolvido]Conflito de Gravacao Empty Re: [Resolvido]Conflito de Gravacao

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 8/12/2024, 08:32