Totvs Protheus Função DateNoWorkDay AdvPL [Tlpp]

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

Descrição:

Sintaxe:

Parâmetros:

Retorno:

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

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

FWAlertSuccess('Data 1: ' + cValtoChar(dData1) ;
         + CRLF + 'Data 2: ' + cValtoChar(dData2) ;
         + CRLF + 'Dias Não Úteis: ' + cRet, 'Academia Protheus')

FWRestArea(aArea)
Return

dd

Moura

Analista de sistemas, programador com mais de 18 anos de experiência no sistema Totvs Protheus, administrador, suporte e customizações, idealizador da Academia ProERP, já ajudou centenas de pessoas a programar em AdvPL/Tlpp.