Nesse vídeo demonstraremos a utilização da função MesDia, que serve para retornar o período de uma data no formato MMDD.
Abaixo o código fonte desenvolvido para o exemplo em vídeo acima:
//Bibliotecas
#Include "Totvs.ch"
/*/{Protheus.doc} User Function zExe347
Retorna o mês e o dia no formato "MMDD"
@type Function
@author Atilio
@since 25/03/2023
@obs
Função MesDia
Parâmetros
Recebe a Data a ser verificada
Retorno
Retorna o Mês e o dia em uma string no formato "MMDD"
**** Apoie nosso projeto, se inscreva em https://www.youtube.com/TerminalDeInformacao ****
/*/
User Function zExe347()
Local aArea := FWGetArea()
Local dDtHoje := Date()
Local cConteud
//Pega o Mês e o Dia conforme a data passada e exibe uma mensagem
cConteud := MesDia(dDtHoje)
FWAlertInfo("O resultado é " + cConteud, "Teste - MesDia")
FWRestArea(aArea)
Return
Bom pessoal, por hoje é só.
Abraços e até a próxima.