idate_(idate_struct)
目的
idate_
サブルーチンは、日、月、年が入った数値形式で現在の日付を戻します。
クラス
サブルーチン
引き数の型と属性
idate_struct
TYPE IDATE_TYPE
SEQUENCE
INTEGER(4) IDAY
INTEGER(4) IMONTH
INTEGER(4) IYEAR
END TYPE
TYPE (IDATE_TYPE) IDATE_STRUCT
CALL idate_(IDATE_STRUCT)