Nesse vídeo demonstraremos a utilização da função DateDiffMonth que retorna a diferença em meses entre duas datas.
Abaixo o código fonte desenvolvido para o exemplo em vídeo acima:
//Bibliotecas #Include "TOTVS.ch" /*/{Protheus.doc} User Function zExe110 Retorna a diferença em meses entre duas datas @type Function @author Atilio @since 12/12/2022 @obs Função DateDiffMonth Parâmetros + Data inicial + Data final Retorno + Retorna a quantidade de meses **** Apoie nosso projeto, se inscreva em https://www.youtube.com/TerminalDeInformacao **** /*/ User Function zExe110() Local aArea := FWGetArea() Local dDataIni := sToD("19930712") Local dDataFim := Date() Local nMeses := 0 //Busca a diferença em dias nMeses := DateDiffMonth(dDataIni, dDataFim) //Exibe a diferença FWAlertInfo("A diferença é de " + cValToChar(nMeses) + " mês(es)", "Teste DateDiffMonth") FWRestArea(aArea) Return
Bom pessoal, por hoje é só.
Abraços e até a próxima.