Nesse vídeo demonstraremos a utilização da função Year, que serve para pegar o número do ano de uma data informada.
Inscreva-se no Canal
Abaixo o código fonte desenvolvido para o exemplo em vídeo acima:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 | //Bibliotecas #Include "Totvs.ch" /*/{Protheus.doc} User Function zExe548 Retorna o número do ano conforme data informada @type Function @author Atilio @since 07/04/2023 @see https://tdn.totvs.com/display/tec/Year @obs Função Year Parâmetros + dDate , Data , Data a ser validada Retorno + nYear , Numérico , Número do ano **** Apoie nosso projeto, se inscreva em https://www.youtube.com/TerminalDeInformacao **** /*/ User Function zExe548() Local aArea := FWGetArea() Local dDtHoje := Date() Local nAno //Pega o ano da data de hoje nAno := Year(dDtHoje) FWAlertInfo( "O ano é " + cValToChar(nAno), "Teste - Year" ) FWRestArea(aArea) Return |
Bom pessoal, por hoje é só.
Abraços e até a próxima.