Tempo aproximado para leitura: 02 min
Descrição
Ponto de entrada que possibilita incluir dados no array de feriados
Programa Fonte
datavali.prg
Retorno
aFeriados - Array contendo as datas de feriados
Exemplo
user function DatValid()
local aFeriados as array
local cHoje as char
cHoje := DtoS(Date())
//Pega o array de feriados, esse array é criado com base na SX5, tabela 63
aFeriados := PARAMIXB
//Adiciona o dia atual no array de feriados, tornando sempre o dia atual um feriado
if aScan(aFeriados, cHoje) == 0
aAdd(aFeriados, cHoje)
endif
return aFeriados
Observações
O ponto de entrada DATVALID permite a edição do array de feriados, recebendo no PARAMIXB o próprio array. Esse ponto de entrada precisa retornar um array com os feriados que será utilizado no cálculo de dia útil.