No vídeo de hoje vamos demonstrar como acrescentar e diminuir minutos em uma hora através das funções IncTime e DecTime.
Essa dúvida foi feita pelo Mendonça, onde ele perguntou como poderia adicionar valores em uma variável do tipo hora no formato “hh:mm:ss”.
Montamos um exemplo demonstrando a utilização da IncTime e da DecTime.
E abaixo o código fonte desenvolvido para exemplificar:
//Bibliotecas #Include "TOTVS.ch" /*/{Protheus.doc} User Function zVid0054 Função para demonstrar em como incrementar ou decrementar minutos numa variável @type Function @author Atilio @since 26/08/2022 /*/ User Function zVid0054() Local aArea := FWGetArea() Local cHora := Time() Local cExempSom := "" Local cExempSub := "" Local cMensagem := "" //Incrementa e decrementa horas, minutos e segundos cExempSom := IncTime(cHora, 2, 30, 10) cExempSub := DecTime(cHora, 1, 45, 30) //Exibe o resultado cMensagem := "Abaixo os detalhes da manipulação de horas:" + CRLF cMensagem += "Hora Base: " + cHora + CRLF cMensagem += "Exemplo Adição: " + cExempSom + CRLF cMensagem += "Exemplo Subtração: " + cExempSub FWAlertInfo(cMensagem, "Resultado") FWRestArea(aArea) Return
Bom pessoal, por hoje é só.
Abraços e até a próxima.