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]Como mudar o status por data

    flasbc
    flasbc
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 195
    Registrado : 14/04/2012

    [Resolvido]Como mudar o status por data Empty Como mudar o status por data

    Mensagem  flasbc 6/7/2012, 00:25

    Galera Boa noite!

    Criei uma tabela com os seguintes dados: "Data Atual", "Equipamento", "Modelo", "Patrimônio", "Série", "Próxima Revisão", "Status"

    Ela funciona assim, quando faço uma revisão geral num determinado equipamento, tenho que controlar manualmente para que cada 60 dias ele tenha que passar por uma nova revisão, preciso que o Access calcule a próxima data automaticamente e mude o status também automaticamente de "Em Dia" para "Atrasado" e depois de "atrasado" para "em dia" quando atualizar a data?

    Veja o exemplo seguindo a ordem:
    Data atual: 05/07/2012
    Equipamento: Compressor
    Modelo: ar
    Patrimônio: 01
    Série: 012
    Próxima Revisão: 05/09/2012
    Status: Em dia (até 04/09/2012)
    status: Vence hoje ( em 05/09/2012)
    Status: Atrasado (após 05/07/2012)

    Desde já valeu
    Leandro
    Leandro
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1601
    Registrado : 12/11/2009

    [Resolvido]Como mudar o status por data Empty Re: [Resolvido]Como mudar o status por data

    Mensagem  Leandro 6/7/2012, 11:02

    Isso será mostrado num relatório?

    Você pode colocar um campo não acoplado e montar uma Seimed.

    Seimed([DataRevisão])+60Formato$(Agora();"dd/mm/yyyy");"Atrasado")))

    flasbc
    flasbc
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 195
    Registrado : 14/04/2012

    [Resolvido]Como mudar o status por data Empty Re: [Resolvido]Como mudar o status por data

    Mensagem  flasbc 6/7/2012, 12:18

    Bom dia!
    Não funcionou eu coloquei uma caixa de texto no rodapé copiei o código e aparece "#nome?", só esqueci de avisar meu access é o 2007
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11016
    Registrado : 04/11/2009

    [Resolvido]Como mudar o status por data Empty Re: [Resolvido]Como mudar o status por data

    Mensagem  JPaulo 6/7/2012, 13:20

    Teste numa consulta;
    Código:

    O campo Próxima Revisão: DateSerial(Year([Data atual]);Month([Data atual])+2;Day([Data atual])-1)

    Código:

    O campo Status: IIf(DateSerial(Year([Data atual]);Month([Data atual])+2;Day([Data atual]))<Date();"Atrasado";IIf(Date() Between [Data atual] And DateSerial(Year([Data atual]);Month([Data atual])+2;Day([Data atual])-1);"Em dia";IIf(DateSerial(Year([Data atual]);Month([Data atual])+2;Day([Data atual]))=Date();"Vence hoje")))

    Exemplo:

    Anexos
    [Resolvido]Como mudar o status por data AttachmentFlavio.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (16 Kb) Baixado 66 vez(es)


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Como mudar o status por data Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Como mudar o status por data Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Como mudar o status por data Folder_announce_new Instruções SQL como utilizar...
    Leandro
    Leandro
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1601
    Registrado : 12/11/2009

    [Resolvido]Como mudar o status por data Empty Re: [Resolvido]Como mudar o status por data

    Mensagem  Leandro 6/7/2012, 17:32

    Meu caro, me perdoe eu sigitei hoje pela manhã e net deu pau e com isso saiu essa #$%@##$%$ que você viu aí.

    O que prentedi era:

    Seimed([DataRevisão])+60<Formato$(Agora();"dd/mm/yyyy");"Em dia";Seimed([DataRevisão])+60=Formato$(Agora();"dd/mm/yyyy");"Revisar";Seimed([DataRevisão])+60>Formato$(Agora();"dd/mm/yyyy");"Atrasado")))

    Repondi só para dar satisfação em virtude da resposta sem pé nem cabeça que afereci antes, com certeza o mestre JPaulo já matou a charada.


    flasbc
    flasbc
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 195
    Registrado : 14/04/2012

    [Resolvido]Como mudar o status por data Empty Re: [Resolvido]Como mudar o status por data

    Mensagem  flasbc 6/7/2012, 18:24

    Boa tarde!
    Sim funcionou direitinho agradeço aos colegas JPaulo e Leandro
    cheers cheers

    Conteúdo patrocinado


    [Resolvido]Como mudar o status por data Empty Re: [Resolvido]Como mudar o status por data

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 29/4/2024, 02:03