MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

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

    Ajuda em formulário de entrada e saída de férias

    avatar
    rmjsantos
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 84
    Registrado : 31/10/2014

    Ajuda em formulário de entrada e saída de férias Empty Ajuda em formulário de entrada e saída de férias

    Mensagem  rmjsantos em 22/2/2020, 09:29

    Olá a todos,

    Venho perante vós a solicitar a vossa ajuda numa situação que não estou a solucionar e que provavelmente até possa ser fácil, mas não estou a conseguir.
    Também pedir a vossa opinião sobre a base de dados que estou a fazer.
    Então é assim:
    Estou a fazer uma base dados para introduzir as férias dos colaboradores do organismo onde trabalho a que têm direito.
    Tenho um formulário de entrada de férias (f_EntradaFeriasNii), onde introduzo as férias de cada colaborador a que tem direito.
    Aqui deparo-me com um problema.
    Em vez de introduzir para cada colaborador os dias a que tem direito, não haverá forma de automaticamente (código vba) assim que passe de ano cada colaborador automaticamente fique com novos dias a que tem direito.

    Ex: O António a 1/1/2019 tem direito a 22 dias de férias; 2 dias por antiguidade no serviço; 1 dia por idade (a partir dos 40 anos de idade)
    O mesmo António a 1/1/2020 tem direito a 22 dias de férias; 2 dias por antiguidade no serviço; 1 dia por idade (a partir dos 40 anos de idade) e assim sucessivamente para cada colaborador.
    Sendo que cada colaborador tem direita a:
    22 dias de férias por cada ano
    1 dia de antiguidade por cada 10 anos de serviço no organismo
    1 dia de idade a partir dos 40 anos idade(inclusive), de 10 em 10 anos.


    Depois tenho outro formulário onde o colaborador pede os dias de férias, mas o que está a acontecer é que quando o número de dias é superior ao que tem direito por gozar ele fica depois com dias negativos e pretendo que ele não deixe introduzir o numero que pretende e envie mensagem a dizer que não tem direito a tantos dias.

    Finalmente tenho um outro formulário (fFeriasPorGozar) em como faço para aparecer o total de dias do corrente ano (ex: ano 2020).

    Peço a vossa ajuda.
    Obrigado.
    Um grande abraço a todos.

    Anexo base dados.
    Anexos
    Ajuda em formulário de entrada e saída de férias AttachmentFerias.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (162 Kb) Baixado 5 vez(es)
    avatar
    Clebergyn
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 747
    Registrado : 29/08/2012

    Ajuda em formulário de entrada e saída de férias Empty Re: Ajuda em formulário de entrada e saída de férias

    Mensagem  Clebergyn em 22/2/2020, 20:13

    Olá rmjsantos

    Segue ai em anexo para ver se ajuda

    A função é mais ou menos assim:
    Código:

    Function calculoferias(codfun, dtatual)

    Dim dtr As Date, dtn As Date, qta, qtt, diasqtdtrab, diasqtdidade, TotalFerias
    'qta = idade do empregaodo  qtt = anos trabalhado
    dtr = Nz(DLookup("[DataRamo]", "t_Colaboradores", "[Nii] like '" & codfun & "'"))
    dtn = Nz(DLookup("[DataNascimento]", "t_Colaboradores", "[Nii] like '" & codfun & "'"))
    qtt = DateDiff("yyyy", CDate(dtr), dtatual)
    qta = DateDiff("yyyy", CDate(dtn), dtatual)
    diasqtdtrab = Int(qtt / 10):
    If qta >= 40 Then
    diasqtdidade = Int((qta - 40) / 10) + 1
    Else
    diasqtdidade = 0
    End If
    TotalFerias = 22 + diasqtdtrab + diasqtdidade
    calculoferias = TotalFerias
    End Function

    Execute ela assim:
    Código:
    Qtd Férias =  calculoferias([Nii], [Data das férias])
    imagem
    Bons estudos!
    Anexos
    Ajuda em formulário de entrada e saída de férias AttachmentFerias.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (229 Kb) Baixado 8 vez(es)
    avatar
    rmjsantos
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 84
    Registrado : 31/10/2014

    Ajuda em formulário de entrada e saída de férias Empty Re: Ajuda em formulário de entrada e saída de férias

    Mensagem  rmjsantos em 23/2/2020, 00:32

    Clebergyn
    Agradeço muito a sua ajuda na resposta que deu, mas o que pretendia mesmo era, se possível, aparecer numa caixa de texto o valor das férias do ano actual, sem ter de actualizar com o botão.

    Ex:

    Total de dias de Férias ano 2020: 25
    Total de dias de Férias gozados: 10
    Total de dias de Férias por Gozar: 15

    Depois, se tem como, ao introduzir o número de dias de férias que o colaborador pretende, se o número for maior ao que tem direito, ou seja, se o número for maior ao numero de férias por gozar, envie mensagem a dizer que não tem direito a tantos dias.
    Isto no formulário f_SaidaFeriasNii.

    avatar
    Clebergyn
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 747
    Registrado : 29/08/2012

    Ajuda em formulário de entrada e saída de férias Empty Re: Ajuda em formulário de entrada e saída de férias

    Mensagem  Clebergyn em 23/2/2020, 18:03

    Então

    fiz ai no anexo, veja se ficou bom

    vai no formulário pedido de ferias e teste la, só implementei lá

    agora foi o anexo

    veja a figura
    Anexos
    Ajuda em formulário de entrada e saída de férias AttachmentFerias.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (186 Kb) Baixado 5 vez(es)


    Última edição por Clebergyn em 24/2/2020, 16:40, editado 1 vez(es)
    avatar
    Clebergyn
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 747
    Registrado : 29/08/2012

    Ajuda em formulário de entrada e saída de férias Empty Re: Ajuda em formulário de entrada e saída de férias

    Mensagem  Clebergyn em 24/2/2020, 16:25

    Atualizei o ultimo anexo, de uma olhada
    avatar
    rmjsantos
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 84
    Registrado : 31/10/2014

    Ajuda em formulário de entrada e saída de férias Empty Re: Ajuda em formulário de entrada e saída de férias

    Mensagem  rmjsantos em 24/2/2020, 19:59

    Olá Clebergyn
    Desculpe a demora para responder.
    Já vi as modificações que fez e é essa a ideia.
    Apenas um senão, assim que se inicia o registo do pedido de férias, a cx de texto Férias Gozadas fica com o erro #Erro e sas Férias a Gozar com o erro #Tipo!, mas assim que se insere o nº de dias de férias a pedir faz o calculo e fica bem.
    Dá para não aparecer o erro assim que se inicia o registo?

    Dá para em cada pedido de férias, ficar o registo das férias a gozar?
    Exemplo:
    10/01/2020 pede 4 dias de férias tem 25 dias-4 dias que vai pedir fica com 21 dias de férias a gozar
    17/02/2020 pede 6 dias de férias tem 21 dias-6 dias que vai pedir fica com 15 dias de férias a gozar, e assim sucessivamente.

    O que acontece é que está afazer bem o cálculo mas altera todos os registos anteriores, e se fosse possível, pretendia a cada registo ficasse o nº de dias gozados de cada pedido. É possível?

    Depois outra situação, no caso de se pedir um nº superior de férias a que se tem direito, a seguir à mensagem do nº máximo de férias, dá pra assim que se fecha a mensagem ter o foco nos dias a pedir?

    E sem querer abusar da sua boa vontade, que desde já lhe agradeço muito a sua ajuda, dá para adicionar uma outra caixa de texto com Férias acumuladas, caso o colaborador não goze todas as suas férias do ano respectivo e transporte para o ano seguinte, ou seja:

    Exemplo:

    Ano 2019
    Total de férias do ano 2019: 25
    Total de férias gozadas: 12
    Férias a Gozar:13

    No ano de 2020
    Total de férias do ano 2020: 25
    Férias a Gozar:38
    Férias acumuladas: 13


    Obrigado.
    Grande abraço.

    avatar
    rmjsantos
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 84
    Registrado : 31/10/2014

    Ajuda em formulário de entrada e saída de férias Empty Re: Ajuda em formulário de entrada e saída de férias

    Mensagem  rmjsantos em 25/2/2020, 20:08

    Clebergyn

    Já consegui colocar o foco no campo dias a pedir.

    Não consegui foi tirar o erro (#Erro) e (#Tipo!) no campo Férias Gozadas e Férias a Gozar assim que se insere a data do pedido de férias.

    Dá para ajudar?
    avatar
    Clebergyn
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 747
    Registrado : 29/08/2012

    Ajuda em formulário de entrada e saída de férias Empty Re: Ajuda em formulário de entrada e saída de férias

    Mensagem  Clebergyn em 26/2/2020, 12:55

    Ok, estou fazendo aqui, mas vai demorar um pouquinho
    avatar
    rmjsantos
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 84
    Registrado : 31/10/2014

    Ajuda em formulário de entrada e saída de férias Empty Re: Ajuda em formulário de entrada e saída de férias

    Mensagem  rmjsantos em 26/2/2020, 20:15

    Ok Clebergym
    Muitíssimo obrigado.
    Ficarei a aguardar.
    avatar
    Clebergyn
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 747
    Registrado : 29/08/2012

    Ajuda em formulário de entrada e saída de férias Empty Re: Ajuda em formulário de entrada e saída de férias

    Mensagem  Clebergyn em 28/2/2020, 00:34

    Está ai em anexo

    veja se ficou bom

    bons estudos!
    Anexos
    Ajuda em formulário de entrada e saída de férias AttachmentFerias.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (614 Kb) Baixado 9 vez(es)
    avatar
    rmjsantos
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 84
    Registrado : 31/10/2014

    Ajuda em formulário de entrada e saída de férias Empty Re: Ajuda em formulário de entrada e saída de férias

    Mensagem  rmjsantos em 29/2/2020, 23:25

    Obrigado Clebergyn
    Vou testar e depois dou feedback.
    Grande abraço
    avatar
    Clebergyn
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 747
    Registrado : 29/08/2012

    Ajuda em formulário de entrada e saída de férias Empty Re: Ajuda em formulário de entrada e saída de férias

    Mensagem  Clebergyn em 10/3/2020, 07:25

    Olá Rui Santos

    se precisar de mais coisas, pode entrar em contato

    que fazemos

    um abraço e bons estudos
    Anexos
    Ajuda em formulário de entrada e saída de férias AttachmentFerias.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (603 Kb) Baixado 2 vez(es)
    avatar
    Clebergyn
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 747
    Registrado : 29/08/2012

    Ajuda em formulário de entrada e saída de férias Empty Re: Ajuda em formulário de entrada e saída de férias

    Mensagem  Clebergyn em 11/3/2020, 07:36

    Troque o outro por este

    Corrigi erros
    Anexos
    Ajuda em formulário de entrada e saída de férias AttachmentFerias.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (635 Kb) Baixado 9 vez(es)

      Data/hora atual: 18/9/2020, 14:46