可搬用サブルーチン:9 個の要素を持つ配列に地域タイム・ゾーンの成分を返します。
モジュール:USE DFPORT
形式
CALL GMTIME (time, array)
time
(入力) INTEGER(4)。グリニッジ平均時 1970 年 1 月 1 日 00:00:00 からの経過秒数。
array
(出力) INTEGER(4)。time から取り出される地域日時を含む 9 個の要素をもつ 1 次元配列。
array の要素 | 返されるデータ |
---|---|
array(1) | 秒 (0 ~ 59) |
array(2) | 分 (0 ~ 59) |
array(3) | 時 (0 ~ 23) |
array(4) | 月の日数 (1 ~ 31) |
array(5) | 月 (0 ~ 11) |
array(6) | 年 (0 ~ 99) |
array(7) | 週の日数 (0 ~ 6,ここで 0 は日曜日) |
array(8) | 年の日数 (0 ~ 365) |
array(9) | 1 は夏時間,これ以外は 0 |
互換性
CONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIB
関連情報
DATE_AND_TIME,可搬用ライブラリー例
USE DFPORT INTEGER(4) input_time, time_array ! 1/1/79 からの秒数を得ます。 input_time=TIME() ! 秒数を時刻配列に変換します。 CALL LTIME (input_time, time_array) PRINT *, time_array