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


2 participantes

    [Resolvido]Faltas Consecutivas de funcionarios

    alcspip
    alcspip
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Mensagens : 29
    Registrado : 23/09/2010

    [Resolvido]Faltas Consecutivas de funcionarios Empty Faltas Consecutivas de funcionarios

    Mensagem  alcspip 18/8/2013, 15:39

    Bom dia, amigos, preciso de uma ajuda.

    Estou ajudando um pessoal na empresa e preciso de uma função que identifique 5 faltas consecutivas de uma tabela de Ponto.
    Se existir alguém com 5 faltas “Consecutivas” , fazer um AddNew em uma outra tabela só para identificar o cod do funcionário, teria que filtrar tambem o campo da tabela Ponto “Motivo_Falta”  = Não abonada.
    Pois o Objetivo é Listar todos com 5 faltas em sequencia que tenha Falta Não Abonada.
    Entendo que deverá ser inicialmente feita uma classificação crescente do cod do funcionário e depois da Data do ponto.

    Coloquei aqui o BD.

    Desde já agradeço.
    Anexos
    [Resolvido]Faltas Consecutivas de funcionarios AttachmentFaltas_consecutivas.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (15 Kb) Baixado 24 vez(es)
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Faltas Consecutivas de funcionarios Empty Re: [Resolvido]Faltas Consecutivas de funcionarios

    Mensagem  Alexandre Neves 18/8/2013, 22:43

    Boa noite,
    SELECT DISTINCT Cod_Fun, dta_ponto AS Dia1, Dia5
    FROM (SELECT cod_fun, dta_ponto, (SELECT dta_ponto from tbl_ponto as t2 WHERE Motivo_falta='não abonada' and t2.cod_fun=tbl_ponto.cod_fun and t2.dta_ponto=dateadd('d',1,tbl_ponto.dta_ponto)) AS Dia2, (SELECT dta_ponto from tbl_ponto as t3 WHERE Motivo_falta='não abonada' and t3.cod_fun=tbl_ponto.cod_fun and t3.dta_ponto=dateadd('d',2,tbl_ponto.dta_ponto)) AS Dia3, (SELECT dta_ponto from tbl_ponto as t4 WHERE Motivo_falta='não abonada' and t4.cod_fun=tbl_ponto.cod_fun and t4.dta_ponto=dateadd('d',3,tbl_ponto.dta_ponto)) AS Dia4, (SELECT dta_ponto from tbl_ponto as t5 WHERE Motivo_falta='não abonada' and t5.cod_fun=tbl_ponto.cod_fun and t5.dta_ponto=dateadd('d',4,tbl_ponto.dta_ponto)) AS Dia5 FROM tbl_ponto WHERE Motivo_falta='não abonada') WHERE Not IsNull(Dia2) AND Not IsNull(Dia3) AND Not IsNull(Dia4) AND Not IsNull(Dia5);


    .................................................................................
    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
    alcspip
    alcspip
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Mensagens : 29
    Registrado : 23/09/2010

    [Resolvido]Faltas Consecutivas de funcionarios Empty Re: [Resolvido]Faltas Consecutivas de funcionarios

    Mensagem  alcspip 18/8/2013, 23:38

    Alexandre Neves, boa Noite !!!

    Fico muito feliz pela sua ajuda. Era isso mesmo que precisava. Deu certo e já estou estudando o seu código. nunca pensei que daria pra fazer direto no modulo sql desse jeito. Você e todos daqui são feras !!! É como o ditado diz vivendo e aprendendo.

    Muito Obrigado. !

    Conteúdo patrocinado


    [Resolvido]Faltas Consecutivas de funcionarios Empty Re: [Resolvido]Faltas Consecutivas de funcionarios

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 8/11/2024, 10:39