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]Atualizar Status Com Critérios

    Compartilhe

    lupe
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 426
    Registrado : 15/07/2010

    [Resolvido]Atualizar Status Com Critérios

    Mensagem  lupe em Qui 27 Fev 2014, 15:14

    Olá pessoal!

    Preciso da ajuda de vocês para resolver a seguinte questão:

    Tenho a tabela "tblRomaneio" que alimento através do formulário "frmRomaneio". Neste, eu informo a Safra, Origem, Produto, Talhão e outros dados. Também tenho o campo "Status" que é preenchido com valor padrão "COLHENDO", porém, quando terminar-se a colheita de um determinado talhão eu preciso que ao mudar o status para "CONCLUÍDO" (assim mesmo, em maiúsculo), todos os demais registros referentes a mesma Safra, Origem, Produto e Talhão tenham o campo Status atualizados como "CONCLUÍDO". Ou seja, no ultimo lançamento para um determinado talhão eu mudaria o status para "CONCLUÍDO" e automaticamente os registros anteriores correspondentes ao mesmo talhão, safra, origem e produto também ficassem com o campo "Status" preenchido com "CONCLUÍDO".

    Espero que eu tenha conseguido explicar bem a minha necessidade.

    Certo da atenção do fórum, desde já agradeço.


    .................................................................................
    Dividir conhecimentos é contribuir para a evolução da humanidade.

    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 5889
    Registrado : 05/11/2009

    Re: [Resolvido]Atualizar Status Com Critérios

    Mensagem  Alexandre Neves em Qui 27 Fev 2014, 16:38

    Boa tarde,
    Ao sair do controlo Status, coloque
    if TxtStatus="Concluído" Then Currentdb.execute "UPDATE tblRomaneio SET Status='Concluído' WHERE Safra=" & TxtSafra & " and Origem='" & TxtOrigem & "' and Produto=" & TxtProduto &" and Talhão=" & TxtTalhao


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo

    lupe
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 426
    Registrado : 15/07/2010

    Re: [Resolvido]Atualizar Status Com Critérios

    Mensagem  lupe em Qui 27 Fev 2014, 17:13

    Boa tarde!

    Alexandre, obrigado pela atenção!

    Apresentou o seguinte erro: Erro em tempo de execução '3464'. Tipo de dados incompatível na expressão de critério.


    .................................................................................
    Dividir conhecimentos é contribuir para a evolução da humanidade.

    NADIRONUNES
    Avançado
    Avançado

    Respeito às Regras 100%

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

    Re: [Resolvido]Atualizar Status Com Critérios

    Mensagem  NADIRONUNES em Qui 27 Fev 2014, 17:18

    Tem como vc disponibilizar, poi to precisando de um deste tipo pra fazenda

    lupe
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 426
    Registrado : 15/07/2010

    Re: [Resolvido]Atualizar Status Com Critérios

    Mensagem  lupe em Qui 27 Fev 2014, 17:25

    Olá NADIRONUNES!

    De fato tenho a intenção de disponibilizar no repositório de exemplos este projeto, porém, somente quando estiver finalizado, pois esta em fase inicial.

    Logo que eu concluir o projeto vou anexa-lo com código fonte aberto.


    .................................................................................
    Dividir conhecimentos é contribuir para a evolução da humanidade.

    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 5889
    Registrado : 05/11/2009

    Re: [Resolvido]Atualizar Status Com Critérios

    Mensagem  Alexandre Neves em Qui 27 Fev 2014, 18:33

    Não informou o tipo de dados, por isso, apresentei como julguei.
    Veja o tipo de dados e adeqúe: os dados tipo texto são envolvidos em pelicas, os de tipo numérico não


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo

    lupe
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 426
    Registrado : 15/07/2010

    Re: [Resolvido]Atualizar Status Com Critérios

    Mensagem  lupe em Qui 27 Fev 2014, 19:00

    Alexandre,

    Desculpa, mas acho que não entendi o que quis dizer sobre os tipos de dados. Vou exemplificar:

    Safra = 13/14
    Origem = 1
    Produto = 4
    Talhão = 1
    Status = "COLHENDO" ou "CONCLUÍDO"

    Obrigado!


    .................................................................................
    Dividir conhecimentos é contribuir para a evolução da humanidade.

    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 5889
    Registrado : 05/11/2009

    Re: [Resolvido]Atualizar Status Com Critérios

    Mensagem  Alexandre Neves em Qui 27 Fev 2014, 19:10

    O tipo de dados pode ser número, texto, data, etc.
    Será?
    if TxtStatus="Concluído" Then Currentdb.execute "UPDATE tblRomaneio SET Status='Concluído' WHERE Safra='" & TxtSafra & "' and Origem=" & TxtOrigem & " and Produto=" & TxtProduto &" and Talhão=" & TxtTalhao


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo

    lupe
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 426
    Registrado : 15/07/2010

    Re: [Resolvido]Atualizar Status Com Critérios

    Mensagem  lupe em Qui 27 Fev 2014, 22:18

    Alexandre,

    Funcionou em parte. O código esta efetuando a atualização necessária, porém, ao fechar o formulário esta aparecendo a mensagem em anexo:
    Anexos
    erro-conflito.jpg
    Você não tem permissão para fazer download dos arquivos anexados.
    (22 Kb) Baixado 12 vez(es)


    .................................................................................
    Dividir conhecimentos é contribuir para a evolução da humanidade.

    mathusalmeida
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 263
    Registrado : 30/08/2011

    Re: [Resolvido]Atualizar Status Com Critérios

    Mensagem  mathusalmeida em Sex 28 Fev 2014, 09:18

    Olá lupe
    Com a permissão do mestre Alexandre, experimente na folha de propriedades dos formulários, na guia Dados, na linha Proteções do registro marque a opçãoSem proteção. Veja se resolve.

    Sucesso!

    lupe
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 426
    Registrado : 15/07/2010

    Re: [Resolvido]Atualizar Status Com Critérios

    Mensagem  lupe em Sex 28 Fev 2014, 10:14

    Olá mathusalmeida!

    Muito obrigado pela atenção!

    Fiz conforme sugeriu, porém, não obtive sucesso.

    Abraço!


    .................................................................................
    Dividir conhecimentos é contribuir para a evolução da humanidade.

    lupe
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 426
    Registrado : 15/07/2010

    Re: [Resolvido]Atualizar Status Com Critérios

    Mensagem  lupe em Sex 28 Fev 2014, 20:02

    Pessoal,

    Me desculpe a insistência, mas alguém mais tem alguma sugestão para a solução do problema?

    Obrigado!


    .................................................................................
    Dividir conhecimentos é contribuir para a evolução da humanidade.

    lupe
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 426
    Registrado : 15/07/2010

    Re: [Resolvido]Atualizar Status Com Critérios

    Mensagem  lupe em Sex 28 Fev 2014, 21:38

    Olá pessoal!

    Queimei os 3 últimos neurônios que eu tinha mas consegui achar uma solução para o problema. O que fiz foi muito simples, porém, resolveu.

    Simplesmente inseri a rotina no clicar do botão Salvar do formulário, que já tinha a seguinte linha:

    DoCmd.RunCommand acCmdSaveRecord

    Agradeço ao grande Alexandre Neves e também ao mathusalmeida pela atenção e grande ajuda.

    Obrigado!


    .................................................................................
    Dividir conhecimentos é contribuir para a evolução da humanidade.

      Data/hora atual: Sab 03 Dez 2016, 02:25