GNU Info

(g77-295.info)IDate Intrinsic (VXT)

---

Next: IIAbs Intrinsic Prev: FPutC Intrinsic (function) Up: Other Intrinsics

---

Enter node , (file) or (file)node

IDate Intrinsic (VXT)
.....................

     CALL IDate(M, D, Y)

M: `INTEGER(KIND=1)'; scalar; INTENT(OUT).

D: `INTEGER(KIND=1)'; scalar; INTENT(OUT).

Y: `INTEGER(KIND=1)'; scalar; INTENT(OUT).

Intrinsic groups: `vxt'.

Description:

   Returns the numerical values of the current local time.  The month
(in the range 1-12) is returned in M, the day (in the range 1-7) in D,
and the year in Y (in the range 0-99).

   This intrinsic is not recommended, due to the year 2000 approaching.
Therefore, programs making use of this intrinsic might not be Year 2000
(Y2K) 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 2000.

   Note: IDate Intrinsic (UNIX), for information on obtaining more
digits for the current date.

   For information on other intrinsics with the same name: Note: IDate
Intrinsic (UNIX).