Totvs Protheus Função cMonth AdvPL [Tlpp]

Hoje vamos aprender a usar a Função cMonth do AdvPL [Tlpp], [tl++] para extrair o nome do Mês de uma Data (em Inglês) – Curso Protheus grátis AdvPL / TLPP.

#Include "Protheus.ch"
/*-------------------------------------------------------------------------------------------*
{Protheus.doc} User Function mcMonth()
@type:      User Function
@author:    Jose Moura
@site:      https://academiaproerp.com
@canal:     [Inscreva-se no canal https://www.youtube.com/@academiaprotheus]
@desc.:     Função cMonth Retorna uma cadeia de caracteres com nome do mês
@Sintaxe:   cMonth(Data)
*-------------------------------------------------------------------------------------------*/

User Function mcMonth()
Local aArea      := FWGetArea()
Local dData     := SToD("")
Local cRet       := ""

dData     := Date()
cRet     := cMonth(dData)

FWAlertSuccess("O Nome do Mês é: " + cRet, "Retorno de cMonth")

FWRestArea(aArea)
Return

Moura

Analista de sistemas, programador com mais de 18 anos de experiência no sistema Totvs Protheus, administrador, suporte e customizações, idealizador da Academia ProERP, já ajudou centenas de pessoas a programar em AdvPL/Tlpp.