ASSINE A NEWSLETTER

Cadastrando...

PIX uDesenv

DateNoWorkDay

Autor: Eurai Criado: 01/01/2016 Atualizado: 24/07/2021

Descrição

Quantidade de Dias não uteis entre duas Datas.

Sintaxe

DateNoWorkDay( , , , , )

Parâmetros

Par	Nome	Tipo	Descrição	Default	Obg	Ref
01	dDate01	Date	Data Inicial		X
02	dDate02	Date	Data Final		X
03	lSabado	Boolean	Considera Sábado	.T.
04	lDomingo	Boolean	Considera Domingo	.T.
05	lFeriado	Boolean	Considera Feriado	.T.

Retorno

Retorno	Tipo	Descrição
nRet	Numérico	Dias não Uteis

Exemplo

#INCLUDE "TOTVS.CH"

 
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_01

Informações adicionais

Gostou? Compartilhe com seus amigos e deixe um comentário! 😎

Facebook