ASSINE A NEWSLETTER

Cadastrando...

PIX uDesenv

DateDiffYMD

Autor: Eurai Criado: 01/01/2016 Atualizado: 24/07/2021

Descrição

Retorna a diferença de dias, meses e anos de duas Data Informada.

Sintaxe

DateDiffYMD( , )

Parâmetros

Par	Nome	Tipo	Descrição	Default	Obg	Ref
01	dDate01	Date	Data que você deseja comparar		X
02	dDate02	Date	Data que você deseja comparar		X

Retorno

Retorno	Tipo	Descrição
aRet	Array	Diferença de Dias, Meses e Anos

Exemplo

#INCLUDE "TOTVS.CH"
 
User Function DiffYMD()
Local dDate01	:= Date()
Local dDate02	:= YearSum( MonthSum( DaySum( Date(), 1 ), 2 ), 3 )
Local aRet		:= DateDiffYMD( dDate01, dDate02 )
 
 
MsgInfo( 'Valor 01: ' + cValtoChar( dDate01 ) ;
	+ CRLF + 'Valor 02: ' + cValtoChar( dDate02 ) ;
	+ CRLF + 'Anos: ' + cValtoChar( aRet[01] ) ; 
	+ CRLF + 'Meses: ' + cValtoChar( aRet[02] ) ; 
	+ CRLF + 'Dias: ' + cValtoChar( aRet[03] ) , 'UniversoADVPL' )
 
Return( Nil )

Resultado
datediffymd_-_resultado_01

aRet

aRet[01]	Anos
aRet[02]	Meses
aRet[03]	Dias

Gostou? Compartilhe com seus amigos e deixe um comentário! 😎

Facebook