8.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 — Подпрограмма даты и времени

© Free Software Foundation
Licensed under the GNU Free Documentation License, Version 1.3.
https://gcc.gnu.org/onlinedocs/gcc-13.3.0/gfortran/IDATE.html