DateDiffYMD

DateDiffYMD
Author: Eurai
Inclusão: 01/01/2016
Alteração: 24/07/2021

Descrição

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

 

Sintaxe

DateDiffYMD( <dDate01>, <dDate02> )

 

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! 😎  

 

 

 

 

 

 

 

Esse conteúdo te ajudou? Ajude o canal com doação
Compartilhar
Comentários