Nesse vídeo demonstraremos a utilização da função Day2Str que busca uma string com dois caracteres no formato “DD” de uma variável informada.

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

//Bibliotecas
#Include "TOTVS.ch"

/*/{Protheus.doc} User Function zExe114
Retorna o dia atual conforme a data informada no formato "DD"
@type Function
@author Atilio
@since 13/12/2022
@obs 
    Função Day2Str
    Parâmetros
        + Conteúdo que será analisado podendo ser: Data (ex: 05/12/2022); Numérico (ex: 5); Caractere (ex: "5")
    Retorno
        + Retorna uma string com o dia no formato "DD"

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

User Function zExe114()
    Local aArea      := FWGetArea()
    Local dDataRef   := sToD("20221203")
    Local cDiaHoje   := ""

    //Busca o dia atual conforme a data
    cDiaHoje         := Day2Str(dDataRef)

    //Exibe a diferença
    FWAlertInfo("Hoje é " + cDiaHoje, "Teste Day2Str")

    FWRestArea(aArea)
Return

Bom pessoal, por hoje é só.

Abraços e até a próxima.

Tags: AdvPLMaratonaProtheusTL++