DateNoWorkDay

 

Descrição

Quantidade de Dias não uteis entre duas Datas

Sintaxe

DateNoWorkDay( <dDate01>, <dDate02>, <lSabado>, <lDomingo>, <lFeriado> )

Parâmetros

ParNomeTipoDescriçãoDefaultObgRef
01dDate01DateData InicialX
02dDate02DateData FinalX
03lSabadoBooleanConsidera Sábado.T.
04lDomingoBooleanConsidera Domingo.T.
05lFeriadoBooleanConsidera Feriado.T.

Retorno

RetornoTipoDescrição
nDiasNuméricoDias não Uteis

Exemplo

User Function NoWorkDay()
Local dDate01	:= FirstDate( Date() )
Local dDate02	:= LastDate( Date() )

MsgInfo( 'Valor 01: ' + cValtoChar( dDate01 ) ;
	+ CRLF + 'Valor 02: ' + cValtoChar( dDate02 ) ;
	+ CRLF + 'Retorno: ' + cValtoChar( DateNoWorkDay( dDate01, dDate02 ) ), 'UniversoADVPL' )

Return( Nil )

Resultado

DateNoWorkDay - Resultado

DateNoWorkDay – Resultado

Informação Adicional

0 respostas

Deixe uma resposta

Want to join the discussion?
Feel free to contribute!

Deixe uma resposta

O seu endereço de e-mail não será publicado. Campos obrigatórios são marcados com *