01. DADOS GERAIS

Produto:

Linha de Produto:

Segmento:

Módulo:

SIGATEC

Função:

TECXFUNB

País:Brasil
Ticket:Não há.
Requisito/Story/Issue (informe o requisito relacionado) :DSERSGS-20494


02. SITUAÇÃO/REQUISITO

Necessidade de nova funcionalidade para permitir informar Filial, Matrícula e Data e retornar se na data informada está configurado como Feriado e se funcionário tem Agendas nesta data informada. 

03. SOLUÇÃO

Criado a função TecFerAloc para uso de outros módulos, exemplo SIGAGPE, para atender a necessidade acima.


Descrição

Retorna se é feriado e se Funcionario/Atendente tem agenda na data


Sintaxe

TecFerAloc("01", "000001", StoD("20241125"), @lTemAlocacao)


Parâmetros

NomeTipoDescriçãoDefaultObrigatórioReferência
cFilCaractereFilial do Funcionário
x
cMatCaractere

Matricula do Funcionário


x
dDataData

Data para avaliar se é feriado e se tem da Agenda


x
lTemAlocacaoCaracterSe atendente tem Agenda na data (retorno por referência).F.
x


Retorno

NomeTipoDescrição
lFeriadológicoIndica se é Feriado 


Exemplo de uso

Local cFil := "01"
Local cMat := "000001"
Local dData := StoD("20241125")
Local lTemAlocacao := .F.
Local lFeriado  := .F.

lFeriado := TecFerAloc(cFil, cMat, dData, @lTemAlocacao)


04. DEMAIS INFORMAÇÕES

Não há.

05. ASSUNTOS RELACIONADOS