Nesse vídeo demonstraremos a utilização da função Month, que serve para buscar o número do mês conforme uma data informada.
Abaixo o código fonte desenvolvido para o exemplo em vídeo acima:
//Bibliotecas
#Include "Totvs.ch"
/*/{Protheus.doc} User Function zExe351
Retorna o número do mês conforme data informada
@type Function
@author Atilio
@since 26/03/2023
@see https://tdn.totvs.com/display/tec/Month
@obs
Função Month
Parâmetros
+ dData , Data , Data a ser validada
Retorno
+ nRet , Numérico , Número do mês
**** Apoie nosso projeto, se inscreva em https://www.youtube.com/TerminalDeInformacao ****
/*/
User Function zExe351()
Local aArea := FWGetArea()
Local dDtHoje := Date()
Local nMes
//Pega o mês da data de hoje
nMes := Month(dDtHoje)
FWAlertInfo("O mês é " + cValToChar(nMes), "Teste - Month")
FWRestArea(aArea)
Return
Bom pessoal, por hoje é só.
Abraços e até a próxima.