Hoje vamos aprender a usar a Função AtTotHora do AdvPL [Tlpp], [tl++] para calcular a diferença entre o período de duas datas e horários – Curso Protheus grátis AdvPL / TLPP.
#Include "Protheus.ch"
/*----------------------------------------------------------------------------------*
{Protheus.doc} User Function mAtTotHo()
@type:      User Function
@author:    Jose Moura
@site:      https://academiaproerp.com
@canal:     [Inscreva-se no canal https://www.youtube.com/@academiaprotheus]
@desc.:     Função AtTotHora. Retorna o Número total de dias com horas
@Sintaxe:   AtTotHora(dDataI, cHoraI, dDataF, cHoraF)
*-----------------------------------------------------------------------------------*/
User Function mAtTotHo()
Local aArea   := FWGetArea()
Local dDataI  := CToD('10/10/2023')
Local cHoraI := '10:15:00'
Local dDataF  := CToD('15/11/2023')
Local cHoraF := '16:45:00'
Local cRet    := AtTotHora(dDataI, cHoraI, dDataF, cHoraF)
//Exibe Número total de dias com horas)
FWAlertSuccess('Data 1: ' + cValtoChar(dDataI) ;
         + CRLF + 'Data 2: ' + cValtoChar(dDataF) ;
         + CRLF + 'Retorno é: ' + cRet, 'Academia Protheus')
FWRestArea(aArea)
Return


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.