9.144 IDATE — Получение текущего времени по местному времени (день/месяц/год)

Описание:

IDATE(VALUES) Заполняет VALUES численными значениями текущего местного времени. День (в диапазоне от 1 до 31), месяц (в диапазоне от 1 до 12) и год отображаются в элементах 1, 2 и 3 VALUES соответственно. Год имеет четыре значащие цифры.

Эта внутренняя процедура предоставляется для обратной совместимости с GNU Fortran 77. В новом коде программисты должны учитывать использование функции DATE_AND_TIME, определенной стандартом Fortran 95.

Стандарт:

Расширение GNU

Класс:

Подпрограмма

Синтаксис:

CALL IDATE(VALUES)

Аргументы:

VALUES

Тип должен быть INTEGER, DIMENSION(3) и вид должен быть стандартным целочисленным видом.

Возвращаемое значение:

Ничего не возвращает.

Пример:

program test_idate
  integer, dimension(3) :: tarray
  call idate(tarray)
  print *, tarray(1)
  print *, tarray(2)
  print *, tarray(3)
end program test_idate

См. также:

DATE_AND_TIME