`DATE_AND_TIME` — 날짜·시간 서브루틴

DATE_AND_TIME — 날짜·시간 서브루틴

프로그램이 실행되는 순간의 현재 날짜와 시간, 그리고 UTC와의 시차까지 한 번에 알아내고 싶을 때가 있어요. DATE_AND_TIME은 실시간 시스템 시계에서 날짜·시간 정보를 가져와 여러 인자에 나누어 담아주는 서브루틴이에요. POSIX의 C함수처럼 다루기 좋게 값 배열을 함께 돌려줘요.

출처: gfortran — DATE_AND_TIME

본문

시그니처

CALL DATE_AND_TIME([DATE, TIME, ZONE, VALUES])

설명

DATE_AND_TIME(DATE, TIME, ZONE, VALUES)는 실시간 시스템 시계에서 해당 날짜·시간 정보를 가져와요.

  • DATE — INTENT(OUT), ccyymmdd 형태.
  • TIME — INTENT(OUT), hhmmss.sss 형태.
  • ZONE — INTENT(OUT), (+-)hhmm 형태. UTC(협정 세계시)와의 차이를 나타내요.
  • 사용할 수 없는 날짜·시간 인자는 공백을 반환해요.

VALUES는 INTENT(OUT)이며 다음 값들을 제공해요.

값 의미
VALUES(1) 세기를 포함한 연도
VALUES(2) 월
VALUES(3) 일
VALUES(4) UTC와의 시차(분)
VALUES(5) 시
VALUES(6) 분
VALUES(7) 초
VALUES(8) 밀리초

클래스

서브루틴

인자

  • DATE — (선택) 기본 CHARACTER 타입의 스칼라. 권장 길이는 8 이상.
  • TIME — (선택) 기본 CHARACTER 타입의 스칼라. 권장 길이는 10 이상.
  • ZONE — (선택) 기본 CHARACTER 타입의 스칼라. 권장 길이는 5 이상.
  • VALUES — (선택) 십진 지수 범위가 최소 4이고 배열 크기가 최소 8인 INTEGER 타입의 랭크-1 배열.

반환값

없음(None).

예제

program test_time_and_date
    character(8)  :: date
    character(10) :: time
    character(5)  :: zone
    integer,dimension(8) :: values
    ! using keyword arguments
    call date_and_time(date,time,zone,values)
    call date_and_time(DATE=date,ZONE=zone)
    call date_and_time(TIME=time)
    call date_and_time(VALUES=values)
    print '(a,2x,a,2x,a)', date, time, zone
    print '(8i5)', values
end program test_time_and_date

인자를 모두 주어 호출하거나, 키워드 인자로 필요한 것만 골라 호출할 수 있어요. 날짜·시간·시차를 문자열로, values는 정수 배열로 받아 출력하는 예시예요.

표준

Fortran 90 이상

함께 보기