Nesse vídeo demonstraremos a utilização da função Month2Str, que serve para buscar o mês de uma data mantendo os dois caracteres no formato MM.

Abaixo o código fonte desenvolvido para o exemplo em vídeo acima:

//Bibliotecas
#Include "Totvs.ch"

/*/{Protheus.doc} User Function zExe352
Retorna o mês conforme data informada no formato "MM"
@type Function
@author Atilio
@since 26/03/2023
@obs 

    Função Month
    Parâmetros
        Data a ser verificada
    Retorno
        Número do mês no formato "MM"

    **** Apoie nosso projeto, se inscreva em https://www.youtube.com/TerminalDeInformacao ****
/*/

User Function zExe352()
	Local aArea    := FWGetArea()
    Local dDtHoje  := Date()
    Local cMes

    //Pega o mês da data de hoje
    cMes := Month2Str(dDtHoje)
    FWAlertInfo("O mês é " + cMes, "Teste - Month2Str")

    FWRestArea(aArea)
Return

Bom pessoal, por hoje é só.

Abraços e até a próxima.

Tags: AdvPLMaratonaProtheusTL++