[Resolvido]Como fazer um controle de ferias

Olá
Eu de novo,

Estou fazendo um sistema de "Controle de Pessoal" para uma empresa de mais ou menos 100 colaboradores e agora chegou a hora de fazer controle de férias.
No primeiro ano até que é facil fazer os cálculos, o problema são os anos seguintes, e também porque são registrados em meses e anos diferentes.
Tenho no cadastro de funcionários o campo DATAADMISSAO, teoricamente 12 ,meses após, vence a primeira feria, mas legalmente a empresa tem mais 11 meses para liberar o funcionário

A questão: Como usuário saber em determinada quem tem férias vencendo ou vencidas e se já foi ou não retirada.

Por favor quem puderdar um help ou souber de algum link onde possa pesquisar, agradeço

Seria bom ver como você estruturou seu banco de dados.

Olá Scandinavo

Estou postando a parte que trata do controle de ferias, na verdade não sei nem se o que ja fiz esta corrreto

Obrigado

De uma olhada veja se é isto

https://www.dropbox.com/s/7m7lt3lf5keszq8/ControleFerias2.rar?dl=0





Tem uma consulta que vai te mostrar os funcionários com vencimento no mês atual


E tem um código no evento após atualizar do campo data admissão

Substitua o codigo VBA por este (é correto somar os meses do que os dias)



Dim N As Integer ' Numero de vezes que ja retirou ferias
N = DCount("Id", "tblCadastroControleFerias", "Id =" & Me.Parent!Id & "")

If N = 0 Then
Me.DataVencimento = DateAdd("m", 12, Me.DataAdmissãoferias) 'Soma 12 meses a data
Me.Prazolegal = DateAdd("m", 23, Me.DataAdmissãoferias) 'Soma 23 meses a data

Else
Me.DataVencimento = DateAdd("m", 12 * (N + 1), Me.DataAdmissãoferias) 'Soma 12 meses a data
Me.Prazolegal = DateAdd("m", (12 * (N + 1) + 11), Me.DataAdmissãoferias) 'Soma 23 meses a data

End If

Obrigado pela ajuda

Valeu o retorno