Nesse vídeo demonstraremos a utilização da função DaySum que soma um número de dias em uma data.
Abaixo o código fonte desenvolvido para o exemplo em vídeo acima:
//Bibliotecas
#Include "TOTVS.ch"
/*/{Protheus.doc} User Function zExe116
Adiciona dias em uma data
@type Function
@author Atilio
@since 13/12/2022
@obs
Função DaySum
Parâmetros
+ Data que será processada
+ Número de dias a serem somados
Retorno
+ Retorna a nova data com a soma
**** Apoie nosso projeto, se inscreva em https://www.youtube.com/TerminalDeInformacao ****
/*/
User Function zExe116()
Local aArea := FWGetArea()
Local dDataRef := Date()
Local nDias := 10
Local dNovaData
//Faz a adição dos dias
dNovaData := DaySum(dDataRef, nDias)
//Exibe a diferença
FWAlertInfo("Após a adição de " + cValToChar(nDias) + " dia(s), a nova data é " + dToC(dNovaData), "Teste DaySum")
FWRestArea(aArea)
Return
Bom pessoal, por hoje é só.
Abraços e até a próxima.