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


    [Resolvido]Executar consulta atualização após alterar campo

    avatar
    ddoc
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 77
    Registrado : 05/08/2011

    [Resolvido]Executar consulta atualização após alterar campo Empty Executar consulta atualização após alterar campo

    Mensagem  ddoc 24/3/2012, 13:24

    Prezados amigos,

    Tenho o seguinte problema.

    Tenho que controlar os números de lote de produto. Até aí tudo bem. Mas, em virtude das novas variáveis, vou precisar criar três tabelas de número de lote. Explico:

    Produto A - Número de lote individual - Tipo: GL00001/2012
    Produto B - Número do lote individual - Tipo: Fl00001/2012
    Produto C - Número do lote conjunto - Tipo: GFl00001/2012

    Estou criando uma tabela para cada número de lote da seguinte forma:

    CodGL - autonumeração
    NrLote - Campo texto - Size: 20
    Utilizado - Sim/Não


    No formulário Ordem de Produção, vou colocar um campo dropdown para escolher o número de lote. Na consulta que alimentará este dropdown, vou pedir para exibir somente os lotes como Utilizado em Não, impedindo a visualização dos Utilizado em Sim.

    O meu problema está justamente neste momento. Preciso executar uma consulta atualização, no after update, que deverá pegar o número escolhido do lote, que está sendo utilizado neste momento, e alterar o Utilizado da tabela para Sim.

    Tentei fazer uma consulta de atualização pela Macro, mas não deu certo. Alguém tem alguma sugestão em como resolver este evento?

    Obrigado
    avatar
    Convidad
    Convidado


    [Resolvido]Executar consulta atualização após alterar campo Empty Re: [Resolvido]Executar consulta atualização após alterar campo

    Mensagem  Convidad 24/3/2012, 22:49


    Tente:

    CurrentDb.Execute ("Update NomeDaTabela Set Utilizado = -1 where CodGL = Me.NomeDaComboBox;")

    Considerando que a coluna acoplada da combo seja o campo CodGL.
    avatar
    ddoc
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 77
    Registrado : 05/08/2011

    [Resolvido]Executar consulta atualização após alterar campo Empty Re: [Resolvido]Executar consulta atualização após alterar campo

    Mensagem  ddoc 25/3/2012, 22:02

    Prezado Norbs,

    Testei e deu o seguinte erro:

    Erro em tempo de execução 3061: Parâmetros insuficientes. Eram esperados 2.

    Copiei o código postado e colei assim -

    Código:
    Private Sub OPLotePrimarioFiltro_AfterUpdate()
    CurrentDb.Execute ("Update TLoteProdFl Set TLFLutilizado = -1 where CodGL = Me.OPLotePrimarioFiltro;")
    End Sub


    CurrentDb.Execute ("Update NomeDaTabela[TLoteProdFl] Set Utilizado [TLFLutilizado]= -1 where CodGL = Me.NomeDaComboBox [OPLotePrimarioFiltro];")[code]
    avatar
    Convidad
    Convidado


    [Resolvido]Executar consulta atualização após alterar campo Empty Re: [Resolvido]Executar consulta atualização após alterar campo

    Mensagem  Convidad 25/3/2012, 22:24


    CodGL é número ou texto?

    Se for texto, altere:

    CurrentDb.Execute ("Update TLoteProdFl Set TLFLutilizado = -1 where CodGLFabricanteID='" & Me.OPLotePrimarioFiltro & "'"

    Também verifique a propriedade Nome da ComboBox.
    avatar
    ddoc
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 77
    Registrado : 05/08/2011

    [Resolvido]Executar consulta atualização após alterar campo Empty Re: [Resolvido]Executar consulta atualização após alterar campo

    Mensagem  ddoc 25/3/2012, 22:31

    Alterei. Deu certo. Vou ver a estabilidade do código, com alguns lançamentos. Vou testar.

    Vou considerar resolvido. Mas se houver instabilidade, volto a pedir ajuda.
    avatar
    Convidad
    Convidado


    [Resolvido]Executar consulta atualização após alterar campo Empty Re: [Resolvido]Executar consulta atualização após alterar campo

    Mensagem  Convidad 25/3/2012, 22:35


    Ok, estamos aí!

    Gratos pelo retorno!

    Conteúdo patrocinado


    [Resolvido]Executar consulta atualização após alterar campo Empty Re: [Resolvido]Executar consulta atualização após alterar campo

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 2/5/2024, 14:09