PACKTIMEQQ

実行時サブルーチン:日時の値を詰め込みます。

モジュールUSE DFLIB

形式

CALL PACKTIMEQQ (timedate, iyr, imon, iday, ihr, imin, isec)

timedate
(出力) INTEGER(4)。日時情報を詰め込むバッファ。

iyr
(入力) INTEGER(2)。年 (xxxx AD)。

imon
(入力) INTEGER(2)。月 (1 ~ 12)。

iday
(入力) INTEGER(2)。日 (1 ~ 31)。

ihr
(入力) INTEGER(2)。時 (0 ~ 23)。

imin
(入力) INTEGER(2)。分 (0 ~ 59)。

isec
(入力) INTEGER(2)。秒 (0 ~ 59)。

詰め込まれる時刻は,グリニッジ平均時 1970 年 1 月 1 日 00:00:00 からの秒数です。詰め込まれた時刻値が数値的に比較できるため,相対日時値で作業する場合に PACKTIMEQQ を使うことができます。詰め込まれた時刻情報を元に戻すには,UNPACKTIMEQQ を使います。SETFILETIMEQQ は詰め込まれた時刻を使用します。

互換性

CONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIB

関連情報

GETFILEINFOQQSETFILETIMEQQTIMEUNPACKTIMEQQ

	USE DFLIB
	INTEGER(2) year, month, day, hour, minute, second, hund
	INTEGER(4) timedate

	CALL GETDAT (year, month, day)
	CALL GETTIM (hour, minute, second, hund)
	CALL PACKTIMEQQ (timedate, year, month, day, hour,   &
	                 minute, second)
	END