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

    Como mover registro para ultimo quando atualizar

    avatar
    Sylvio Gomes Junior
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3
    Registrado : 13/04/2012

    Como mover registro para ultimo quando atualizar Empty Como mover registro para ultimo quando atualizar

    Mensagem  Sylvio Gomes Junior 13/4/2012, 16:58

    Boa tarde a todos.

    Tenho um cliente (Escritório de cobrança) que pediu para adicionar num BD a seguinte situação:

    Cada acesso a um registro e atualização dos dados tornaria este registro o último da lista. Assim desta forma, a não ser que se faça uma consulta, ele será o último a ser acessado fazendo-se com que todos os registros sejam acessados em sequencia num período de um mes aproximadamente conforme calculo do cliente (Tem cerca de 800 registros). Neste BD existe acesso ao Calendário do Outlook e envio automático de e-mails quando atualizado o registro (botão "SALVAR" - salvar registro). Preciso fazer tipo um "rodízio de cobrança". Note que o BD não é indexado.

    Temos o MoveLast e AbsolutePosition

    Não estou familiarizado com estes comando SQL nem sei se funcionará do Access 2010.

    Poderiam me ajudar?

    Agradeço antecipadamente,

    Sylvio Gomes Junior
    le_lo28
    le_lo28
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 233
    Registrado : 13/07/2011

    Como mover registro para ultimo quando atualizar Empty Re: Como mover registro para ultimo quando atualizar

    Mensagem  le_lo28 13/4/2012, 17:42

    Fala ae blz?

    Não ficou claro se vc está trabalhando com formulário acoplados ou desacoplados mas tenta colocar esse código após o código que salva o registro.

    Código:

    DoCmd.GoToRecord , , acLast

    Falow,


    .................................................................................
    Como mover registro para ultimo quando atualizar Assinaturacross
    M@rcelo
    avatar
    Sylvio Gomes Junior
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3
    Registrado : 13/04/2012

    Como mover registro para ultimo quando atualizar Empty Movimentação de registro

    Mensagem  Sylvio Gomes Junior 13/4/2012, 19:24

    Obrigado pela sua resposta mas não é bem isso. Este código me mandou para o último registro. Vou explicar:
    O DB do cliente está ordenado inicialmente por "nome de cliente" sem indexação. Ele quer iniciar um processo de cobrança a partir de segunda feira no qual ele vai acessando sequencialmente os registros, implementando informações e quando for salvar o registro no botão que criei, este registro se tranforme no ultimo e vá para o "next" do DB. (Macro do botão):
    AoOcorreErro
    Ir para Next
    Nome da Macro
    ExecutarComandoMenu
    Comando SalvarRegistro
    Se [Macroerror] <> 0 Então
    CaixadeMensagem
    Mensagem = [Macroerror].[Description]
    AlarmSonoro Sim

    Gostaria de colocar o VBA no Evento "ao sair", este registo para último.

    Já tenho neste evento o seguinte VBA de atualização:

    DoCmd.RunCommand acCmdRefresh

    Seguindo ..... Desta forma os funcionários de cobrança que atualizarão estes registros sempre não correrão o risco de acessar duplamente num período muito curto o mesmo cliente e haverá rotatividade nos registros acessados. É uma forma bem simples de fazer um rodízio entre os funcionários de cobrança independente do valor ou qualquer outro item do cadastro.

    Coloquei uma ação no evento "Sair" mas não funcionou.

    Set Rst=Currentdb.openrecordset("SELECT *") : Rst.movelast

    Pode me ajudar? É um caso atípico.

    Um abraço.

    Sylvio
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    Como mover registro para ultimo quando atualizar Empty Re: Como mover registro para ultimo quando atualizar

    Mensagem  criquio 13/4/2012, 19:30

    Não entendi muito bem a questão, mas não resolveria colocar um campo de nome Acessado por exemplo para marcar com um Sim e filtrar para exibir apenas os registros sem o Sim? Ou, tambem, poderia-se ter uma tabela apenas para guardar a ID do registro acessado e o formulário filtraria os registros para exibir apenas os que não estiverem nessa tabela.


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    avatar
    Sylvio Gomes Junior
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3
    Registrado : 13/04/2012

    Como mover registro para ultimo quando atualizar Empty Re: Como mover registro para ultimo quando atualizar

    Mensagem  Sylvio Gomes Junior 13/4/2012, 19:41

    Na realidade, este é um BD complexo, com acesso a Outllok, E-mail, Internet, SMS, Word, Excel além de várioas outras situações. O cara só quer mandar o registro atualizado para último do BD porque a medida que ele vai acessando os registros, ele vai alimentando o Calendario do Outlook marcando os próximos contatos e desta forma em 2 meses ele já não irá precisar ir por este caminho e terá tudo agendado. Mas ele que iniciar desta forma, sequencial, por nome, 1 por 1. Note que no BD dele tem vários campos de consulta individual por processo, nome, contrato, valor maior e menor que "x", e cada atualização gravando data e hora do acesso, mas o cara quer assim:
    Acessar o registro, atualizar, mandar este cara para o final (nesta hora ele atualiza Agenda, Data e hora, envia e-mail, imprime os dados etc) e ir para o próximo registro. Ex. 1 RG (Alberto ...) atualiza e vai para o final e posiciona no 2 RG (Alvaro ...) etc.

    Sylvio
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    Como mover registro para ultimo quando atualizar Empty Re: Como mover registro para ultimo quando atualizar

    Mensagem  criquio 13/4/2012, 20:02

    Talvez uma classificação por data e hora de atualização em ordem decrescente, seguida da classificação da ID por ordem crescente resolva. Imagine que agora esteja assim:

    ID DATA HORA
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10

    Atualiza o ID 1:

    ID DATA HORA
    2
    3
    4
    5
    6
    7
    8
    9
    10
    1 13/04/2012 16:00

    Atualiza o ID 2

    ID DATA HORA
    3
    4
    5
    6
    7
    8
    9
    10
    1 13/04/2012 16:00
    2 13/04/2012 16:02


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.


    Conteúdo patrocinado


    Como mover registro para ultimo quando atualizar Empty Re: Como mover registro para ultimo quando atualizar

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 7/11/2024, 19:33