Boa tarde,
Sou novo aqui e inesperiente no acces,
Preciso da ajuda de vocês na seguinte questão, fiz um BD para controlar a alocação ou Lotação dos funcionários da Empresa onde trabalho.
Mas no formulário em faço a movimentação do pessoal, tenho um subformulário onde lançamos a movimentação de posto de trabalho.....e nesse sub tenho vários dados com:
Cód do Posto, Descrição do Posto, Matricula do funcionário, Status nos Posto(Ativo e Inativo).
A questão é a seguinte, preciso que quando o usuário lançar uma movimentação o sistema reconheça se o funcionário já está ativo em outro posto e preciso que ele não permita isso, mas quando for inativo ele pode repetir.
Usando a função Dcount fiz isso.:
Private Sub Status_AfterUpdate()
If DCount("[Matricula] & [Status]", "tb_lotacao", "Matricula & Status = '" & Me! Matricula & Status & "'") > 0 Then
MsgBox "O Funcionário já está Ativo em outro Posto."
Me.Undo
Cancel = True
End If
End Sub
O problema é que ele impede a inclusão dos Inativos também e preciso que ele não repita só os Ativos...tem que ter somente 1 Ativo por funcionário.
Obrigado
Sou novo aqui e inesperiente no acces,
Preciso da ajuda de vocês na seguinte questão, fiz um BD para controlar a alocação ou Lotação dos funcionários da Empresa onde trabalho.
Mas no formulário em faço a movimentação do pessoal, tenho um subformulário onde lançamos a movimentação de posto de trabalho.....e nesse sub tenho vários dados com:
Cód do Posto, Descrição do Posto, Matricula do funcionário, Status nos Posto(Ativo e Inativo).
A questão é a seguinte, preciso que quando o usuário lançar uma movimentação o sistema reconheça se o funcionário já está ativo em outro posto e preciso que ele não permita isso, mas quando for inativo ele pode repetir.
Usando a função Dcount fiz isso.:
Private Sub Status_AfterUpdate()
If DCount("[Matricula] & [Status]", "tb_lotacao", "Matricula & Status = '" & Me! Matricula & Status & "'") > 0 Then
MsgBox "O Funcionário já está Ativo em outro Posto."
Me.Undo
Cancel = True
End If
End Sub
O problema é que ele impede a inclusão dos Inativos também e preciso que ele não repita só os Ativos...tem que ter somente 1 Ativo por funcionário.
Obrigado