Somando Meses à uma Data com MonthSum em ADVPL

Tempo de leitura: 1 minuto

 

A função MonthSum em ADVPL soma uma quantidade de meses à uma data informada no parâmetro. Ela é uma das funções de manipulação de data e hora em ADVPL.

 

Sintaxe:

MonthSum(dData,nMeses)

 

Parâmetro(s):

 

Retorno:

 

Exemplo da função MonthSum em ADVPL:

//Bibliotecas
#Include "Protheus.ch"
/*{Protheus.doc} User Function fMontSum
(Essa função tem por finalidade mostrar a função MonthSum em ADVPL)
@?type  Function
@?author Adilio Costa
@?since 25/09/2025
@?version 1.0
@?Inscreva-se no Blog ProtheusAdvpl:
https://www.protheusadvpl.com.br
@?Inscreva-se no Canal ProtheusAdvpl:
https://www.youtube.com/protheusadvpl
@?Siga-nos no Instagram:
https://www.instagram.com/protheusadvpl
@?Conheça os Cursos e Formações do ProtheusAdvpl:
https://cursos-e-formacoes-protheusadvpl.gr-site.com/

@Participe de nossas comunidades no WhatsApp:
-Comunidade Protheus Backoffice:https://chat.whatsapp.com/KMUIAjwZ6EZ6eAHsLkPTyb
-Comunidade Protheus-RH:https://chat.whatsapp.com/L5dUyAna6xU4ylG5DUgfOW
-Comunidade Protheus-Programação:https://chat.whatsapp.com/LsD6z0apdqKHlOz67bcaEn
-Comunidade Protheus-Framework:https://chat.whatsapp.com/BzUFpjaSnTC3vtsfa77jmG

|Se esse conteúdo foi útil pra você nos ajude divulgando
ele e nossas redes sociais!!|

*/
User Function fMontSum()
	Local aArea     := FWGetArea()
	Local dDataHoje  := Date()
	Local dDataSoma
	Local cMsg	  := ""

	//Somando 4 meses a data atual
	dDataSoma := MonthSum(dDataHoje,4)

	cMsg := "A data "+DToC(dDataHoje)+" somada a 4 meses é:"+DToC(dDataSoma)



	FWAlertInfo(cMsg, "Função MonthSum")

	FWRestArea(aArea)

Return

Função MonthSum em ADVPL

 

É isso aí, finalizamos mais um post aqui no Blog ProtheusAdvpl, caso tenha ficado alguma dúvida deixe seu comentário ou nos envie um e-mail para adiliocosta@protheusadvpl.com.br. Até um próximo post. Grande abraço e fica com Deus.

 

Link(s) de referência:

Receba as últimas atualizações do ProtheusAdvpl
Deixe seu melhor email
Nós respeitamos sua privacidade.