Totvs Protheus Função DateWorkDay AdvPL [Tlpp]

Totvs Protheus Função DateWorkDay AdvPL [Tlpp]

Hoje vamos aprender a usar a Função DateWorkDay do AdvPL [Tlpp], [tl++] para obter a Quantidade de Dias úteis entre duas Datas – Curso Protheus grátis AdvPL / TLPP.

Descrição:

Quantidade de Dias úteis entre duas Datas.

Sintaxe:

DateWorkDay( <dData1>, <dData2>, <lSabado>, <lDomingo>, <lFeriado> )

Parâmetros:

ParNomeTipoDescriçãoDefaultObgRef
01dData1DateData Inicial X 
02dData2DateData Final X 
03lSabadoBooleanConsidera Sábado.T.  
04lDomingoBooleanConsidera Domingo.T.  
05lFeriadoBooleanConsidera Feriado.T.  

Retorno:

RetornoTipoDescrição
nRetNuméricoDias Uteis

Exem

#Include "Protheus.ch"
/*----------------------------------------------------------------------------------*
{Protheus.doc} User Function mDTWorkD()
@type:      User Function
@author:    Jose Moura
@site:      https://academiaprotheus.com.br
@canal:     [Inscreva-se no canal https://www.youtube.com/@academiaprotheus]
@desc.:     Função DateWorkDay. Retorna Quantidade de Dias uteis entre duas Datas
@Sintaxe:   DateWorkDay(dData1, dData2, lSabado, lDomingo, lFeriado)
*-----------------------------------------------------------------------------------*/

User Function mDTWorkD()
Local aArea   := FWGetArea()
Local dData1  := FirstDate(Date())
Local dData2  := LastDate(Date())
Local cRet    := cValtoChar(DateWorkDay(dData1, dData2))

FWAlertInfo( 'Data 1: ' + cValtoChar( dData1 ) ;
      + CRLF + 'Data 2: ' + cValtoChar( dData2 ) ;
      + CRLF + 'Dias úteis: ' + cRet, 'Academia Protheus' )

FWRestArea(aArea)
Return

One thought on “Totvs Protheus Função DateWorkDay AdvPL [Tlpp]

Deixe um comentário

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