Nesse vídeo demonstraremos a utilização da função FirstDate, que serve para buscar a primeira data de um mês.

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

//Bibliotecas
#Include "TOTVS.ch"

/*/{Protheus.doc} User Function zExe185
Busca o primeiro dia do mês conforme a data passada
@type Function
@author Atilio
@since 21/12/2022
@obs 
    Função FirstDate
    Parâmetros
        Data de Referência
    Retorno
        Retorna o primeiro dia do mês

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

User Function zExe185()
    Local aArea     := FWGetArea()
    Local dData     := sToD("20221215")
    Local dPriDia

    //Busca o primeiro dia
    dPriDia := FirstDate(dData)

    //Mostra o resultado
    FWAlertInfo("Na data '" + dToC(dData) + "' o primeiro dia do mês é '" + dToC(dPriDia) + "'", "Teste FirstDate")

    FWRestArea(aArea)
Return

Bom pessoal, por hoje é só.

Abraços e até a próxima.

Tags: AdvPLMaratonaProtheusTL++