Nesse vídeo demonstraremos a utilização das funções ExLocalToUTC e ExUTCToLocal, sendo que elas servem para converter data e hora no formato UTC.
Abaixo o código fonte desenvolvido para o exemplo em vídeo acima:
//Bibliotecas #Include "TOTVS.ch" /*/{Protheus.doc} User Function zExe163 Faz conversões entre data e hora para o formato UTC @type Function @author Atilio @since 19/12/2022 @see https://tdn.totvs.com/pages/releaseview.action?pageId=6815032 @obs Função ExLocalToUTC Parâmetros + Data a ser verificada + Hora a ser verificada Retorno + Retorna uma string com a data e hora concatenadas Função ExUTCToLocal Parâmetros + String no formato de data e hora concatenadas Retorno Retorna um Array com 2 posições sendo a primeira a data e a segunda a hora **** Apoie nosso projeto, se inscreva em https://www.youtube.com/TerminalDeInformacao **** /*/ User Function zExe163() Local aArea := FWGetArea() Local cUTC := "" Local aDados Local dData Local cHora //Faz a conversão da data e hora local para UTC cUTC := ExLocalToUTC(Date(), Time()) FWAlertInfo("O resultado é " + cUTC, "Teste com ExLocalToUTC") //Agora faz a conversão de UTC para Local aDados := ExUTCToLocal("2022-12-19T10:00:34Z") dData := aDados[1] cHora := aDados[2] FWAlertInfo("O resultado é " + dToC(dData) + " e " + cHora, "Teste com ExUTCToLocal") FWRestArea(aArea) Return
Bom pessoal, por hoje é só.
Abraços e até a próxima.