Descrição
| Subtrai 2 horas Informada por parâmetro. |
Sintaxe
| SubHoras( <cHora01>, <cHora02> ) |
Parâmetros
| Par | Nome | Tipo | Descrição | Default | Obg | Ref |
| 01 |
cHora01 | Caracter | Hora a Subtrair | X | ||
| 02 | cHora02 | Caracter | Hora a Subtrair | X |
Retorno
| Retorno | Tipo | Descrição |
| nRet | Numérico |
Resultado da subtração das Horas |
Exemplo
#INCLUDE "TOTVS.CH" User Function SubHoras() Local cHora01 := '10:20' Local cHora02 := '02:30' MsgInfo( 'Valor 01: ' + cValtoChar( cHora01 ) ; + CRLF + 'Valor 02: ' + cValtoChar( cHora02 ) ; + CRLF + 'Retorno: ' + cValtoChar( SubHoras( cHora01, cHora02 ) ), 'UniversoADVPL' ) cHora01 := '10.30' cHora02 := '02.30' MsgInfo( 'Valor 01: ' + cValtoChar( cHora01 ) ; + CRLF + 'Valor 02: ' + cValtoChar( cHora02 ) ; + CRLF + 'Retorno: ' + cValtoChar( SubHoras( cHora01, cHora02 ) ), 'UniversoADVPL' ) cHora01 := '10.30' cHora02 := '22.50' MsgInfo( 'Valor 01: ' + cValtoChar( cHora01 ) ; + CRLF + 'Valor 02: ' + cValtoChar( cHora02 ) ; + CRLF + 'Retorno: ' + cValtoChar( SubHoras( cHora01, cHora02 ) ), 'UniversoADVPL' ) Return( Nil )
Resultado
Informações adicionais
|
cHora01/cHora02 => Pode ser Enviado como numérico também e o separador é "." Se for Caracter, pode ser com ":" ou "." nHora01 := 10.20 nHora02 := 02.30 |
Gostou? Compartilhe com seus amigos e deixe um comentário! 😎