Função: DataValida - Verifica data válida no sistema
Função que retorna uma data válida, a partir de uma data qualquer informada
DataValida - Verifica data válida no sistema ( [ dData], [ lTipo] ) --> dData
| Nome | Tipo | Descrição | Obrigatório | Referência |
| dData | Data | Data para iniciar o cálculo da função | ||
| lTipo | Lógico | - Se .T. posterga a data recebida para o próximo dia últil - Se .F. retrocede a data recebida para o dia últil anterior. |
-
dData(data)
- Data válida do sistema.
A função irá considerar as datas encontradas na tabela 63 do SX5 (Tabela de Feriados), os sábados (caso o parâmetro MV_SABFERI seja igual a "S") e os domingos como sendo feriados, retornando assim a próxima data válida.
#include "protheus.ch"User Function DataValida()Local dData := CTOD("14/11/09")Local lNext := .T. Local dNewData := DataValida(dData, lNext) ApMsgAlert("Proxima data válida será: "+ Dtoc(dNewData)+ ' - ' +DiaExtenso(dNewData))Return
Microsiga Protheus 8.11
,
Protheus 10
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas