Histórico da Página
...
Criado a função TecFerAloc para uso de outros módulos, exemplo SIGAGPE, para atender a necessidade acima.retornar se na data informada está configurado como Feriado e se funcionário tem Agendas nesta data informada.
Card documentos Informacao Para que o GS entenda um feriado precisamos seguir essas etapas: 1 - Cadastrar o feriado na tabela de feriados do GS (rotina TECA790) 2 - Associar esse registro da tabela de feriado ao Local de Atendimento 3 - Esse Local de Atendimento irá gatilhar essa tabela de feriado para o posto de trabalho 4 - Os atendentes que estiverem alocados neste posto de trabalho, respeitaram essas informações Titulo IMPORTANTE!
04. DEMAIS INFORMAÇÕES
Função: TecFerAloc
...
TecFerAloc("01", "000001", StoD("20241125"), @lTemAlocacao)
Parâmetros
Nome | Tipo | Descrição | Default | Obrigatório | Referência |
cFil | Caractere | Filial do Funcionário | x | ||
cMat | Caractere | Matricula do Funcionário | x | ||
dData | Data | Data para avaliar se é feriado e se tem da Agenda | x | ||
lTemAlocacao | Caracter | Se atendente tem Agenda na data (retorno por referência) | .F. | x |
Retorno
Nome | Tipo | Descrição |
lFeriado | lógico | Indica se é Feriado |
Exemplo de uso
Bloco de código | ||
---|---|---|
| ||
Local cFil := "01" Local cMat := "000001" Local dData := StoD("20241125") Local lTemAlocacao := .F. Local lFeriado := .F. lFeriado := TecFerAloc(cFil, cMat, dData, @lTemAlocacao) |
...