Alberto Martínez aMarCruz
aMarCruz
/ datedif.prg
Created
February 10, 2014 08:43
Devuelve la diferencia en años y meses de una a otra fecha.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| *------------------------------------------------------------------------------ | |
| * nResult = DateDiff(tFromDate, tToDate) | |
| *------------------------------------------------------------------------------ | |
| * Devuelve un número con la diferencia en años y meses de tFromDate a tToDate. | |
| * Los meses están representados con decimales. | |
| * P.Ej. ? DateDiff({^1961/03/31}, {^2013/08/18}) | |
| * Imprime 52.04 (52 años y 4 meses) | |
| *============================================================================== | |
| LPARAMETERS T1 AS Date, T2 AS Date |
NewerOlder