INTEGER(KIND=1); DIMENSION(3); INTENT(OUT).
Fills TArray with the numerical values at the current local time. The day (in the range 1-31), month (in the range 1-12), and year appear in elements 1, 2, and 3 of TArray, respectively. The year has four significant digits.
Programs making use of this intrinsic might not be Year 10000 (Y10K) compliant. For example, the date might appear, to such programs, to wrap around (change from a larger value to a smaller one) as of the Year 10000.
For information on other intrinsics with the same name: See IDate Intrinsic (VXT).